/bran.gif">
1. Think carefully about the two procedures below. As in previous months they require the technique called recursion as well as introducing the RANDOM primitive.
[You will find that this is a primitive that rewards systematic investigation and application.]
Investigate these procedures. Alter the parameter
:T (colon T) within BRAN3 and
BRAN4 as you think fit.
TO BRAN3 :T IF 20 > :T [STOP] FD :T RT 15 BRAN3 :T - 25 LT 30 BRAN3 :T - 10 RT 15 BK :T END
Start with BRAN3 140 and explore from there!
TO BRAN4 :T IF 30 > :T [STOP] FD :T RT 30 BRAN4 :T * (.6 + .02 * RANDOM 10) LT 60 BRAN4 :T * (.6 + .02 * RANDOM 10) RT 30 BK :T END
Try BRAN4 180 and explore from there!
To explore these ideas further you might like to dip into the /MOTIVATE/conf1.html>section on Fractals, particularly the parts on dendrites, and you might even try some of the assignments there.
LOGOland will have even more on a similar theme coming up soon.