[Racket] Ferti hydroponic nutrient solver, redux.
Remove redundant float.
models/crop-requirement.rkt
@@ -148,7 +148,7 @@
148
148
(define (average-crop-requirement-nutrient-values mix)
149
149
(for/fold ([acc (hash)]) ([pair (in-list mix)])
150
150
(match-define (cons crop-requirement percentage) pair)
151
Removed:
(define weight (/ percentage 100.0))
151
Added:
(define weight (/ percentage 100))
152
152
(for/fold ([acc acc])
153
153
([(nutrient value) (in-hash (crop-requirement-nutrient-values crop-requirement))])
154
154
(define contribution (* value weight))