|
@@ -27,7 +27,7 @@
|
|
|
|
|
|
|
|
(def parse-variables (memoize (fn [expression]
|
|
(def parse-variables (memoize (fn [expression]
|
|
|
(as-> (js->clj (.parse mathjs (replace-ranges-in-expression expression))) $
|
|
(as-> (js->clj (.parse mathjs (replace-ranges-in-expression expression))) $
|
|
|
- (.filter $ #(true? (.-isSymbolNode %)))
|
|
|
|
|
|
|
+ (.filter $ #(true? (.-isSymbolNode ^js %)))
|
|
|
(map #(.-name %) $)
|
|
(map #(.-name %) $)
|
|
|
(map #(.toUpperCase %) $)
|
|
(map #(.toUpperCase %) $)
|
|
|
(filter #(re-matches #"[A-Z]+[0-9]+" %) $)))))
|
|
(filter #(re-matches #"[A-Z]+[0-9]+" %) $)))))
|