diff --git a/arvo/hoon.hoon b/arvo/hoon.hoon
index 3b93f66b3b..ecf693f3c5 100644
--- a/arvo/hoon.hoon
+++ b/arvo/hoon.hoon
@@ -8039,19 +8039,6 @@
               ?^  zem
                 :+  %&  [`axe lon] 
                 [%| (peg 2 p.u.zem) [[ref(p.q %gold) q.u.zem] ~ ~]]
-              =+  foo=$(ref p.ref, axe (peg axe 3))
-              =-  ?:  |(?=($| -.foo) =(foo bar))
-                    foo
-                  ::  ~&  [%old foo]
-                  ::  ~&  [%new bar]
-                  ~&  [%ref ref]
-                  =+  ^-  sax/axis
-                      |-  ^-  axis
-                      ?~  p.p.foo  1 
-                      (peg $(p.p.foo t.p.p.foo) ?~(i.p.p.foo 1 u.i.p.p.foo))
-                  ~&  [%foo-axis vet sax (cap sax) (mas sax) (park(sut ref) way sax) way p.q.ref]
-                  foo
-              ^=  bar
               =+  ^-  {sam/? con/?}
                   ?:  ?=($gold p.q.ref)  [& &]
                   ?-  way
diff --git a/arvo/zuse.hoon b/arvo/zuse.hoon
index 7660fe6a9d..c442333b78 100644
--- a/arvo/zuse.hoon
+++ b/arvo/zuse.hoon
@@ -82,7 +82,7 @@
         ?~  pon  !!
         (out.s.u.pon (exp.s.u.pon q.r.u.pon (sit.s.u.pon a)))
       --
-  |%
+  |%                                                    ::  opaque object
   ++  as
     =>  |%
         ++  haul                                        ::  revealing haul
@@ -204,7 +204,8 @@
           =+  b=((hard {p/@ q/@}) (cue a))
           ..nu(mos (mul p.b q.b), pon [~ (ersa p.b q.b)])
     --
-  --
+  --                                                    ::
+:: 
 ++  bruw                                                ::  create keypair
   |=  {a/@ b/@}                                         ::  width seed
   ^-  acru
@@ -1560,7 +1561,7 @@
              |%  ++  pit  |+({a/@ b/@} ^?(..nu))        ::  from [width seed]
                  ++  nol  |+(a/@ ^?(..nu))              ::  from naked ring
                  ++  com  |+(a/@ ^?(..nu))              ::  from naked pass
-             --                                          ::
+             --                                         ::
           --                                            ::
 ++  aeon  @ud                                          ::
 ++  agon  (map {p/ship q/desk} {p/@ud q/@ud r/waks})    ::  mergepts