Modifié le 31 Décembre 2007 à 15 h 01

octogone_sierpinski.cfdg
#@AUTEUR: Thomas Labarussias

startshape sierpinski

rule hexagone
{
8*{r 45} SQUARE{s 0.925 0.383}
}

rule HUIT
{
hexagone {x 1.1165 y 0.4625}
hexagone {x 1.1165 y -0.4625}
hexagone {x -1.1165 y 0.4625}
hexagone {x -1.1165 y -0.4625}
hexagone {x 0.4625 y 1.1165}
hexagone {x -0.4625 y 1.1165}
hexagone {x 0.4625 y -1.1165}
hexagone {x -0.4625 y -1.1165}
}

rule BIG_HUIT
{
HUIT {x 3.812 y 1.579}
HUIT {x 3.812 y -1.579}
}

rule VERY_BIG_HUIT
{
4* {r 90} BIG_HUIT{}
}

rule VERY_BIG_HUIT_2
{
VERY_BIG_HUIT{x 13.05 y 5.42}
VERY_BIG_HUIT{x 13.05 y -5.42}
}

rule VERY_BIG_HUIT_3
{
4*{r 90} VERY_BIG_HUIT_2{}
}

rule VERY_BIG_HUIT_4
{
VERY_BIG_HUIT_3 {x 44.7 y 18.5}
VERY_BIG_HUIT_3 {x 44.7 y -18.5}
}

rule sierpinski
{
4*{r 90}VERY_BIG_HUIT_4{}
}