open Std (* let input _ = () *) (* let output (now, (sin, cos)) = Format.printf "%.10e\t%.10e\t%.10e\n" now sin cos *) (* let () = Runtime.go input Sincosz.g output *) let input _ = () let output (now, sin, cos) = Format.printf "%.10e,%.10e,%.10e\n" now sin cos let () = Runtime.go_discrete input Sincosz.sincos output