simon/walkmap
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

Fixed comments!

Browse source
This commit is contained in:
Simon Brooke 2020-05-25 12:16:11 +01:00
parent 387d817e9b
commit f49a7495db
No known key found for this signature in database
GPG key ID: A7A4F18D1D4DF987
1 changed files with 1 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
src/walkmap/svg.clj
View file

@ -17,9 +17,6 @@
:dali) :dali)
(defn- facet->svg-poly (defn- facet->svg-poly
;; When we use this version of facet->svg-poly with the Dali renderer, it's
;; still (for the isle_of_man map) 10 times slower than hiccup, also using
;; this version (890.863814 msecs vs 86.904891 msecs
[facet] [facet]
[:polygon [:polygon
{:points (s/join " " (map #(str (:x %) "," (:y %)) (:vertices facet)))}]) {:points (s/join " " (map #(str (:x %) "," (:y %)) (:vertices facet)))}])
@ -32,7 +29,7 @@
(map #(vec (list (:x %) (:y %))) (:vertices facet))))) (map #(vec (list (:x %) (:y %))) (:vertices facet)))))
(defn dali-stl->svg (defn dali-stl->svg
"Format this `stl` as SVG for the `hiccup` renderer on a page with these "Format this `stl` as SVG for the `dali` renderer on a page with these
bounds." bounds."
[stl minx maxx miny maxy] [stl minx maxx miny maxy]
[:dali/page [:dali/page