path: root/creal_pp.ml

open Format

let precision = ref 20;;

let pp x = print_string (Creal.to_string x !precision);;