Revision f94b06de7edcb61d3c49f19417e53dc7dc21d552 authored by Anish Tondwalkar on 22 June 2021, 08:13:54 UTC, committed by Anish Tondwalkar on 22 June 2021, 08:13:54 UTC
1 parent 0a9345e
Raw File
d2.ml
let rec app f x = if Random.bool () then app f (x + 1) else f x
let check x y = if x <= y then () else assert false
let main i = app (check i) i
back to top