{VERSION 5 0 "IBM INTEL NT" "5.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 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 45 "# 8 december oefenin g 1 numerieke wisk pag 42" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "interp([-1,1,3,5],[2,3 ,5,1],x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,**$)%\"xG\"\"$\"\"\"#!\" (\"#[*&#\"\"*\"#;F()F&\"\"#F(F(*&#\"#JF+F(F&F(F(#F4F/F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "subs(x=3.75,%);" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#$\"+j:5zX!\"*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "f:=unapply(%%,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fGf*6 #%\"xG6\"6$%)operatorG%&arrowGF(,**$)9$\"\"$\"\"\"#!\"(\"#[*&#\"\"*\"# ;F1)F/\"\"#F1F1*&#\"#JF4F1F/F1F1#F=F8F1F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "f(3.75);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+j :5zX!\"*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "plot(f(x),x=-2. .7);" }}{PARA 13 "" 1 "" {GLPLOT2D 400 300 300 {PLOTDATA 2 "6%-%'CURVE SG6$7V7$$!\"#\"\"!$\"3++++++]iS!#<7$$!31++]7c#Q!=F-$\"3#*\\KzG(=(eMF-7 $$!3'***\\(oKNJj\"F-$\"3(yw_JsY#=IF-7$$!3%****\\([ijx(*4LB!>F-7$$!38,+v=g9FpFJ$\"3T]N)*[Y^3=F-7$$ !3z***\\(=C#y,&FJ$\"3)[/E\\R'[t$\"3/**[.6r#f( >F-7$$\"3r-++DHb3DFJ$\"3e=()R4egK@F-7$$\"3I)****\\P,xX%FJ$\"3&)z^\\D.D CBF-7$$\"3b-++vq1OjFJ$\"3*3Sx54Ha`#F-7$$\"3a)**\\73.=/)FJ$\"3s$RZhF&zW FF-7$$\"3/++]<)3q+\"F-$\"3%oCI-=^$4IF-7$$\"3/+++q6$)y6F-$\"3x$=LU40;C$ F-7$$\"3%***\\789qy8F-$\"3(QOkSlT\\^$F-7$$\"3u*****\\W?cb\"F-$\"3#RRp6 /-Wv$F-7$$\"3U+]7j'G(\\JpjJW3SF-7$$\"3X+]P*elX$>F-$\"3BbIf4fA OUF-7$$\"3s++DJNUF@F-$\"3WN!)3A/8`WF-7$$\"32+]iDt_/BF-$\"3?Dwn9)Q$GYF- 7$$\"3[***\\Ppdb\\#F-$\"3')*)HU%)f$ey%F-7$$\"3#***\\7eX)Rp#F-$\"3#Q`(H kPW3\\F-7$$\"3K+](os:n'GF-$\"3Cqgr^Z\"f(\\F-7$$\"3u***\\77qK0$F-$\"3Uz 7__))G-]F-7$$\"3Y*****\\1**fC$F-$\"3[4CN!GUH(\\F-7$$\"3t***\\itYXV$F-$ \"37>HP-Ei#)[F-7$$\"3'***\\7.j(ph$F-$\"32*e\"eS(p;t%F-7$$\"3l***\\PBL& >QF-$\"3K^Ar%z(H%[%F-7$$\"3P*****\\kR:+%F-$\"354N0ECk%=%F-7$$\"3e++]P. (e>%F-$\"3=z2h2#pwx$F-7$$\"3e**\\7GG'>P%F-$\"3qaU$3o:gK$F-7$$\"3_++]K% yWc%F-$\"3OOVuRFDOFF-7$$\"3S**\\781iXZF-$\"39\"Q1BR_V3#F-7$$\"3n**\\i& Qm\\$\\F-$\"3=$>*=%edmH\"F-7$$\"31++](['3?^F-$\"3MNZAT55fTFJ7$$\"3e** \\7y+*QJ&F-$!3W^I3U%oVH'FJ7$$\"3,,++qfa+bF-$!31mMLEyIhqWF-7$$\"3a*****\\YzY 0'F-$!3[kI;e<\\+fF-7$$\"3Q***\\P^WSD'F-$!3o*)*3)Q@L&p(F-7$$\"3*3+++**e BV'F-$!3S]LX&pPoW*F-7$$\"36+Dc,#>u_'F-$!3J>joBr(Q/\"!#;7$$\"3L**\\78%z Ci'F-$!3%fvx`.:s9\"F`z7$$\"3a*****\\;kMr'F-$!3;'*eqIQ2]7F`z7$$\"3v**\\ (o\"*[W!oF-$!3y.#fy=koN\"F`z7$$\"3))*\\P%eWA-pF-$!3%*3(fY(H3w9F`z7$$\" \"(F*$F`zF*-%'COLOURG6&%$RGBG$\"#5!\"\"$F*F*F`\\l-%+AXESLABELSG6$Q\"x6 \"Q!Fe\\l-%%VIEWG6$;F(Ff[l%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "#Gauss- newton" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 243 "f(x) := table([( -1)=2,(1)=3,(3)=5,(5)=1]):\nar:= array([indices(f(x))]):\ns:= convert( ar,set):\na:= min(op(s)):\nb:= max(op(s)):\nh:=abs(s[1] - s[2]):\nstar t:=a; #vooraan in de tabel...\nk:= (b - start)/h;\nfo r k from 0 by 1 to k do " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 77 "dv(k) \+ := sum('(-1)^i * binomial(k, i) * (f(x)[start + (k - i)*h])','i'=0..k) ;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&startG!\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"k G\"\"$" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>-%#dvG6#\"\"!\"\"#" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>-%#dvG6#\"\"\"F'" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>-%#dvG6#\"\"#\"\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6 #>-%#dvG6#\"\"$!\"(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 96 "x:= \+ 3.75;\nu:= ((x - start)/h);\nPn:= f(x)[start] + sum('dv(n)/n!*mul(u-i, i=0..n-1)','n'=1..k-1);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"xG$\"$ v$!\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"uG$\"++++vB!\"*" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%#PnG,&&$\"+j:5zX!\"*6#!\"\"\"\"\"$\" +i:5zDF)F," }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "evalf(%);" }} {PARA 11 "" 0 "" {TEXT -1 0 "" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,&&$ \"+j:5zX!\"*6#!\"\"\"\"\"$\"+i:5zDF'F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 " x1 := -1;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#x1G!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "f(x1):=2;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>-%\"fG6#!\"\"\"\"#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 52 "pu:=f(x1)+1*u/1 !+1*u*(u-1)/2!+(-7)*u*(u-1)*(u-2)/3!;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#puG,*\"\"#\"\"\"%\"uGF'*(# 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 17 "f:=unapply(pu,u);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fGf*6#%\"uG6\"6$%)operatorG%&arrow GF(,*\"\"#\"\"\"9$F.*(#F.F-F.F/F.,&F/F.F.!\"\"F.F.*&#\"\"(\"\"'F.*(F/F .F2F.,&F/F.F-F3F.F.F3F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "f(2.375);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+i:5zX!\"*" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "subs(u=(x+1)/2,pu);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#,*#\"\"&\"\"#\"\"\"*&#F'F&F'%\"xGF'F'* (F)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 12 "expand(% ,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,*#\"#J\"#;\"\"\"*&#F%\"#[F'% \"xGF'F'*&#\"\"*F&F')F+\"\"#F'F'*&#\"\"(F*F'*$)F+\"\"$F'F'!\"\"" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "sort(%);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,**$)%\"xG\"\"$\"\"\"#!\"(\"#[*&#\"\"*\"#;F()F&\"\"#F(F (*&#\"#JF+F(F&F(F(#F4F/F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "21 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 } {PAGENUMBERS 0 1 2 33 1 1 }