Haskellってもしかして引数に応じてStringもしくはIntを返す関数って作れない?