This commit is contained in:
Bryce Covert
2019-04-02 19:09:40 -07:00
parent 4e72c00895
commit a50239974b
4 changed files with 29 additions and 3 deletions

View File

@@ -17,3 +17,10 @@
(conj xs x)))
[]
existing))
(defn dollars-0? [amt]
(< -0.001 amt 0.001))
(defn dollars= [amt1 amt2]
(dollars-0? (- amt1 amt2) ))