a # 1 61 R ' m#v2m v;Lio                                                 '
a # a,[1]  ' Lio#1                                                       '
a # a,[1]  ' m#(Rm)R(,m#mJ.ZIS/0,m#m_1+0,-1Um#m/IRm)\(~m#v=`c`r)/v#v,`c`r'
a # a,[1]  ' $0                                                          '
a # a,[1]  '"v2m - uncompress character matrix                           '
a # a,[1]  '"from ''the apl handbook of techniques'' copyright 1978, ibm.  '
a # a,[1]  '"see Gm2v.                                                   '
Lfx a