RosettaCodeData/Task/Stable-marriage-problem/Haskell/stable-marriage-problem-5.hs
2016-12-05 22:15:40 +01:00

1 line
62 B
Haskell

s0 = State (fst <$> guys0) guys0 ((_2 %~ reverse) <$> girls0)