[Racket] Ferti hydroponic nutrient solver, redux.

Tighten up module requirements.

Commit
0bb6e30da121596184ae281e9e4dddaa6ccf7009
Author
Marius Peter <dev@marius-peter.com>
Author date
Committer
Marius Peter <dev@marius-peter.com>
Committer date
Changed files
models/crop-requirement.rkt
index bf61d0d7..803578c8 100644..100644
@@ -16,8 +16,7 @@
16 16 [average-crop-requirement-nutrient-values
17 17 (-> (hash/c crop-requirement? (between/c 0 100)) nutrient-value-hash/c)]))
18 18
19 Removed: (require racket/contract
20 Removed: db
19 Added: (require db
21 20 sql
22 21 "../db/conn.rkt"
23 22 "nutrient.rkt"
models/crop-rotation.rkt
index cb6832ec..3b0a69dc 100644..100644
@@ -12,8 +12,7 @@
12 12 [get-latest-crop-rotation (-> (or/c crop-rotation? #f))]
13 13 [delete-crop-rotation! (-> crop-rotation-or-id/c void?)]))
14 14
15 Removed: (require racket/contract
16 Removed: db
15 Added: (require db
17 16 sql
18 17 "../db/conn.rkt"
19 18 "crop-requirement.rkt"
models/crop.rkt
index 8c50c14d..b37ec47f 100644..100644
@@ -10,8 +10,7 @@
10 10 [update-crop! (->* (db-id?) (#:name string?) (or/c crop? #f))]
11 11 [delete-crop! (-> db-id? void?)]))
12 12
13 Removed: (require racket/contract
14 Removed: db
13 Added: (require db
15 14 sql
16 15 "../db/conn.rkt"
17 16 "utils.rkt")
models/fertilizer-product.rkt
index c5793541..a002ad4f 100644..100644
@@ -18,8 +18,7 @@
18 18 [update-fertilizer-product! (-> fertilizer-product? void?)]
19 19 [delete-fertilizer-product! (-> fertilizer-product-or-id/c void?)]))
20 20
21 Removed: (require racket/contract
22 Removed: db
21 Added: (require db
23 22 sql
24 23 "../db/conn.rkt"
25 24 "nutrient.rkt"
models/nutrient-measurement.rkt
index a9904d76..1ab451d6 100644..100644
@@ -18,8 +18,7 @@
18 18 [get-latest-nutrient-measurement-values (-> nutrient-value-hash/c)]
19 19 [delete-nutrient-measurement! (-> nutrient-measurement-or-id/c void?)]))
20 20
21 Removed: (require racket/contract
22 Removed: db
21 Added: (require db
23 22 sql
24 23 "../db/conn.rkt"
25 24 "nutrient.rkt"
models/nutrient.rkt
index 397e1e1a..0cbbe849 100644..100644
@@ -16,8 +16,7 @@
16 16 (or/c nutrient? #f))]
17 17 [delete-nutrient! (-> nutrient? void?)]))
18 18
19 Removed: (require racket/contract
20 Removed: db
19 Added: (require db
21 20 sql
22 21 "../db/conn.rkt"
23 22 "utils.rkt")
models/user.rkt
index 526ea202..9c7f623e 100644..100644
@@ -7,8 +7,7 @@
7 7 user-role
8 8 (contract-out [get-current-user (-> (or/c user? #f))]))
9 9
10 Removed: (require racket/contract
11 Removed: db
10 Added: (require db
12 11 sql
13 12 "../db/conn.rkt")
14 13