>    with(linalg): 

Warning, the protected names norm and trace have been redefined and unprotected

>    e:=0.000000001;

>   

e := .1e-8

>    A:=matrix([[-e,1,1],[1,1,2]]);

A := matrix([[-.1e-8, 1, 1], [1, 1, 2]])

>    B:=pivot(A,1,1);

B := matrix([[-.1000000000e-8, 1, 1], [0., 1000000001., 1000000002.]])

>    linsolve(delcols(A,3..3),delcols(A,1..2));

matrix([[.9999999990], [1.000000001]])

>    linsolve(delcols(B,3..3),delcols(B,1..2));

matrix([[.9999999990], [1.000000001]])

>