spirograph implementation in ocaml with js_of_ocaml