let f x = x + 1 external g : string -> int = "int_of_string"