to

to procedure-name to procedure-name [input1 ...]

Used to begin a command procedure.

to setup
  clear-all
  crt 500
end

to circle [radius]
  crt 100 [ fd radius ]
end