summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--models/nutrient-measurement.rkt4
-rw-r--r--models/nutrient-target.rkt4
2 files changed, 4 insertions, 4 deletions
diff --git a/models/nutrient-measurement.rkt b/models/nutrient-measurement.rkt
index fa1171c..3e8213d 100644
--- a/models/nutrient-measurement.rkt
+++ b/models/nutrient-measurement.rkt
@@ -13,9 +13,9 @@
(#:id (or/c #f exact-nonnegative-integer?) #:measured-on (or/c #f string?))
(or/c nutrient-measurement? #f))]
[get-nutrient-measurement-values (-> nutrient-measurement? nutrient-value-hash/c)]
- [get-nutrient-measurement-value (-> nutrient-measurement? nutrient? number?)]
+ [get-nutrient-measurement-value (-> nutrient-measurement? nutrient? (or/c number? #f))]
[get-latest-nutrient-measurement-value (-> nutrient? (or/c number? #f))]
- [get-latest-nutrient-measurement-hash (-> (hash/c nutrient? number?))]
+ [get-latest-nutrient-measurement-hash (-> nutrient-value-hash/c)]
[delete-nutrient-measurement! (-> nutrient-measurement? void?)]))
(require racket/contract
diff --git a/models/nutrient-target.rkt b/models/nutrient-target.rkt
index a19ca6a..ce4d561 100644
--- a/models/nutrient-target.rkt
+++ b/models/nutrient-target.rkt
@@ -13,9 +13,9 @@
#:effective-on (or/c #f string?))
(or/c nutrient-target? #f))]
[get-nutrient-target-values (-> nutrient-target? nutrient-value-hash/c)]
- [get-nutrient-target-value (-> nutrient-target? nutrient? number?)]
+ [get-nutrient-target-value (-> nutrient-target? nutrient? (or/c number? #f))]
[get-latest-nutrient-target-value (-> nutrient? (or/c number? #f))]
- [get-latest-nutrient-target-hash (-> (hash/c nutrient? number?))]
+ [get-latest-nutrient-target-hash (-> nutrient-value-hash/c)]
[delete-nutrient-target! (-> nutrient-target? void?)]))
(require racket/contract
Copyright 2019--2026 Marius PETER