diff --git a/example/dots/examplehsuRqc.svg b/example/dots/examplehsuRqc.svg new file mode 100644 index 0000000..8b8af78 --- /dev/null +++ b/example/dots/examplehsuRqc.svg @@ -0,0 +1,75 @@ + + + + + + +G + + + +node0 + +a:1 b:1 + + + +node0->node0 + +{b} + + + +node2 + +a:0 b:1 + + + +node0->node2 + + +{a} + + + +node1 + +a:1 b:0 + + + +node1->node1 + +{a}{b} + + + +node2->node2 + +{a}{b} + + + +node3 + +a:0 b:0 + + + +node3->node1 + + +{a} + + + +node3->node3 + +{b} + + + diff --git a/example/dots/examplei4we6j.svg b/example/dots/examplei4we6j.svg index d8d00fc..3ee398c 100644 --- a/example/dots/examplei4we6j.svg +++ b/example/dots/examplei4we6j.svg @@ -4,11 +4,11 @@ - + G - + node0 @@ -19,7 +19,7 @@ node0->node0 -a +{a} @@ -32,7 +32,7 @@ node0->node2 -b +{b} @@ -44,7 +44,7 @@ node0->node4 -c +{c} @@ -57,13 +57,13 @@ node1->node0 -a +{a} node1->node1 -b +{b} @@ -75,13 +75,13 @@ node1->node7 -c +{c} node2->node2 -b +{b} @@ -93,7 +93,7 @@ node2->node5 -c +{c} @@ -106,7 +106,7 @@ node2->node6 -a +{a} @@ -118,66 +118,66 @@ node3->node3 -a +{a} node3->node6 -c +{c} node3->node7 -b +{b} node4->node4 -b +{b}{a} node5->node3 -a +{a} node5->node4 -b +{b} node6->node1 -b +{b} node6->node6 -a +{a} node7->node4 -a +{a} node7->node7 -b +{b} diff --git a/example/example.org b/example/example.org index e83e88e..8e95eec 100644 --- a/example/example.org +++ b/example/example.org @@ -370,6 +370,7 @@ tab (dotit (ppsg (build-full-boolean-state-graph bn-asyn)))) #+END_SRC + #+BEGIN_SRC dot :file dots/examplem7LpTs.svg :results raw drawer :cmd sfdp :noweb yes <> #+END_SRC @@ -444,11 +445,28 @@ tab [[file:dots/examplei4we6j.svg]] :END: -* Roadmap - - [ ] fix the pretty printing of labelled graphs - - [ ] commend fallback-dds-build-state-graph-edges - - [ ] check what happens if two different modalities should be - attached to the same edge + For some networks, a single transition between two states may be + due to different modalities. Consider the following network: + #+NAME: bn2 + | a | (not b) | + | b | b | + + #+NAME: bn2-sgr + #+BEGIN_SRC racket :results silent :var input-bn=munch-table(bn2) +(let* ([bn (nn (unorg input-bn))] + [bn-asyn (make-asyn-dynamics bn)]) + (dotit (ppsgb (build-full-boolean-state-graph-annotated bn-asyn)))) + #+END_SRC + + #+BEGIN_SRC dot :file dots/examplehsuRqc.svg :results raw drawer :cmd dot :noweb yes +<> + #+END_SRC + + #+RESULTS: + :RESULTS: + [[file:dots/examplehsuRqc.svg]] + :END: + * Local Variables :noexport: # Local Variables: