Regularised the calling signature of the calculator functions.
This commit is contained in:
parent
37689df3e2
commit
91343b9c10
3 changed files with 38 additions and 30 deletions
|
|
@ -8,7 +8,7 @@
|
|||
(let [expected 13.7
|
||||
temperature 20
|
||||
rel-humidity 50
|
||||
actual (wet-bulb-temperature temperature rel-humidity)]
|
||||
actual (wet-bulb-temperature :temperature temperature :relative-humidity rel-humidity)]
|
||||
(println (format "Expected: %s; actual: %s" expected actual))
|
||||
(is (< (abs (- expected actual)) 0.001))))
|
||||
|
||||
|
|
@ -17,7 +17,7 @@
|
|||
max-expected 33
|
||||
temperature 37
|
||||
rel-humidity 70
|
||||
actual (wet-bulb-temperature temperature rel-humidity)]
|
||||
actual (wet-bulb-temperature :temperature temperature :relative-humidity rel-humidity)]
|
||||
(println (format "Expected: %s...%s; actual: %s" min-expected max-expected actual))
|
||||
(is (< min-expected actual max-expected)))
|
||||
|
||||
|
|
@ -25,7 +25,7 @@
|
|||
max-expected 36
|
||||
temperature 39.7
|
||||
rel-humidity 70
|
||||
actual (wet-bulb-temperature temperature rel-humidity)]
|
||||
actual (wet-bulb-temperature :temperature temperature :relative-humidity rel-humidity)]
|
||||
(println (format "Expected: %s...%s; actual: %s" min-expected max-expected actual))
|
||||
(is (< min-expected actual max-expected)))
|
||||
|
||||
|
|
@ -34,7 +34,7 @@
|
|||
max-expected 34
|
||||
temperature 40
|
||||
rel-humidity 60
|
||||
actual (wet-bulb-temperature temperature rel-humidity)]
|
||||
actual (wet-bulb-temperature :temperature temperature :relative-humidity rel-humidity)]
|
||||
(println (format "Expected: %s...%s; actual: %s" min-expected max-expected actual))
|
||||
(is (< min-expected actual max-expected)))
|
||||
|
||||
|
|
@ -42,6 +42,6 @@
|
|||
max-expected 35
|
||||
temperature 51
|
||||
rel-humidity 30
|
||||
actual (wet-bulb-temperature temperature rel-humidity)]
|
||||
actual (wet-bulb-temperature :temperature temperature :relative-humidity rel-humidity)]
|
||||
(println (format "Expected: %s...%s; actual: %s" min-expected max-expected actual))
|
||||
(is (< min-expected actual max-expected)))))
|
||||
(is (< min-expected actual max-expected)))))
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue