carica libreria per algebra
esci libreria.htm

listato da copiare e incollare su Notes:salvare come risolvesistema2.mth

inserirlo nella cartella di Derive e richiamarlo con File-carica-Math o Utility- risolvesistema2.mth

;Semplificazione(Utente)
"carica File-Carica-Math-risolvisistema2.mth visibile"

"sistema da risolvere "

"a1x + b1y +c1z = d1"

"a2x +b2y +c2z = d2"

"a3x +b3y +c3z = d3"

"inserisco i coefficienti in vettori v1,v2,v3"

"v1:=[a1,b1.c1.d1]"

"v2:=[a2,b2,c2,d2]"

"v3:=[a3,b3,c3,d3]"

"applico le formule per calcolare determinanti ds,dx,dy,dz"

ds:=v1 SUB 1*v2 SUB 2*v3 SUB 3+v1 SUB 2*v2 SUB 3*v3 SUB 1+v1 SUB 3*v2 SUB 1*v~
3 SUB 2-v1 SUB 1*v2 SUB 3*v3 SUB 2-v1 SUB 2*v2 SUB 1*v3 SUB 3-v1 SUB 3*v2 SUB~
2*v3 SUB 1

dx:=v1 SUB 4*v2 SUB 2*v3 SUB 3+v1 SUB 2*v2 SUB 3*v3 SUB 4+v1 SUB 3*v2 SUB 4*v~
3 SUB 2-v1 SUB 4*v2 SUB 3*v3 SUB 2-v1 SUB 2*v2 SUB 4*v3 SUB 3-v1 SUB 3*v2 SUB~
2*v3 SUB 4

dy:=v1 SUB 1*v2 SUB 4*v3 SUB 3+v1 SUB 4*v2 SUB 3*v3 SUB 1+v1 SUB 3*v2 SUB 1*v~
3 SUB 4-v1 SUB 1*v2 SUB 3*v3 SUB 4-v1 SUB 4*v2 SUB 1*v3 SUB 3-v1 SUB 3*v2 SUB~
4*v3 SUB 1

dz:=v1 SUB 1*v2 SUB 2*v3 SUB 4+v1 SUB 2*v2 SUB 4*v3 SUB 1+v1 SUB 4*v2 SUB 1*v~
3 SUB 2-v1 SUB 1*v2 SUB 4*v3 SUB 2-v1 SUB 2*v2 SUB 1*v3 SUB 4-v1 SUB 4*v2 SUB~
2*v3 SUB 1

"-------------------------------------------------"

x:=dx/ds

y:=dy/ds

z:=dz/ds

soluzione:=[x,y,z]

"a1x+b1y+c1=d1]"

"a2x+b2y+c2z=d2"

"a3x+b3y+c3z=d3"

"--------------libreria formule caricabile ---------"

per ottenere soluzione sono richiesti pochi interventi da parte dell'utente:
caricare risolvesistema2.mth in memoria
scrivere tre vettori v1,v2,v3 con i coefficienti delle tre equazioni
scrivere : soluzione (semplifica-base)