fst : ('a * 'b) -> 'a
- fst (1, "foo");
> val it = 1 : int
- fst (1, "foo", []);
! Toplevel input:
! fst (1, "foo", []);
! ^^^^^^^^^^^^^^
! Type clash: expression of type
! 'g * 'h * 'i
! cannot have type
! 'j * 'k
! because the tuple has the wrong number of components
- fst (1, ("foo", []));
> val it = 1 : int