diff --git a/networks.rkt b/networks.rkt index 6b34c5f..9e4c414 100644 --- a/networks.rkt +++ b/networks.rkt @@ -60,12 +60,12 @@ ;;; Given a state s updates all the variables from xs. This ;;; corresponds to a parallel mode. -(define (update bn ; the Boolean network +(define (update n ; the network s ; the state to operate on xs) ; the variables to update (let ([new-s (hash-copy s)]) (for ([x xs]) - (let ([f (hash-ref bn x)]) + (let ([f (hash-ref n x)]) (hash-set! new-s x (f s)))) new-s))