diff --git a/example/example.org b/example/example.org
index 0277927..ee42521 100644
--- a/example/example.org
+++ b/example/example.org
@@ -1109,7 +1109,11 @@ tab
 
    #+NAME: tbfs-nots-sg
    #+BEGIN_SRC racket :results silent drawer :var tbfs-nots=munch-sexp(tbfs-nots)
-(dotit (build-tbn-state-graph (read-org-tbn tbfs-nots)))
+((compose
+  dotit
+  build-tbn-state-graph
+  read-org-tbn)
+ tbfs-nots)
    #+END_SRC
 
    #+BEGIN_SRC dot :file dots/examplew206DH.svg :results raw drawer :cmd sfdp :noweb yes
@@ -1212,7 +1216,12 @@ tab
 
    #+NAME: tbfs-nots-ig-pp
    #+BEGIN_SRC racket :results silent drawer :var tbfs-nots=munch-sexp(tbfs-nots)
-(dotit (pretty-print-tbn-interaction-graph (tbn-interaction-graph (read-org-tbn tbfs-nots))))
+((compose
+  dotit
+  pretty-print-tbn-interaction-graph
+  tbn-interaction-graph
+  read-org-tbn)
+ tbfs-nots)
    #+END_SRC
 
    #+BEGIN_SRC dot :file dots/exampleQLHMVK.svg :results raw drawer :cmd dot :noweb yes