/* [wxMaxima batch file version 1] [ DO NOT EDIT BY HAND! ]*/ /* [ Created with wxMaxima version 0.8.4 ] */ /* [wxMaxima: comment start ] Exemples wxMaxima Batxillerat (MATRIUS I DETERMINANTS). 03-abril-2011 - Josep Pujadas i Jubany (jpujades a gmail punt com). [wxMaxima: comment end ] */ /* [wxMaxima: comment start ] Els textos no porten accents perque es vegin be tant en sistemes operatius nous (UTF-8) com en antics (ISO-8859-15). NO FEU SERVIR DONCS ACCENTS A LES EXPLICACIONS. [wxMaxima: comment end ] */ /* [wxMaxima: comment start ] Perque el programa faci les operacions has teclejar Ctl+R Es l'opcio del menu: - Cell - Evaluate All Cells - Celda - Evaluar todas las celdas [wxMaxima: comment end ] */ /* [wxMaxima: comment start ] Les ordres normalment acaben per punt i coma (;). Per introduir matrius aneu al menu: - Algebra - Enter Matrix - Algebra - Introducir Matriz [wxMaxima: comment end ] */ /* [wxMaxima: input start ] */ A: matrix( [3,1], [-1,4] ); /* [wxMaxima: input end ] */ /* [wxMaxima: input start ] */ B: matrix( [2,-5], [0,1] ); /* [wxMaxima: input end ] */ /* [wxMaxima: input start ] */ C: matrix( [3,5,1], [2,0,4], [0,2,-3], [-5,0,1] ); /* [wxMaxima: input end ] */ /* [wxMaxima: input start ] */ D: matrix( [3,6,-5,0], [-2,0,2,3], [0,3,4,0] ); /* [wxMaxima: input end ] */ /* [wxMaxima: comment start ] Suma de matrius. [wxMaxima: comment end ] */ /* [wxMaxima: input start ] */ A+B; /* [wxMaxima: input end ] */ /* [wxMaxima: comment start ] Resta de matrius. [wxMaxima: comment end ] */ /* [wxMaxima: input start ] */ A-B; B-A; /* [wxMaxima: input end ] */ /* [wxMaxima: comment start ] Producte de matrius. [wxMaxima: comment end ] */ /* [wxMaxima: input start ] */ A.B; B.A; /* [wxMaxima: input end ] */ /* [wxMaxima: input start ] */ C.D; D.C; /* [wxMaxima: input end ] */ /* [wxMaxima: comment start ] Matrius per una constant. [wxMaxima: comment end ] */ /* [wxMaxima: input start ] */ 3*A; (1/3)*A; /* [wxMaxima: input end ] */ /* [wxMaxima: comment start ] Transposades. [wxMaxima: comment end ] */ /* [wxMaxima: input start ] */ transpose(A); transpose(B); /* [wxMaxima: input end ] */ /* [wxMaxima: comment start ] Determinants. [wxMaxima: comment end ] */ /* [wxMaxima: input start ] */ determinant(A); determinant(B); /* [wxMaxima: input end ] */ /* [wxMaxima: comment start ] Inverses. [wxMaxima: comment end ] */ /* [wxMaxima: input start ] */ invert(A); invert(B); /* [wxMaxima: input end ] */ /* [wxMaxima: comment start ] Demostracio de la inversa. A per la seva inversa dona la matriu identitat. [wxMaxima: comment end ] */ /* [wxMaxima: input start ] */ A.invert(A); /* [wxMaxima: input end ] */ /* [wxMaxima: comment start ] Sistema d'equacions resolt per matrius. [wxMaxima: comment end ] */ /* [wxMaxima: input start ] */ x+5*y+3*z=2; x+y+4*z=5; -2*x+z=2; /* [wxMaxima: input end ] */ /* [wxMaxima: input start ] */ E: matrix( [1,5,3], [1,1,4], [-2,0,1] ); F: matrix( [2], [5], [2] ); /* [wxMaxima: input end ] */ /* [wxMaxima: input start ] */ invert(E).F; /* [wxMaxima: input end ] */ /* [wxMaxima: comment start ] Sistema d'equacions resolt per Cramer. [wxMaxima: comment end ] */ /* [wxMaxima: input start ] */ x+5*y+3*z=2; x+y+4*z=5; -2*x+z=2; /* [wxMaxima: input end ] */ /* [wxMaxima: input start ] */ A: matrix( [1,5,3], [1,1,4], [-2,0,1] ); Ax: matrix( [2,5,3], [5,1,4], [2,0,1] ); Ay: matrix( [1,2,3], [1,5,4], [-2,2,1] ); Az: matrix( [1,5,2], [1,1,5], [-2,0,2] ); /* [wxMaxima: input end ] */ /* [wxMaxima: input start ] */ determinant(Ax)/determinant(A); determinant(Ay)/determinant(A); determinant(Az)/determinant(A); /* [wxMaxima: input end ] */ /* [wxMaxima: comment start ] Comprovacio amb linsolve() dels exercicis de resolucio d'equacions. - kill(all) esborra la memoria. Aqui linsolve() dona error quan l'executes per segon cop (?). - El signe menys davant les fraccions esta molt poc separat a Windows i pot crear confusions! [wxMaxima: comment end ] */ /* [wxMaxima: input start ] */ kill(all)$ linsolve([x+5*y+3*z=2,x+y+4*z=5,-2*x+z=2], [x,y,z]); /* [wxMaxima: input end ] */ /* Maxima can't load/batch files which end with a comment! */ "Created with wxMaxima"$