 (defmethod as-jts :default [_] nil)
 
 (def gml->jts-cache (atom (cache/lu-cache-factory {} :threshold 30000)))
+
 (defmethod as-jts "gml" [obj]
  (when-let [gml (get obj "gml")]
    (if (cache/has? @gml->jts-cache gml)

           [pdok.featured.xslt TransformXSLT]
           [pdok.featured.converters Transformer]
           [com.vividsolutions.jts.geom Geometry]
           [com.vividsolutions.jts.io WKTWriter]))

(def lower-case
  (fnil str/lower-case ""))

      nil)))

(def wkt-writer (WKTWriter.))
(def wkt-reader (WKTReader.))

(defn jts-as-wkt [jts]
  (if-not (nil? jts)
