simplify
This commit is contained in:
parent
aae7ad038b
commit
d2e6f920f3
@ -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)
|
||||
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user