2019-10-28 22:07:00 -07:00
|
|
|
(* Test function with several parameters *)
|
|
|
|
|
|
2020-01-08 20:58:26 +00:00
|
|
|
let abcde_curried (a : int) (b : int) (c : int) (d : int) (e : int) : int =
|
2020-03-02 18:01:56 +01:00
|
|
|
c + e + 3
|
2020-01-08 20:58:26 +00:00
|
|
|
|
|
|
|
|
let abcde (x : int * int * int * int * int) : int =
|
|
|
|
|
abcde_curried x.0 x.1 x.2 x.3 x.4
|
