Hoon peg

Implementation

++  peg                                                 ::  tree connect
  ~/  %peg
  |=  [a=@ b=@]
  ^-  @
  ?-  b
    1   a
    2   (mul a 2)
    3   +((mul a 2))
    *   (add (mod b 2) (mul $(b (div b 2)) 2))
  ==

Comments

---

---

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