a # 1 60 R ' r#tname preedit m ' a # a,[1] ' (tname,'' in use'')escape 0^=Lnc tname ' a # a,[1] ' r#Lfx tname on''"'',Fm ' a # a,[1] ' $0 ' a # a,[1] '"preedit - prepare matrix for function-like editing ' a # a,[1] '"from ''the apl handbook of techniques'' copyright 1978, ibm. ' a # a,[1] '"-tname is a temporary name to be assigned to a copy of the ' a # a,[1] '" matrix, m, so that it may be edited as if it were a ' a # a,[1] '" defined function. tname is a character string. ' a # a,[1] '"-when editing is complete, key: r#postedit tname, where r ' a # a,[1] '" r can be the old or new name of the edited matrix. ' a # a,[1] '"-uses: Gescape Gon ' Lfx a