@@ -1,9 +1,19 @@

 digraph G {

-  splines=ortho;

+  splines=true;

+  rankdir=LR;

   p[label="(PARSE string synthesizer)",shape=box];

-  "READ-EDN" [shape=box];

-  "SYNTHESIZER" [shape=box];

+  "edn string" -> p ;

   p -> "READ-EDN";

-  "READ-EDN" -> SYNTHESIZER;

-  SYNTHESIZER -> p [style=dashed];

+  p -> SYNTHESIZER[style=dashed,constraint=false,tailport=s,headport=s];

+  subgraph cluster_internals {

+    label="cl-edn";

+    color=red;

+    "READ-EDN" [shape=box,group=int];

+    ast[group=int];

+    "SYNTHESIZER" [shape=box,group=int];

+    "READ-EDN" -> ast ;

+    ast -> SYNTHESIZER ;

+  }

+  SYNTHESIZER -> "{| your data here |}";

+  

 }

@@ -4,46 +4,87 @@

 <!-- Generated by graphviz version 2.40.1 (20161225.0304)

  -->

 <!-- Title: G Pages: 1 -->

-<svg width="177pt" height="188pt"

- viewBox="0.00 0.00 177.48 188.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">

-<g id="graph0" class="graph" transform="scale(1 1) rotate(0) translate(4 184)">

+<svg width="854pt" height="147pt"

+ viewBox="0.00 0.00 853.87 147.21" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">

+<g id="graph0" class="graph" transform="scale(1 1) rotate(0) translate(4 143.2063)">

 <title>G</title>

-<polygon fill="#ffffff" stroke="transparent" points="-4,4 -4,-184 173.4805,-184 173.4805,4 -4,4"/>

+<polygon fill="#ffffff" stroke="transparent" points="-4,4 -4,-143.2063 849.8695,-143.2063 849.8695,4 -4,4"/>

+<g id="clust1" class="cluster">

+<title>cluster_internals</title>

+<polygon fill="none" stroke="#ff0000" points="323.9409,-57.2063 323.9409,-131.2063 663.5962,-131.2063 663.5962,-57.2063 323.9409,-57.2063"/>

+<text text-anchor="middle" x="493.7686" y="-116.0063" font-family="Times,serif" font-size="14.00" fill="#000000">cl&#45;edn</text>

+</g>

 <!-- p -->

 <g id="node1" class="node">

 <title>p</title>

-<polygon fill="none" stroke="#000000" points="169.7214,-180 -.2409,-180 -.2409,-144 169.7214,-144 169.7214,-180"/>

-<text text-anchor="middle" x="84.7402" y="-157.8" font-family="Times,serif" font-size="14.00" fill="#000000">(PARSE string synthesizer)</text>

+<polygon fill="none" stroke="#000000" points="296.1819,-101.2063 126.2196,-101.2063 126.2196,-65.2063 296.1819,-65.2063 296.1819,-101.2063"/>

+<text text-anchor="middle" x="211.2007" y="-79.0063" font-family="Times,serif" font-size="14.00" fill="#000000">(PARSE string synthesizer)</text>

 </g>

 <!-- READ&#45;EDN -->

-<g id="node2" class="node">

+<g id="node3" class="node">

 <title>READ&#45;EDN</title>

-<polygon fill="none" stroke="#000000" points="92.2863,-108 5.1941,-108 5.1941,-72 92.2863,-72 92.2863,-108"/>

-<text text-anchor="middle" x="48.7402" y="-85.8" font-family="Times,serif" font-size="14.00" fill="#000000">READ&#45;EDN</text>

+<polygon fill="none" stroke="#000000" points="419.2595,-101.2063 332.1673,-101.2063 332.1673,-65.2063 419.2595,-65.2063 419.2595,-101.2063"/>

+<text text-anchor="middle" x="375.7134" y="-79.0063" font-family="Times,serif" font-size="14.00" fill="#000000">READ&#45;EDN</text>

 </g>

 <!-- p&#45;&gt;READ&#45;EDN -->

-<g id="edge1" class="edge">

+<g id="edge2" class="edge">

 <title>p&#45;&gt;READ&#45;EDN</title>

-<path fill="none" stroke="#000000" d="M48.7402,-143.8314C48.7402,-143.8314 48.7402,-118.4133 48.7402,-118.4133"/>

-<polygon fill="#000000" stroke="#000000" points="52.2403,-118.4132 48.7402,-108.4133 45.2403,-118.4133 52.2403,-118.4132"/>

+<path fill="none" stroke="#000000" d="M296.3483,-83.2063C305.0584,-83.2063 313.7252,-83.2063 321.9574,-83.2063"/>

+<polygon fill="#000000" stroke="#000000" points="322.123,-86.7064 332.1229,-83.2063 322.1229,-79.7064 322.123,-86.7064"/>

 </g>

 <!-- SYNTHESIZER -->

-<g id="node3" class="node">

+<g id="node4" class="node">

 <title>SYNTHESIZER</title>

-<polygon fill="none" stroke="#000000" points="139.8506,-36 29.6298,-36 29.6298,0 139.8506,0 139.8506,-36"/>

-<text text-anchor="middle" x="84.7402" y="-13.8" font-family="Times,serif" font-size="14.00" fill="#000000">SYNTHESIZER</text>

