diff options
Diffstat (limited to 'examples/graftals/Sierpinski.gf')
| -rw-r--r-- | examples/graftals/Sierpinski.gf | 14 |
1 files changed, 0 insertions, 14 deletions
diff --git a/examples/graftals/Sierpinski.gf b/examples/graftals/Sierpinski.gf deleted file mode 100644 index c85d274f4..000000000 --- a/examples/graftals/Sierpinski.gf +++ /dev/null @@ -1,14 +0,0 @@ -concrete Sierpinski of Graftal = {
-lincat N = {a : Str; b : Str} ;
-lincat S = {s : Str} ;
-
-lin z = {a = A; b = B} ;
-lin s x = {a = x.b ++ R ++ x.a ++ R ++ x.b; b =x.a ++ L ++ x.b ++ L ++ x.a} ;
-lin c x = {s = "newpath 300 550 moveto" ++ x.a ++ "stroke showpage"} ;
-
-oper A : Str = "0 2 rlineto" ;
-oper B : Str = "0 2 rlineto" ;
-oper L : Str = "+60 rotate" ;
-oper R : Str = "-60 rotate" ;
-
-}
\ No newline at end of file |
