procedure 0
  repeat 4 times
    forward 1
    right 90
  fill random
#display: x=0, y=0, grid=47

procedure 1
  repeat 4 times
    left 90
    forward 1
    paint 0
#display: x=38, y=-38, grid=32

procedure 2
  repeat 4 times
    left 90
    forward 5
    paint 1
#display: x=95, y=-94, grid=32

procedure 3
  repeat 4 times
    left 90
    forward 13
    paint 2
#display: x=154, y=-131, grid=17

procedure 4
  repeat 4 times
    left 90
    forward 29
    paint 3
#display: x=113, y=-118, grid=7

procedure 5
  repeat 4 times
    left 90
    forward 1
    paint 4
#display: x=5, y=-29, grid=7

