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

/* [wxMaxima: title   start ]
ICM-Briefmarke
   [wxMaxima: title   end   ] */

/* [wxMaxima: comment start ]
(zu Abschnitt 2.7.4 Zerlegung eines Rechtecks – die ICM-Briefmarke)
   [wxMaxima: comment end   ] */

/* [wxMaxima: input   start ] */
linsolve([b+c=a, b+g=a, c+e+m=a, g+h+k+m=a, d+e=c, h+i=f, f+h=g, i+j=k, j+m=e, i+k=h, j+k=m], [b,c,d,e,f,g,h,i,j,k,m]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
linsolve([b+c=a, b+g=a, c+e+m=a, g+h+k+m=a, d+e=c, h+i=f, f+h=g, i+j=k, j+m=e, i+k=h, j+k=m,c+d=b], [b,c,d,e,f,g,h,i,j,k,m]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
linsolve([b+c=a1, b+g=a2, c+e+m=a2, g+h+k+m=a1, d+e=c, h+i=f, f+h=g, i+j=k, j+m=e, i+k=h, j+k=m,c+d=b], [a2,b,c,d,e,f,g,h,i,j,k,m]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
linsolve([b+c=177, b+g=a2, c+e+m=a2, g+h+k+m=177, d+e=c, h+i=f, f+h=g, i+j=k, j+m=e, i+k=h, j+k=m,c+d=b], [a2,b,c,d,e,f,g,h,i,j,k,m]);
/* [wxMaxima: input   end   ] */

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