My solutions to 1HaskellADay