-</g>

-<!-- READ&#45;EDN&#45;&gt;SYNTHESIZER -->

-<g id="edge2" class="edge">

-<title>READ&#45;EDN&#45;&gt;SYNTHESIZER</title>

-<path fill="none" stroke="#000000" d="M61.0989,-71.8314C61.0989,-71.8314 61.0989,-46.4133 61.0989,-46.4133"/>

-<polygon fill="#000000" stroke="#000000" points="64.599,-46.4132 61.0989,-36.4133 57.599,-46.4133 64.599,-46.4132"/>

+<polygon fill="none" stroke="#000000" points="655.6514,-101.2063 545.4306,-101.2063 545.4306,-65.2063 655.6514,-65.2063 655.6514,-101.2063"/>

+<text text-anchor="middle" x="600.541" y="-79.0063" font-family="Times,serif" font-size="14.00" fill="#000000">SYNTHESIZER</text>

 </g>

-<!-- SYNTHESIZER&#45;&gt;p -->

+<!-- p&#45;&gt;SYNTHESIZER -->

 <g id="edge3" class="edge">

-<title>SYNTHESIZER&#45;&gt;p</title>

-<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M116.1541,-36.2377C116.1541,-36.2377 116.1541,-133.9104 116.1541,-133.9104"/>

-<polygon fill="#000000" stroke="#000000" points="112.6542,-133.9103 116.1541,-143.9104 119.6542,-133.9104 112.6542,-133.9103"/>

+<title>p:s&#45;&gt;SYNTHESIZER:s</title>

+<path fill="none" stroke="#000000" stroke-dasharray="5,2" d="M211.2007,-65.2063C211.2007,17.7651 569.2579,21.1682 598.6298,-54.9969"/>

+<polygon fill="#000000" stroke="#000000" points="595.2607,-56.0211 600.541,-65.2063 602.1411,-54.733 595.2607,-56.0211"/>

+</g>

+<!-- edn string -->

+<g id="node2" class="node">

+<title>edn string</title>

+<ellipse fill="none" stroke="#000000" cx="45.2302" cy="-83.2063" rx="45.4616" ry="18"/>

+<text text-anchor="middle" x="45.2302" y="-79.0063" font-family="Times,serif" font-size="14.00" fill="#000000">edn string</text>

+</g>

+<!-- edn string&#45;&gt;p -->

+<g id="edge1" class="edge">

+<title>edn string&#45;&gt;p</title>

+<path fill="none" stroke="#000000" d="M90.5824,-83.2063C98.6715,-83.2063 107.366,-83.2063 116.2472,-83.2063"/>

+<polygon fill="#000000" stroke="#000000" points="116.3315,-86.7064 126.3314,-83.2063 116.3314,-79.7064 116.3315,-86.7064"/>

+</g>

+<!-- ast -->

+<g id="node5" class="node">

+<title>ast</title>

+<ellipse fill="none" stroke="#000000" cx="482.4859" cy="-83.2063" rx="27" ry="18"/>

+<text text-anchor="middle" x="482.4859" y="-79.0063" font-family="Times,serif" font-size="14.00" fill="#000000">ast</text>

+</g>

+<!-- READ&#45;EDN&#45;&gt;ast -->

+<g id="edge4" class="edge">

+<title>READ&#45;EDN&#45;&gt;ast</title>

+<path fill="none" stroke="#000000" d="M419.4499,-83.2063C427.9536,-83.2063 436.7952,-83.2063 445.0725,-83.2063"/>

+<polygon fill="#000000" stroke="#000000" points="445.1875,-86.7064 455.1875,-83.2063 445.1874,-79.7064 445.1875,-86.7064"/>

+</g>

+<!-- {| your data here |} -->

+<g id="node6" class="node">

+<title>{| your data here |}</title>

+<ellipse fill="none" stroke="#000000" cx="768.7329" cy="-83.2063" rx="77.2736" ry="18"/>

+<text text-anchor="middle" x="768.7329" y="-79.0063" font-family="Times,serif" font-size="14.00" fill="#000000">{| your data here |}</text>

+</g>

+<!-- SYNTHESIZER&#45;&gt;{| your data here |} -->

+<g id="edge6" class="edge">

+<title>SYNTHESIZER&#45;&gt;{| your data here |}</title>

+<path fill="none" stroke="#000000" d="M655.6133,-83.2063C663.8765,-83.2063 672.5657,-83.2063 681.303,-83.2063"/>

+<polygon fill="#000000" stroke="#000000" points="681.5593,-86.7064 691.5593,-83.2063 681.5592,-79.7064 681.5593,-86.7064"/>

+</g>

+<!-- ast&#45;&gt;SYNTHESIZER -->

+<g id="edge5" class="edge">

+<title>ast&#45;&gt;SYNTHESIZER</title>

+<path fill="none" stroke="#000000" d="M509.5701,-83.2063C517.2859,-83.2063 526.0437,-83.2063 535.004,-83.2063"/>

+<polygon fill="#000000" stroke="#000000" points="535.1619,-86.7064 545.1619,-83.2063 535.1618,-79.7064 535.1619,-86.7064"/>

 </g>

 </g>

 </svg>