WinLogo: A Simple Fractal Tree

Tree

To Tree :N :1
If :N<1 [stop]
FD :N
LT 30
Tree :N*2/3 :1
RT 60
TREE :n*2/3 :1
LT 30
BK :N
END

 

You will need to set the parameter N.
Type in Tree "n"
This will give the number of layers of branches the program creates.

 

Search :: Index :: About :: Contact :: Contribute :: Cite This Page :: Privacy

Copyright © 2011 MathsIsFun.com