Question: how to extract matrix A from system of equations

sys := [1.8*a+.4000000000*b+103.9*c-.5000000000*e-102.6*g = 0, .5000000000*b+102.6*c+.3*d+.3500000000*e-102.1*g = 0, -3.3*a-1.050000000*b+102.4*c+.7*d+.2500000000*e-105.1*g = 0, -2.5*a+1.450000000*b+102.6*c+3.3*d+1.050000000*e-102.4*g = 0, -1.6*a+1.100000000*b+105.8*c+.3*d+1.750000000*e-105.5*g = 0, -.7*a-.2500000000*b+105.1*c-.2*d+.2000000000*e-105.7*g = 0, -.3*a-.3500000000*b+102.1*c+2.5*d-1.450000000*e-102.6*g = 0, .2*a-.2000000000*b+105.7*c+1.6*d-1.100000000*e-105.8*g = 0];

sol := solve(sys);

eval(sys, sol);


A*b = 0


[1.8, 0.4 103.9, -0.5, -102.6

0  , 0.5, 102.6 .........];


b = [a; b; c; d; e; g];


how to extract matrix A from system of equations

Please Wait...