open Angstrom

let parse (str:string) : unit = num str

let () = parse ""