diff --git a/examples/arrays.lisp b/examples/arrays.lisp
index c1024b1..2a71a15 100644
--- a/examples/arrays.lisp
+++ b/examples/arrays.lisp
@@ -11,6 +11,14 @@
     (1 2 3 4 5))
 )
 
+(
+  (clear)
+  (map (lambda (a)
+    (stroke (rect (mul a 30) 20 50 50)
+  1 "red"))
+  (range 0 20 5))
+)
+
 (
   (clear) 
   (map (lambda (a)