6 lines
111 B
Text
6 lines
111 B
Text
let bonneteau =
|
|
fun h (x, y) = (g x)
|
|
and g x = (f (x, x, x))
|
|
and f (x, y, z) = y
|
|
;
|
|
f (1, 2, 3)
|