Evaluated set tcl_precision 999; expr acos(-1)