Quadratic Koch island

Quadratic Koch island

Source code

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
lsystem QuadraticKochIsland {
 
set symbols axiom = F - F - F - F;
set iterations = 2;
 
// normalize line length to have (result image will have always same size)
interpret F as DrawForward(2 ^ -(currentIteration * 2) * 128);
interpret + as TurnLeft(90);
interpret - as TurnLeft(-90);
 
rewrite F to
F + F F - F F - F - F + F + F
F - F - F + F + F F + F F - F;
}
 
process all with SvgRenderer;