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

Implementation

++  homo                                                ::  homogenize
  |*  a=(list)
  ^-  $_  =<  $
          |%
            +-  $
              ?:  ?
                ~
              [i=(snag 0 a) t=$]
          --
  a

Comments



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

Clone this wiki locally