### Related

A:matrix([1,4,69],[2,...

At:transpose(A);

At.A;

Calculate

a: matrix ([1,1/2,1/3...

b: matrix([1],[1],[0]);

Calculate

display2d:false;

A:matrix([1,1,t,2],[2...

b:[1,2,1,2*t];

Calculate

fpprec:4;

fpprintprec:fpprec;

Calculate

A:matrix([1,0,x],[0,-...

C:submatrix(A,3);

Calculate

eq1:x-4*y+7*z=a;

eq2:3*y-5*z=b;

eq3:-2*x+5*y-9*z=c;

Calculate

/* Enter the data */A...

kmax:length(A)-1;

x0:lmin(list_matrix_e...

Calculate

m:matrix([1,2,0,1]);

n:transpose(m);

Calculate

eq1:x=lambda+alpha+beta;

eq2:y=lambda-alpha+3*...

eq3:z=lambda+2*alpha;

Calculate

eq1:x=lambda+alfa+beta;

eq2:y=lambda-alfa+3*b...

eq3:z=lambda+2*alfa;

Calculate

Run Example
```(%i1)eq1:x=lambda;
(%o1)                             x = lambda
(%i2) eq2:y=lambda+mu;
(%o2)                           y = lambda + mu
(%i3) eq3:z=gamma;
(%o3)                              z = gamma
(%i4) eq4:t=mu;
(%o4)                               t = mu
(%i5) ma:coefmatrix([eq1,eq2,eq3,eq4],[lambda,mu,gamma]);
[ - 1   0    0  ]
[               ]
[ - 1  - 1   0  ]
(%o5)                          [               ]
[  0    0   - 1 ]
[               ]
[  0   - 1   0  ]
(%i6) rank(ma);
(%o6)                                  3
(%i7) transpose(ma);
[ - 1  - 1   0    0  ]
[                    ]
(%o7)                       [  0   - 1   0   - 1 ]
[                    ]
[  0    0   - 1   0  ]
[ - 1   0    0   x ]
[                  ]
[ - 1  - 1   0   y ]
(%o8)                        [                  ]
[  0    0   - 1  z ]
[                  ]
[  0   - 1   0   t ]
(%i9) determinant:(ma);
[ - 1   0    0  ]
[               ]
[ - 1  - 1   0  ]
(%o9)                          [               ]
[  0    0   - 1 ]
[               ]
[  0   - 1   0  ]
(%i10) ```
Run Example
```v1:[19,8];
(%o1)                               [19, 8]
(%i2) t1:transpose(v1);
[ 19 ]
(%o2)                               [    ]
[ 8  ]
(%i3) v2:[5,12];
(%o3)                               [5, 12]
(%i4) t2:transpose(v2);
[ 5  ]
(%o4)                               [    ]
[ 12 ]
(%i5) v3:[x,y];
(%o5)                               [x, y]
(%i6) v4:[z,t];
(%o6)                               [z, t]
(%i7) m:matrix(v3,v4);
[ x  y ]
(%o7)                              [      ]
[ z  t ]
(%i8) m1:m . t1;
[ 8 y + 19 x ]
(%o8)                           [            ]
[ 19 z + 8 t ]
(%i9) m2:m . t2;
[ 12 y + 5 x ]
(%o9)                           [            ]
[ 5 z + 12 t ]
[ 8 y + 19 x  1156  ]
(%o10)                       [                   ]
[ 19 z + 8 t  - 203 ]
[ 12 y + 5 x  624  ]
(%o11)                       [                  ]
[ 5 z + 12 t  - 84 ]
(%i12) eq1:8*y+19*x=1156;
(%o12)                         8 y + 19 x = 1156
(%i13) eq2:19*z+8*t=-203;
(%o13)                        19 z + 8 t = - 203
(%i14) eq3:12*y+5*x=624;
(%o14)                         12 y + 5 x = 624
(%i15) eq4:5*z+12*t=-84 ;
(%o15)                         5 z + 12 t = - 84
(%i16) linsolve([eq1,eq2,eq3,eq4],[x,y,z,t]);
2220      1519        441        581
(%o16)            [x = ----, y = ----, z = - ---, t = - ---]
47        47         47         188
(%i17) v5:[2220/47,1519/47];
2220  1519
(%o17)                           [----, ----]
47    47
(%i18) v6:[-441/47,-581/188];
441    581
(%o18)                          [- ---, - ---]
47     188
(%i19) m3:matrix(v5,v6);
[ 2220   1519  ]
[ ----   ----  ]
[  47     47   ]
(%o19)                         [              ]
[   441    581 ]
[ - ---  - --- ]
[   47     188 ]
(%i20) invert(m3);
[    83     217  ]
[ - ----  - ---- ]
[   4224    1056 ]
(%o20)                        [                ]
[  21      185   ]
[  ---     ---   ]
[  352     616   ]
(%i21) ```
Run Example
```eq1:x=lambda+alfa+beta;
(%o1)                      x = lambda + beta + alfa
(%i2) eq2:y=lambda-alfa+3*beta;
(%o2)                     y = lambda + 3 beta - alfa
(%i3) eq3:z=lambda+2*alfa;
(%o3)                         z = lambda + 2 alfa
(%i4) eq4:t=2*lambda+3*alfa+beta;
(%o4)                    t = 2 lambda + beta + 3 alfa
[ - 1  - 1  - 1 ]
[               ]
[ - 1   1   - 3 ]
(%o5)                          [               ]
[ - 1  - 2   0  ]
[               ]
[ - 2  - 3  - 1 ]
(%i6) rank(m);
(%o6)                                  2
(%i7) transpose(m);
[ - 1  - 1  - 1  - 2 ]
[                    ]
(%o7)                       [ - 1   1   - 2  - 3 ]
[                    ]
[ - 1  - 3   0   - 1 ]
[ - 1  - 1  - 1  x ]
[                  ]
[ - 1   1   - 3  y ]
(%o8)                        [                  ]
[ - 1  - 2   0   z ]
[                  ]
[ - 2  - 3  - 1  t ]
(%i9) determinant(n);
(%o9)              - 3 (3 z - 2 t) + 3 (2 z - t) + 3 z - 3 t
(%i10) ```