a # 1 61 R ' r # u rounds a                                              '
a # a,[1]  '"rounds - selective symmetrical rounding                     '
a # a,[1]  '"from ''the apl handbook of techniques'' copyright 1978, ibm.  '
a # a,[1]  '"-to roundoff numbers to any given units                     '
a # a,[1]  '"-to round negative numbers away from zero                   '
a # a,[1]  '"-result will be the nearest multiple of the corresponding   '
a # a,[1]  '" unit.                                                      '
a # a,[1]  '"u is a scalar or conformable structure of specified units   '
a # a,[1]  ' r#(Xa)XuXD0.5+|a%u                                          '
Lfx a