a # 1 60 R ' r#kd medit m;Lio ' a # a,[1] ' r#(((1Ykd),1URm)Ym)on(CQ)on((1Ukd),0)Um#matrix m H Lio#1 ' a # a,[1] ' $0 ' a # a,[1] '"medit - edit matrix ' a # a,[1] '"from ''the apl handbook of techniques'' copyright 1978, ibm. ' a # a,[1] '"-returns a modified form of structure m as a matrix. ' a # a,[1] '"-kd is a pair of integers, the first, k, signifies the ' a # a,[1] '" number of rows of m preceding the one to be changed, ' a # a,[1] '" inserted, or deleted. the second, d, is the line number ' a # a,[1] '" to be deleted. ' a # a,[1] '"-the keyboard will unlock for the expression that will ' a # a,[1] '" generate the line(s) to be inserted. ' a # a,[1] '"-the insert may be an altered form of the line(s) deleted. ' a # a,[1] '"-when k=d, the insert will appear after line k. ' a # a,[1] '"-when k>d, d-k lines will be deleted before accepting the ' a # a,[1] '" insert. (if k>d, k-d original rows will appear before and' a # a,[1] '" after the insert.) ' a # a,[1] '"-uses: Gmatrix Gon GH ' Lfx a