Removed if-expression in favor of pattern-matching function arguments.
Removed if-expression in favor of pattern-matching function arguments.

geophf/1HaskellADay,geophf/1HaskellADay,geophf/1HaskellADay