/dev-haskell/ifelse/