outstanding balance and addresses.

This commit is contained in:
Bryce Covert
2018-05-17 19:37:50 -07:00
parent 7b7275f7a4
commit e055a1e120
19 changed files with 351 additions and 98 deletions

14
nm/auto_ap/numeric.clj Normal file
View File

@@ -0,0 +1,14 @@
(ns auto-ap.numeric
(:require [clojure.test :refer :all]))
(deftest num->words-test
(is (= "one dollars" (num->words 1.00)))
(is (= "two dollars" (num->words 2.00)))
(is (= "twelve dollars" (num->words 12.00)))
(is (= "twenty-one dollars" (num->words 21.00)))
(is (= "one hundred and twenty-one dollars" (num->words 121.00)))
(is (= "thirty-five thousand one hundred and twenty-one dollars" (num->words 35121.00)))
(is (= "twelve dollars and thirty-three cents" (num->words 12.33)))
(is (= "ninety-nine cents" (num->words 0.99))))