module Callback where test :: String -> String test x = reverse x