Inversed Sierpinski

Inversed Sierpinski

Source code

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
lsystem InversedSierpinski {
 
set symbols axiom = < . F - . F . > - F;
set iterations = 5;
 
interpret F f as MoveForward(2 ^ -iterations * 300);
interpret + as TurnLeft(120);
interpret - as TurnLeft(-120);
interpret < as StartPolygon(0, 0);
interpret . as RecordPolygonVertex;
interpret > as EndPolygon;
 
rewrite F to f + < . F - . F . > - F + f;
rewrite f to f f;
}
 
process all with SvgRenderer;