%E1  E2     E3  E4  E5  E6  E7  V1  V2  V3  V4  V5  V6  V7  H1  H2  H3  H4
A = [0   0       0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0;
 0   1       0   0   0   0  -1   0   0   0   0   0   0   0   0   0   0   0   0   0   0;  
 0 -0.55     1   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0;
 0   0       0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0;
 0   0      -1   0   1   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0;
 0   0       0   0 0.03 -1   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0;
 0   0       0   0 0.97  0  -1   0   0   0   0   0   0   0   0   0   0   0   0   0   0;
 0   0       0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0; 
 0   0       0   0   0   0   0   0   1   0   0   0   0  -1   0   0   0   0   0   0   0;
 0 0.284201  0   0   0   0   0   0   0  -1   0   0   0   0   0   0   0   0   0   0   0;
 0   0       0   0   0   0   0   0   0 0.15 -1   0   0   0   0   0   0   0   0   0   0;
 0   0       0   0   0   0   0   0   0 0.85  0  -1   0   0   0   0   0   0   0   0   0;
 0   0       0   0   0   0   0   0   0   0   0 0.92 -1   0   0   0   0   0   0   0   0;
 0   0       0   0   0   0   0   0   0   0   0 0.08  0  -1   0   0   0   0   0   0   0;
 0   0       0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0;
 0   0       0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0;
 0 0.165799  0   0   0   0   0   0   0   0   0   0   0   0   0   0  -1   0   0   0   0;
 0   0       0   0   0   0   0   0   0   0   0   0   0   0   0   0  -1   1   0   0   0;
 0   0       0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0;
 0   0       0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0;
 0   0       0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0;];

b = [2500 0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0];

disp(eliminate(A,b));