Hoon slum

Jump to bottom Edit New page

Adam Bliss edited this page Oct 25, 2013 · 1 revision

Implementation

++  slum
  |=  [vax=vase wad=(map term vase)]  ^-  vase
  ?-  wad
    ~        vax
    [* ~ ~]  [[%cell p.vax [%face p.n.wad p.q.n.wad]] [q.vax q.q.n.wad]]
    [* ~ *]  $(wad [n.wad ~ ~], vax $(wad r.wad))
    [* * ~]  $(wad [n.wad ~ ~], vax $(wad l.wad))
    [* * *]  $(wad [n.wad ~ r.wad], vax $(wad l.wad))
  ==

Comments

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

Hoon
- Functions

Clone this wiki locally