greeting verb object = putStrLn (verb ++ ", " ++ object)