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

Implementation

++  sa                                                  ::  make a set
  |*  a=(list)
  =>  .(a `_(homo a)`a)
  =+  b=*(set _?>(?=(^ a) i.a))
  (~(gas in b) a)
  ::::::::::::::::::::::::::::::::::::::::::::::::::::::  ::

Comments



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

Clone this wiki locally