#55,25,10,10 3-4 Diamond with a variable

#addo

Write a procedure DIAMOND with a variable, so

that you can make diamonds of different sizes:

#diam3


#lamp

=====================

TO DIAMOND :side

REPEAT 2 [FORWARD : side RIGHT 60 FORWARD :side RIGHT 120]

END