To side2 :SIZE :LEVEL
If :LEVEL = 0 [FD :SIZE STOP]
SIDE2 :SIZE / 3 :LEVEL - 1
Lt 60
SIDE2 :SIZE / 3 :LEVEL - 1
Rt 120
SIDE2 :SIZE / 3 :LEVEL - 1
Lt 60
SIDE2 :SIZE / 3 :LEVEL - 1
End

To snowflake :SIZE
Repeat 3 [SIDE2 :SIZE 4 RT 120]
End

