summaryrefslogtreecommitdiff
path: root/models
diff options
context:
space:
mode:
Diffstat (limited to 'models')
-rw-r--r--models/crop-requirement.rkt2
1 files changed, 1 insertions, 1 deletions
diff --git a/models/crop-requirement.rkt b/models/crop-requirement.rkt
index 0b31119..fb14777 100644
--- a/models/crop-requirement.rkt
+++ b/models/crop-requirement.rkt
@@ -148,7 +148,7 @@
(define (average-crop-requirement-nutrient-values mix)
(for/fold ([acc (hash)]) ([pair (in-list mix)])
(match-define (cons crop-requirement percentage) pair)
- (define weight (/ percentage 100.0))
+ (define weight (/ percentage 100))
(for/fold ([acc acc])
([(nutrient value) (in-hash (crop-requirement-nutrient-values crop-requirement))])
(define contribution (* value weight))
Copyright 2019--2026 Marius PETER