| LIB "linalg.lib";
ring r=0,(x,y,z),lp;
matrix A[3][3]=
1,4,3,
1,5,7,
0,4,17;
print(inverse(A));"";
==> 57, -56,13,
==> -17,17, -4,
==> 4, -4, 1
==>
matrix B[3][3]=
y+1, x+y, y,
z, z+1, z,
y+z+2,x+y+z+2,y+z+1;
print(inverse(B));
==> -xz+y+1, -xz-x+y, xz-y,
==> z, z+1, -z,
==> xz-y-z-2,xz+x-y-z-2,-xz+y+z+1
print(B*inverse(B));
==> 1,0,0,
==> 0,1,0,
==> 0,0,1
|