a # 1 60 R ' z#numblankcols a ' a # a,[1] ' a#&`/'' ''=Fmatrix a ' a # a,[1] ' z#(Ra)|(_Lio)+(aI0),(`Oa)I0 ' a # a,[1] ' $0 ' a # a,[1] '"numblankcols - counts blank columns at sides of structure ' a # a,[1] '"from ''the apl handbook of techniques'' copyright 1978, ibm. ' a # a,[1] '"-returns a two-element vector representing columns of ' a # a,[1] '" successive blanks on the left and right side of structure.' Lfx a