foo x = case (odd x) of True -> "Odd" False -> "Even"