From fade8cb3968ba04ad1de5547c145cd723961a241 Mon Sep 17 00:00:00 2001
From: Quentin Leonetti <q.leonetti@gmail.com>
Date: Sat, 20 Jul 2019 20:51:19 +0200
Subject: [PATCH] update array example

---
 examples/arrays.lisp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/examples/arrays.lisp b/examples/arrays.lisp
index e2dbf47..2f99e20 100644
--- a/examples/arrays.lisp
+++ b/examples/arrays.lisp
@@ -19,8 +19,8 @@
   '(stroke 
     (rect 
       (mul %1 10) 
-      (add 50 (mul (sin %1) 40)) 
-      %1
+      (add 250 (mul (sin %1) 250)) 
+      (mul 4 %1)
       (add 20 (mul (cos %1) 50))) 1 "red")
   (range 0 200 5))