simplify

2025-12-09 06:20:28 -10:00
parent aae7ad038b
commit d2e6f920f3
1 changed files with 3 additions and 3 deletions
@@ -45,7 +45,7 @@
                     [[cx cy] [dx dy]] [a b]]
                 (and (not (some #(intersect? [a b] %) segments))
                      (not (some #(intersect? [[cx dy] [dx cy]] %) segments)))))) ;; check reverse diaganol too
-     (sort-by (partial apply area))
-     last
-     (apply area))
+     (map (partial apply area))
+     sort
+     last)