Evaluated set $::tcl_precision 1