{VERSION 6 0 "IBM INTEL NT" "6.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 1 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 0 1 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 1 } {PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Output" -1 11 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 3 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Output" -1 12 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 3 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Plot" -1 13 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 1 0 0 0 0 1 0 1 0 2 2 0 1 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 80 "A:=[1000,-100,-100,- 100,-100,-100,-100,-500];\nB:=[-1000,100,100,100,50,50,1050];" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG7*\"%+5!$+\"F'F'F'F'F'!$+&" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"BG7)!%+5\"$+\"F'F'\"#]F(\"%]5" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "F:=sum(A[i]*(1+xi)^(1-i),i=1 ..nops(A));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"FG,2\"%+5\"\"\"*&\" $+\"F',&F'F'%#xiGF'!\"\"F,*&F)F'F*!\"#F,*&F)F'F*!\"$F,*&F)F'F*!\"%F,*& F)F'F*!\"&F,*&F)F'F*!\"'F,*&\"$+&F'F*!\"(F," }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "nops(A);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\")" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "F:=unapply(F,xi);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"FGj+6#%#xiG6\"6$%)operatorG%&arrow GF(,2\"%+5\"\"\"*&\"$+\"F.,&F.F.9$F.!\"\"F3*&F0F.F1!\"#F3*&F0F.F1!\"$F 3*&F0F.F1!\"%F3*&F0F.F1!\"&F3*&F0F.F1!\"'F3*&\"$+&F.F1!\"(F3F(F(F(6#\" \"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "F(0.01);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$!*\\n1f%!\"(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "plot(F(x),x=0..0.1);" }}{PARA 13 "" 1 "" {GLPLOT2D 495 495 495 {PLOTDATA 2 "6%-%'CURVESG6$7S7$$\"\"!F)$!$+\"F)7$$\"3[mmm; arz@!#?$!3MlEs'Q:')y)!#;7$$\"3mLL$e9ui2%F/$!37Fj&*4w[\\xF27$$\"3-nmm\" z_\"4iF/$!3)4`rx]^rf'F27$$\"3[mmmT&phN)F/$!3I$G!Hs(zUX&F27$$\"3KLLe*=) H\\5!#>$!3t?\"\\PyxNL%F27$$\"3omm\"z/3uC\"FE$!3sx#Q(*R0#4LF27$$\"3#*** *\\7LRDX\"FE$!3o0piIM9jAF27$$\"3emm\"zR'ok;FE$!3YD+%4P&o'>\"F27$$\"3'* ***\\i5`h(=FE$!3i586TFY*[\"!#<7$$\"3gLLL3En$4#FE$\"3z0%35.A78*Ffn7$$\" 3wmm;/RE&G#FE$\"3pgGK*yec$=F27$$\"3A+++D.&4]#FE$\"3?iihH]'*fGF27$$\"3! )*****\\PAvr#FE$\"3e4*)[,RatQF27$$\"3)******\\nHi#HFE$\"3-#z9eV*RO[F27 $$\"3jmm\"z*ev:JFE$\"3c`*eX,E\"*p&F27$$\"31LLL347TLFE$\"3;jI&f*G\"3r'F 27$$\"3cLLLLY.KNFE$\"3yX#p)[u)fb(F27$$\"3!****\\7o7Tv$FE$\"3!=%=w4YnD& )F27$$\"3sKLL$Q*o]RFE$\"3Mz2o3l8s$*F27$$\"33++D\"=lj;%FE$\"3%4oM$>C#)G 5!#:7$$\"33++vV&R
Y2aFE$\"3
7zgX30UJ:F^r7$$\"3qmm;zXu9cFE$\"3ISX(R))e9h\"F^r7$$\"3^******\\y))GeFE
$\"3MQ,+qL-$p\"F^r7$$\"3!)****\\i_QQgFE$\"3!y)*z6#>tr Y2aFE$\"37zgX30UJ:F^r7$$\"3qmm;zXu9cFE$\"3ISX(R))e9h\"F^r7$$\"3
^******\\y))GeFE$\"3MQ,+qL-$p\"F^r7$$\"3!)****\\i_QQgFE$\"3!y)*z6#>tr<
F^r7$$\"3j***\\7y%3TiFE$\"3Qg?Nu-)o%=F^r7$$\"3o****\\P![hY'FE$\"3[,3m!
Hz\"H>F^r7$$\"33KLL$Qx$omFE$\"3cu*=!z:7-?F^r7$$\"3k+++v.I%)oFE$\"3'Rwe
69o*y?F^r7$$\"3Amm\"zpe*zqFE$\"3G=+(z)RpZ@F^r7$$\"37+++D\\'QH(FE$\"3*e
N0'>o&=A#F^r7$$\"3GKLe9S8&\\(FE$\"3QD&o+$\\s!H#F^r7$$\"3]++D1#=bq(FE$
\"3?)yYCP!yhBF^r7$$\"3>LLL3s?6zFE$\"3s-:)R(QMICF^r7$$\"3)*)**\\7`Wl7)F
E$\"31aZ%z#)y6]#F^r7$$\"3[nmmm*RRL)FE$\"3gpyBVA]oDF^r7$$\"3Smm;a<.Y&)F
E$\"36BV.\\BXOEF^r7$$\"3-MLe9tOc()FE$\"3y\"ecVLdHq#F^r7$$\"3u******\\Q
k\\*)FE$\"3/HX