diff options
| -rw-r--r-- | models/crop-requirement.rkt | 2 |
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)) |