to quadrat :s fd :s rt 90 fd :s rt 90 fd :s rt 90 fd :s rt 90 end