.

2021-06-23 11:05:57 -07:00 · 2021-06-23 11:05:57 -07:00 · a25e4c1ac2
parent f13e3cdfb1
commit a25e4c1ac2
1 changed files with 4 additions and 4 deletions
--- 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)])