a # 1 61 R ' r#dmz n                                                     '
a # a,[1]  '"dmz - used in output function.                              '
a # a,[1]  '"from ''the apl handbook of techniques'' copyright 1978, ibm.  '
a # a,[1]  ' r#1U(zV1`Oz#n^=0)/n#,0,n                                    '
Lfx a