Clone in a terminal:
open Printf;;

open Somemodule;;

(* coin coin ( ) ( ( (*  ) ) ) ( ) muahha open nono;; *) *)
(* ( *)

let rec fib n =
	if n < 1 then 1
	else if n == 1 then 1
	else fib(n-1) + fib(n-2);;

for i=0 to 10 do
	Somemodule.pprint "next";
	Printf.printf " %d %d\n" i (fib i)
done;;

print_newline();;

Contact

Email: johan.mattsson.m@gmail.com
Mastodon: typo.social/@birdfont
GitHub: johanmattssonm
LinkedIn: johan-mattsson-2ab324112