a # 1 60 R ' r#n lim a                                                  '
a # a,[1]  '" returns values<n, only                                    '
a # a,[1]  ' r#(n>r)/r#,a                                               '
a # a,[1]  ' $0                                                         '
a # a,[1]  '"lim - used in e.g. blank.                                  '
a # a,[1]  '"from ''the apl handbook of techniques'' copyright 1978, ibm. '
Lfx a