[Racket] Ferti hydroponic nutrient solver, redux.
Introduce utils module.
Need a much better name than that.
models/utils.rkt
@@ -0,0 +1,11 @@
1
Added:
#lang racket/base
2
Added:
3
Added:
(provide db-id?
4
Added:
insert-id)
5
Added:
6
Added:
(require db)
7
Added:
8
Added:
(define db-id? exact-nonnegative-integer?)
9
Added:
10
Added:
(define (insert-id query)
11
Added:
(cdr (assoc 'insert-id (simple-result-info query))))