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

Implementation

++  vial                                                ::  vane tools
  |=  but=type
  ^-  vile
  =+  pal=|=(a=@t ^-(type (~(play ut but) (vice a))))
  :*  bet=(pal '[*(unit writ) *wire *duct *curd]')
      nim=(pal '[*ship @tas *ship @tas *coin *path]')
      vin=(pal '[@da @ |+(* *(unit))]')
      hoz=(pal '[@da *duct]')
      viz=(pal '*vase')
  ==

Comments



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

Clone this wiki locally