a # 1 60 R ' r#vv repl a                                                '
a # a,[1]  ' r[(r=1Yvv)/IRr#,a]#1Uvv                                    '
a # a,[1]  ' r#(Ra)Rr                                                   '
a # a,[1]  ' $0                                                         '
a # a,[1]  '"repl - replace all occurrences of element in array         '
a # a,[1]  '"from ''the apl handbook of techniques'' copyright 1978, ibm. '
a # a,[1]  '"vv is a two-position character or numeric vector, a is an  '
a # a,[1]  '"array of the same type. all appearances of 1Yvv will change'
a # a,[1]  '"to 1Uvv.                                                   '
Lfx a