let succ : int -> int = (\ (x : int) -> "bar" : int -> int) let main : int = succ (0)