/* [wxMaxima batch file version 1] [ DO NOT EDIT BY HAND! ]*/
/* [ Created by wxMaxima version 0.7.5 ] */

/* [wxMaxima: input   start ] */
A:matrix([2,1,-4,1,-7],[1,-3,1,2,6],[1,5,0,0,-4],[0,3,1,1,0]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:rowop(A,1,1,1/2);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:rowop(A,2,1,1);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:rowop(A,3,1,1);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:rowop(A,2,2,1--7/2);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:rowop(A,2,2,1-49/4);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:matrix([2,1,-4,1,-7],[1,-3,1,2,6],[1,5,0,0,-4],[0,3,1,1,0]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:rowop(A,1,1,1-1/(2));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:rowop(A,2,1,1);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:rowop(A,3,1,1);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:rowop(A,2,2,1+2/7);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:rowop(A,3,2,9/2);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:rowop(A,4,2,3);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:rowop(A,3,3,1-7/41);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:rowop(A,4,4,1-7/25);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:rowop(A,4,3,1);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:rowop(A,4,4,1-1025/406);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:rowop(A,3,4,10/41);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:rowop(A,2,4,-3/7);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:rowop(A,2,3,-6/7);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:rowop(A,1,2,1/2);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:rowop(A,1,3,-2);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:rowop(A,1,4,1/2);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
solve([2*x1+x2-4*x3+x4=-7,x1-3*x2+x3+2*x4,x1+5*x2=-4,3*x2+x3+x4=0],[x1,x2,x3,x4]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
solve([2*x1+x2-4*x3+x4=-7,x1-3*x2+x3+2*x4=6,x1+5*x2=-4,3*x2+x3+x4=0],[x1,x2,x3,x4]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:matrix([2,1,-4,1,-7],[1,-3,1,2,6],[1,5,0,0,-4],[0,3,1,1,0]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:rowop(A,2,1,1/2);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:rowswap(A,3,4);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
A:rowop(A,2,2,1--2/7);
/* [wxMaxima: input   end   ] */

/* Maxima can't load/batch files which end with a comment! */
"Created with wxMaxima"$