fun1 : a -> a fun1 x = x {- allow unclosed comment block at the end of file fun2 : a -> a fun2 x = x fun3 : a -> a fun3 x = x