define a "SUKAS"
define b [str-cat $a " muito"]
echo $b