urbit/tree-gen/tree-include.hook

/+    tree, react
/=    body    /:  /===    /%    /elem/
/=    snip    /:  /===    /%    /snip/
/=    meta    /:  /===    /%    /front/
/=    sect    /:  /===    /%    /index/
!:
^-    tree-include
=+  rj=react-to-json:react
=+  fj=|=(atr+(map span span) [%o (~(run by atr) |=(a+span s/a))])
=+  ij=(map-to-json:tree |=(a+path (crip (spud a))) |=(a+marl [%a (turn a rj)]))
[(rj body) (rj /h1 hed.snip) (rj /div tal.snip) (fj meta) (ij sect)]