tagStr :: String -> String -> String tagStr tag text = "<" ++ tag ++ ">" ++ text ++ "" -- now I can use it either way. tagStr "b" "a bold moose" underline = tagStr "u" underline "an underlined moose"