module Main where import Prelude type X = String type Y = X -> X fn :: Y fn a = a main = Control.Monad.Eff.Console.print (fn "Done")