diff --git a/networks.rkt b/networks.rkt
index 426a91a..a59b791 100644
--- a/networks.rkt
+++ b/networks.rkt
@@ -290,8 +290,8 @@
     (define bn (network-form->network
                 (network-form (hash 'a '(and a b)
                                     'b '(not b))
-                              (hash 'a (#f #t)
-                                    'b (#f #t)))))
+                              (hash 'a '(#f #t)
+                                    'b '(#f #t)))))
     (define s (make-state '((a . #t) (b . #t))))
     (check-equal? ((hash-ref (network-functions bn) 'a) s) #t)))