sierpinski 2

mgsloan · Aug 5, 2012 · 6434da1 · 6434da1
1 parent bcd3a37
commit 6434da1
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 1 deletion.
diff --git a/history b/history
@@ -18,5 +18,7 @@ runTurtle $ do { forward 100; right 30; forward 90; }
   ||| overlapAlong (r2 (-20,0)) (octagon 30))
 
 let { s 0 = eqTriangle 20;
-      s n = vcat [s (n-1), centerX $ s (n-1) ||| s (n-1)]
+      s (n+1) = s n
+                ===
+        centerX (s n ||| s n)
     } in s 5
diff --git a/screens/2012-08-05-151237_1280x800_scrot.png b/screens/2012-08-05-151237_1280x800_scrot.png