abd8097693a4

Remove points
[view raw] [browse files]
author Steve Losh <steve@stevelosh.com>
date Tue, 06 Mar 2018 22:40:37 -0500
parents 148a6a1cc9eb
children cb69666ad32f
branches/tags (none)
files src/looms/005-simple-triangulations.lisp

Changes

--- a/src/looms/005-simple-triangulations.lisp	Tue Mar 06 22:40:20 2018 -0500
+++ b/src/looms/005-simple-triangulations.lisp	Tue Mar 06 22:40:37 2018 -0500
@@ -13,7 +13,7 @@
 
 (defun convert (points)
   (append
-    (map 'list #'convert-point points)
+    ;; (map 'list #'convert-point points)
     (map 'list #'convert-triangle (triangulate points))))
 
 (defun triangulate (points)