← All posts tagged Erlang

bitfield
Erlang code Haskell
решил "потягать штангу" на задачке от maxim@lj
получился кусок такого веселого кода
solve7x2  deck = match2 deck >>= match2 >>= match2 >>= match2 >>= match2 >>= match2 >>= match2
solve554  deck = match5 deck >>= match5 >>= match4
solve5333 deck = match5 deck >>= match3 >>= match3 >>= match3
solve4433 deck = match4 deck >>= match4 >>= match3 >>= match3

match? :: Deck -> [Deck], если чё.