a # 1 60 R ' x#d struct a ' a # a,[1] '"d is desired rank (dimensions) ' a # a,[1] ' x#((_d)Y(dR1),Ra)Ra ' a # a,[1] ' $0 ' a # a,[1] '"struct - used in e.g. conform. ' a # a,[1] '"from ''the apl handbook of techniques'' copyright 1978, ibm. ' Lfx a