{VERSION 3 0 "IBM INTEL NT" "3.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 0 }{CSTYLE "2D Comment" 2 18 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 } {CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 }{CSTYLE " " 18 256 "" 0 1 0 0 0 0 0 0 1 0 0 0 0 0 0 }{CSTYLE "" -1 257 "" 0 1 0 0 0 0 0 0 1 0 0 0 0 0 0 }{CSTYLE "" -1 258 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 259 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 260 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 261 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 262 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 263 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 264 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 }{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Heading 1" 0 3 1 {CSTYLE "" -1 -1 "" 1 18 0 0 0 0 0 1 0 0 0 0 0 0 0 }1 0 0 0 8 4 0 0 0 0 0 0 -1 0 }{PSTYLE "Heading \+ 2" 3 4 1 {CSTYLE "" -1 -1 "" 1 14 0 0 0 0 0 0 0 0 0 0 0 0 0 }0 0 0 -1 8 2 0 0 0 0 0 0 -1 0 }{PSTYLE "Maple Output" 0 11 1 {CSTYLE "" -1 -1 " " 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 3 0 -1 -1 -1 0 0 0 0 0 0 -1 0 } {PSTYLE "Title" 0 18 1 {CSTYLE "" -1 -1 "" 1 18 0 0 0 0 0 1 1 0 0 0 0 0 0 }3 0 0 -1 12 12 0 0 0 0 0 0 19 0 }} {SECT 0 {EXCHG {PARA 18 "" 0 "" {TEXT -1 21 "Integrazione numerica" }} }{EXCHG {PARA 3 "" 0 "" {TEXT -1 76 "Le procedure RETT, TRAP, SIMPSON, SIMPSON4 hanno tutte gli stessi argomenti:" }}{PARA 4 "" 0 "" {TEXT -1 2 "* " }{TEXT 259 1 "f" }{TEXT -1 199 " \350 una funzione. Attenzio ne: in Maple la definizione di una funzione (e NON di un'espressione) \+ ha la seguente sintassi: f:= x -> x^2. La freccia si scrive con il \"m eno\" seguito dal segno di maggiore." }}{PARA 4 "" 0 "" {TEXT -1 2 "* \+ " }{TEXT 260 1 "a" }{TEXT -1 3 " e " }{TEXT 261 2 "b " }{TEXT -1 48 "s ono gli estremi dell'intervallo di integrazione" }}{PARA 4 "" 0 "" {TEXT -1 2 "* " }{TEXT 262 3 "n " }{TEXT -1 47 "\350 il numero di int ervalli in cui viene diviso [" }{TEXT 263 1 "a" }{TEXT -1 1 "," } {TEXT 264 2 " b" }{TEXT -1 1 "]" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}} {EXCHG {PARA 0 "" 0 "" {TEXT -1 23 "Metodo dei rettangoli (" }{TEXT 258 8 "rightbox" }{TEXT -1 99 ": l'altezza del rettangolo \350 presa s ul valore di f(x) nell'estremo destro di ciascun intervallino)." }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 80 "rett:=proc(f,a,b,n) local dx ;\ndx:=(b-a)/n;\nevalf(dx*sum(f(a+k*dx),k=1..n));\nend:" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 18 "Metodo dei trapezi" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 98 "trap:=proc(f,a,b,n) local dx;\ndx:=(b-a)/n;\ne valf(dx/2*(f(a)+f(b)+2*sum(f(a+k*dx),k=1..n-1)));\nend:" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 37 "Metodo delle parabole, o di Simpson. " } {TEXT 257 18 "n deve essere pari" }{TEXT -1 1 "." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 143 "simpson:=proc(f,a,b,n) local dx;\ndx:=(b-a)/ n;\nevalf(dx/3*(f(a)+f(b)+4*sum(f(a+(2*k+1)*dx),k=0..(n-2)/2)+2*sum(f( a+2*k*dx),k=1..(n-2)/2)));\nend:" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 192 "Metodo delle quartiche, o di Impedovo. Si tratta di una generaliz zazione del metodo di Simpson: anzich\351 archi di parabola si appross ima f(x) con archi di funzioni polinomiali di quarto grado. " }{TEXT 256 30 "n deve essere un multiplo di 4" }{TEXT -1 1 "." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 194 "simpson4:=proc(f,a,b,n) local dx; \ndx:=(b-a)/n;\nevalf((7*(f(a)+f(b))+\n32*sum(f(a+(2*k+1)*dx),k=0..(n- 2)/2)\n+14*sum(f(a+4*k*dx),k=1..(n-4)/4)\n+12*sum(f(a+(2+4*k)*dx),k=0. .(n-4)/4))*2*dx/45);\nend:\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "rett(x->sin(x),0,Pi/2,12);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$ \"+X:-k5!\"*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "trap(sin,0, Pi/2,12);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+tpr&)**!#5" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "simpson(sin,0,Pi/2,12);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+N;++5!\"*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "simpson4(sin,0,Pi/2,12);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+,********!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "14 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 }