[racket] Svannah fractals.

Here is a hint I posted some N years ago for my freshmen: 

Recall the hint: "Think of the problem as drawing a straight line, given
its starting point and an angle in, say, radians." Graphically the situation
looks like this:


Your given the starting point (x0,y0) the _length_ and the angle _a_ and you want to add the red line to the picture. To do so, you need to figure out the length of the _green_ and _black_ lines. And they are: (* length (sin a)) and (* length (cos a)) respectively. Note that radian means 
fractions of pi, e.g., (/ pi 6) for 30 degrees. 



On Nov 12, 2010, at 10:00 PM, Ken Hegeland wrote:

> I have a nearly working code, it draws the tree, but it is slightly off. I realize what is wrong that is causing the problem, for each recursive call I used a set angle. The tree draws all the left branches at the same angle and all right branches at the same angle. I end up with a picture of a tree with the left branch not having any more left branches, only right branches. The right side of the tree has only left branches, no right branches.
> 
> My first thought for gradually changing the angle is to use something like (- a 10) for the angle in one  recursive call, and (+ a 10) in the next, but this produces a straight line with other lines way off to the right side. I am using a helper function which converts an angle from degrees in radians to help me more easily visualize where the branches should point. Is my thought process going in the correct direction? If anyone wants to see the code I have feel free to email me, as always, thanks in advance for any help.
> 
> _________________________________________________
>  For list-related administrative tasks:
>  http://lists.racket-lang.org/listinfo/users

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.racket-lang.org/users/archive/attachments/20101113/4ac4462b/attachment.html>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: savanah.png
Type: image/png
Size: 25434 bytes
Desc: not available
URL: <http://lists.racket-lang.org/users/archive/attachments/20101113/4ac4462b/attachment.png>