This commit is contained in:
Bryce Covert
2019-04-11 08:41:47 -07:00
5 changed files with 28 additions and 4 deletions

View File

@@ -26,3 +26,8 @@
t))
xs))
(defn dollars-0? [amt]
(< -0.001 amt 0.001))
(defn dollars= [amt1 amt2]
(dollars-0? (- amt1 amt2) ))