1{-# LANGUAGE UnicodeSyntax #-}
2
3arrowTest ::String ->  String
4arrowTest input =
5    case input of
6      "hello" ->"world"
7      "world" ->"hello"
8      otherwise ->"unknow"
9
10