On 13 May 2014 15:00, Blake McBride <blake1...@gmail.com> wrote: > Here are the functions, examples to follow: > > ∇box[⎕]∇ > [0] z←box x > [1] z←⊂(⊂⍴x),⊂,x > > ∇unbox[⎕]∇ > [0] z←unbox x > [1] z←(⊃x[⎕IO])⍴⊃(x←⊃x)[⎕IO+1]
FYI you can write your box as: z←⊂(⍴x)(,x) and unbox as: (s r)←⊃x ⋄ z←s⍴r Jay.
