networks: Don't use tabulate-boolean-network.
This commit is contained in:
parent
e4751c6ed2
commit
b38adc89cf
1 changed files with 1 additions and 1 deletions
|
@ -1034,7 +1034,7 @@
|
||||||
(check-equal? (tabulate-state/boolean f '(x1 x2) #:headers #f)
|
(check-equal? (tabulate-state/boolean f '(x1 x2) #:headers #f)
|
||||||
'((#f #f #f) (#f #t #f) (#t #f #t) (#t #t #t)))
|
'((#f #f #f) (#f #t #f) (#t #f #t) (#t #t #t)))
|
||||||
(define bn (random-boolean-network/vars 3))
|
(define bn (random-boolean-network/vars 3))
|
||||||
(check-equal? (tabulate-boolean-network bn)
|
(check-equal? (tabulate-network bn)
|
||||||
'((x0 x1 x2 f-x0 f-x1 f-x2)
|
'((x0 x1 x2 f-x0 f-x1 f-x2)
|
||||||
(#f #f #f #f #t #f)
|
(#f #f #f #f #t #f)
|
||||||
(#f #f #t #t #f #f)
|
(#f #f #t #t #f #f)
|
||||||
|
|
Loading…
Reference in a new issue