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

networks: Make network and network-form transparent.

Browse source
This commit is contained in:
Sergiu Ivanov 2020-11-22 22:38:45 +01:00
parent ff6fa2c88b
commit eb3e851a9d
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

@ -183,7 +183,7 @@
;;; The domain mapping does not have to assign domains to all ;;; The domain mapping does not have to assign domains to all
;;; variables (e.g., it may be empty), but in this case the functions ;;; variables (e.g., it may be empty), but in this case the functions
;;; which need to know the domains will not work. ;;; which need to know the domains will not work.
(struct network (functions domains)) (struct network (functions domains) #:transparent)
;;; Builds a network from a given hash table assigning functions to ;;; Builds a network from a given hash table assigning functions to
;;; variables by attributing Boolean domains to every variable. ;;; variables by attributing Boolean domains to every variable.
@ -264,7 +264,7 @@
;;; The domain mapping does not have to assign domains to all ;;; The domain mapping does not have to assign domains to all
;;; variables (e.g., it may be empty), but in this case the functions ;;; variables (e.g., it may be empty), but in this case the functions
;;; which need to know the domains will not work. ;;; which need to know the domains will not work.
(struct network-form (forms domains)) (struct network-form (forms domains) #:transparent)
;;; Build an update function from an update function form. ;;; Build an update function from an update function form.
(define (update-function-form->update-function form) (define (update-function-form->update-function form)