Hexagonal Gosper curve (polygon)

Hexagonal Gosper curve (polygon)

Source code

1
2
3
4
5
6
7
8
9
10
11
12
13
14
lsystem HexagonalGosperCurveAsPolygon extends Polygons {
 
set symbols axiom = <(0, 0). +(90) F(150). +(-90) F(50). +(-76.4) L +(76.4) F(50). +(-90) F(150). >;
set iterations = 4;
 
interpret F R L as MoveForward(8);
interpret + as TurnLeft(60);
interpret - as TurnLeft(-60);
 
rewrite L to L. + R. + + R. - L. - - L. L. - R. +;
rewrite R to - L. + R. R. + + R. + L. - - L. - R.;
}
 
process all with SvgRenderer;