say "This macro creates and runs a TM that makes the tape indefinitely large." 
say "This runs till you hit a memory allocation error..." say 
"" set tape " " add quint "0  0r" set max 10000000 go