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 7d7b5aa..0b31119 100644
--- a/models/crop-requirement.rkt
+++ b/models/crop-requirement.rkt
@@ -152,4 +152,4 @@
(for/fold ([acc acc])
([(nutrient value) (in-hash (crop-requirement-nutrient-values crop-requirement))])
(define contribution (* value weight))
- (hash-update acc nutrient (λ (old) (+ old contribution)) (λ () contribution)))))
+ (hash-update acc nutrient (λ (old) (+ old contribution)) 0))))
Copyright 2019--2026 Marius PETER