Hoon tank

Implementation

++  tank  $%  [%leaf p=tape]                            ::
              :-  %palm                                 ::
              $:  p=[p=tape q=tape r=tape s=tape]       ::
                  q=(list tank)                         ::
              ==                                        ::
              :-  %rose                                 ::
              $:  p=[p=tape q=tape r=tape]              ::
                  q=(list tank)                         ::
              ==                                        ::
          ==                                            ::

Comments

---

---

Parts of this document are generated automatically. Edits within the comments section will be preserved.