FIXME:
Příklad 71.4. Příkaz použití příkazu for
proc secti { x y } { return [expr $x + $y] } puts [secti 2 2]