∇TEST
[1] ABC
[2] DEF
[3] ⍝ GHI
[4] JKL
[5] EN1: MNO
[6] ∇

      x←⎕CR 'TEST'
      x
TEST
ABC
DEF
⍝ GHI
JKL
EN1: MNO
      ⎕IO
1
      x[2;1]←' '
      x
TEST
 BC
DEF
⍝ GHI
JKL
EN1: MNO
      ⎕FX x
TEST
      ∇TEST[⎕]∇
    ∇
[0]   TEST
[1]    BC
[2]   DEF
[3]  ⍝ GHI
[4]   JKL
[5]  EN1: MNO
    ∇
      ⎕CR 'TEST'
TEST
 BC
DEF
⍝ GHI
JKL
EN1: MNO




⎕FX should left strip each line of the matrix before it converts the matrix
back to a function.  I have verified this with IBM APL2.

Thanks.

Blake

Reply via email to