outstanding balance and addresses.
This commit is contained in:
14
nm/auto_ap/numeric.clj
Normal file
14
nm/auto_ap/numeric.clj
Normal 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))))
|
||||
Reference in New Issue
Block a user