scolobb/dds
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

networks, update: Don't talk about Boolean networks.

Browse source
This commit is contained in:
Sergiu Ivanov 2020-02-23 00:05:04 +01:00
parent fbef580a01
commit cf676028d3
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
networks.rkt
View file

@ -60,12 +60,12 @@
;;; Given a state s updates all the variables from xs. This ;;; Given a state s updates all the variables from xs. This
;;; corresponds to a parallel mode. ;;; corresponds to a parallel mode.
(define (update bn ; the Boolean network (define (update n ; the network
s ; the state to operate on s ; the state to operate on
xs) ; the variables to update xs) ; the variables to update
(let ([new-s (hash-copy s)]) (let ([new-s (hash-copy s)])
(for ([x xs]) (for ([x xs])
(let ([f (hash-ref bn x)]) (let ([f (hash-ref n x)])
(hash-set! new-s x (f s)))) (hash-set! new-s x (f s))))
new-s)) new-s))