diff --git a/history b/history
index 0de17bc..474a259 100644
--- 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
new file mode 100644
index 0000000..f780d5e
Binary files /dev/null and b/screens/2012-08-05-151237_1280x800_scrot.png differ