8 lines
194 B
Text
8 lines
194 B
Text
|
fun : [`a, `b] `a -> `b
|
||
|
|
false_rec (x : `a) = false_rec2<`b, `a> (x)
|
||
|
|
|
||
|
|
and : [`a, `b] `b -> `b
|
||
|
|
false_rec2 (x : `b) = false_rec<`b, `a> (x)
|
||
|
|
|
||
|
|
let main : string = false_rec<int, string> (43)
|