From c72d21a2557d5cf6fe91a868aac8d37639ea4eaa Mon Sep 17 00:00:00 2001
From: Charles Comstock <dgtized@gmail.com>
Date: Sun, 28 Jan 2024 23:59:32 -0600
Subject: [PATCH] short-circuit the qdg/draw routine for triangle

---
 src/shimmers/common/quil_draws_geom.cljc | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/shimmers/common/quil_draws_geom.cljc b/src/shimmers/common/quil_draws_geom.cljc
index 0eed6092a..e0a689a9b 100644
--- a/src/shimmers/common/quil_draws_geom.cljc
+++ b/src/shimmers/common/quil_draws_geom.cljc
@@ -45,8 +45,8 @@
 
 (extend-type Triangle2
   QuilDrawGeom
-  (draw [s]
-    (apply cq/draw-triangle (:points s)))
+  (draw [{[[ax ay] [bx by] [cx cy]] :points}]
+    (q/triangle ax ay bx by cx cy))
   (contour-draw [s] (draw-contour (:points s))))
 
 (extend-type Polygon2