My OCaml is rusty, but I believe that you can do this by declaring your own type and unpacking it into the function body.
type four = int*int*int*int let myfunction (t:four) = let a, b, c, d = t in a + b + c + d;
You can also do this:
let sum4 ((a, b, c, d):int*int*int*int) = a + b + c + d;;
Cristian sanchez
source share