about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorKartik Agaram <vc@akkartik.com>2021-06-23 11:05:57 -0700
committerKartik Agaram <vc@akkartik.com>2021-06-23 11:05:57 -0700
commita25e4c1ac2f135b5b76508c6bd5cd2d4edd73c49 (patch)
tree8c3ef08df3c7bac1c9ef72e77bfea2d2bb062e50
parentf13e3cdfb16e28791ef2ff01dc16ddb5651cbb03 (diff)
downloadmu-a25e4c1ac2f135b5b76508c6bd5cd2d4edd73c49.tar.gz
.
-rw-r--r--shell/data.limg8
1 files changed, 4 insertions, 4 deletions
diff --git a/shell/data.limg b/shell/data.limg
index 6a9b67cb..2372545a 100644
--- a/shell/data.limg
+++ b/shell/data.limg
@@ -171,16 +171,16 @@
       (set r err)
       when (r <= y)
         ++y
-        err += (y*2 + 1)
+        err += (2*y + 1)
       when (or (r > x) (err > y))
         ++x
-        err += (x*2 + 1)
+        err += (2*x + 1)
       set continue (x < 0)])
     (ring . [def (ring screen cx cy r0 w clr)
-  for r r0 (r < (r0 + w)) ++r
+  for r r0 (r < r0+w) ++r
     (circle screen cx cy r clr)])
     (Greys . [define Greys
-  (map1 (fn(n) (n + 15))
+  (map1 (fn(n) n+15)
         (seq 16))])
     (Pinks . [define Pinks '(84 85 59 60 61
                13 36 37 5 108)])