**TI92P*main?96&/ F#9?9?9 V%/rRmrowdel Z(m,r) Func (m,r) Delete row r of matrix m Return when(r=1 or r=rowDim(m),subMat(m, mod(r,rowDim(m))+1,1,rowDim(m)-1+mod(r, rowDim(m))),augment(subMat(m,1,1,r-1); subMat(m,r+1,1))) EndFunc>