Posted to tcl by Bradipo at Tue Jan 29 18:06:58 GMT 2013view pretty

% expr {$t == 0 ? "JACK" : "JILL"}
JACK
% expr {$t == 0 ? "JACK" : [format %8.2f [expr $t / 3600.0]]}
JACK
% expr {$t == 0 ? "INF" : [format %8.2f [expr $t / 3600.0]]}
floating-point value too large to represent