functions: Define apply-tbf using define.
I forgot to rewrite that from define/contract when I added the out contract to the module exports.
This commit is contained in:
parent
dfe8766424
commit
db42e20f1c
1 changed files with 1 additions and 2 deletions
|
@ -253,8 +253,7 @@
|
|||
;;; Applying a TBF consists in multiplying the weights by the
|
||||
;;; corresponding inputs and comparing the sum of the products to the
|
||||
;;; threshold.
|
||||
(define/contract (apply-tbf tbf inputs)
|
||||
(-> tbf? (vectorof (or/c 0 1)) (or/c 0 1))
|
||||
(define (apply-tbf tbf inputs)
|
||||
(any->01
|
||||
(>
|
||||
;; The scalar product between the inputs and the weights
|
||||
|
|
Loading…
Reference in a new issue