10 lines
233 B
Plaintext
10 lines
233 B
Plaintext
let conv_test (j: int) (k: int) = j + k
|
|
|
|
let main (i: int) : int = conv_test i 10
|
|
|
|
let partial (a: int) (b: int) : int = a + b
|
|
|
|
let mk_partial (j: int) : (int -> int) = partial j
|
|
|
|
let partial_apply (i: int) : int = (mk_partial 10) i
|