TCL EXAMPLES - Variables

ex_var.tcl


set four 4
set four_real 4.0
set three 3

set threefourths [expr $three / $four]
puts "threefourths: $threefourths"

set threefourths_real [expr $three / $four_real]
puts "threefourths_real: $threefourths_real"