fun : int -> int id (x : int) = id x let main : int = id "foo"