Koch's flake

Koch

Source code

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
lsystem Koch
{
set symbols axiom = F - - F - - F;
set initialAngle = 0;
set iterations = 6;
set continuousColoring = true;
 
interpret F as DrawForward (1);
interpret + as TurnLeft (60);
interpret - as TurnLeft (-60);
 
rewrite F to F + F - - F + F;
}
 
process all with BitmapRenderer;