a # 1 60 R 'z # a adjustdown b;c;d;Lio                                  '
a # a,[1]  '"adjustdown - extend the '|' in report formatting.          '
a # a,[1]  '"from ''the apl handbook of techniques'' copyright 1978, ibm. '
a # a,[1]  '"-extends to row a, the character ''|'' used as a separator   '
a # a,[1]  '" in matrix b.                                              '
a # a,[1]  '"-uses: if index rowindices h                               '
a # a,[1]  ' $(0Zc#1YRd#b[((|a)_1)rowindices z#b;])/0 H Lio#1           '
a # a,[1]  ' $l1 if cK3                                                 '
a # a,[1]  ' d#(`Rd)[I3;]                                               '
a # a,[1]  'l1:z[a;''|''index d]#''|''                                      '
Lfx a