hsim/exm/zelus/count/count.zls

4 lines
87 B
Text

let node count () =
let rec n = 0 -> (pre n + 1) in
print_int n; print_newline ()