return a = let as = a : as in as
[] >>= _ = []
(a : as) >>= a2bs = (head . a2bs) a : (as >>= tail . a2bs)
이렇게 하면 되죠?
너무 예쁘다 ㅇㅅㅇ

- dc official App