[Racket] Ferti hydroponic nutrient solver, redux.
Increase variable naming clarity.
models/nutrient.rkt
@@ -54,10 +54,10 @@
54
54
;; READ
55
55
56
56
(define (get-nutrients)
57
Removed:
(for/list ([(id* name* formula*)
57
Added:
(for/list ([(id name formula)
58
58
(in-query (current-conn)
59
59
(select id canonical_name formula #:from nutrients #:order-by id #:asc))])
60
Removed:
(nutrient id* name* formula*)))
60
Added:
(nutrient id name formula)))
61
61
62
62
(define (get-nutrient #:id [id #f] #:name [name #f] #:formula [formula #f])
63
63
(define (where-expr)