define square (x) { break echo [* $x $x] } define a 2 echo [apply square $a]