

set maxobjects 1000000
sierp
rule sierp md 8 {
triang
{s 0.5 0.5 1.05 h 15 sat 0.7}sierp
{x 7.5 s 0.5 0.5 1.05 h 15}sierp
{x 3.75 y 6.382 s 0.5 0.5 1.05 h 15}sierp}
rule triang {
ligne
{rz 60}ligne
{x 15 rz 120}ligne}
rule ligne md 16{
{hue 175}box
{x 1} ligne}