From ba0c41673b7cb024544c5e1ec1638cf2fb1f3725 Mon Sep 17 00:00:00 2001
From: "Kartik K. Agaram" <vc@akkartik.com>
Date: Wed, 23 Jun 2021 01:01:42 -0700
Subject: .

---
 shell/data.limg | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/shell/data.limg b/shell/data.limg
index 4386df7a..6a9b67cb 100644
--- a/shell/data.limg
+++ b/shell/data.limg
@@ -161,7 +161,7 @@
     (circle . [def (circle scr cx cy r clr)
   with (x (0 - r)
         y 0
-        err (2 - (* 2 r))
+        err (2 - r*2)
         continue 1)
     while continue
       (pixel scr cx-x cy+y clr)
@@ -171,10 +171,10 @@
       (set r err)
       when (r <= y)
         ++y
-        err += (1 + (2 * y))
+        err += (y*2 + 1)
       when (or (r > x) (err > y))
         ++x
-        err += (+ 1 (* 2 x))
+        err += (x*2 + 1)
       set continue (x < 0)])
     (ring . [def (ring screen cx cy r0 w clr)
   for r r0 (r < (r0 + w)) ++r
-- 
cgit 1.4.1-2-gfad0