{VERSION 5 0 "IBM INTEL NT" "5.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 0 0 128 128 1 0 1 0 0 1 0 0 0 0 1 }{CSTYLE "2D Math" -1 2 "Times" 0 0 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 "Warning" -1 7 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 2 2 2 2 2 1 1 1 3 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 128 128 1 2 2 2 2 2 2 1 1 1 1 }3 1 0 0 0 0 3 0 3 0 2 2 0 1 }{PSTYLE "R3 Fo nt 0" -1 256 1 {CSTYLE "" -1 -1 "Courier" 1 11 128 0 128 1 2 1 2 2 2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "R3 Font 2" -1 257 1 {CSTYLE "" -1 -1 "Courier" 1 11 0 128 128 1 2 1 2 2 2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "restart; with(plots) :" }}{PARA 7 "" 1 "" {TEXT -1 50 "Warning, the name changecoords has b een redefined\n" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 78 " Tange nten- und Normalengleichung zu vorgegebener Funktion und Stelle " }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "f:=x->x^2; von:=-3: bis:=7: " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fGf*6#%\"xG6\"6$%)operatorG%&a rrowGF(*$)9$\"\"#\"\"\"F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "x0:=2; # Stelle " }{TEXT -1 0 "" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#x0G\"\"#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 " f1:=u napply(diff(f(x),x),x):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 39 " f1:=unapply(simplify(diff(f(x),x)),x):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 1 " " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 41 "tangen te:=unapply(f1(x0)*(x-x0)+f(x0),x);" }{TEXT -1 0 "" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#>%)tangenteGf*6#%\"xG6\"6$%)operatorG%&arrowGF(,&*&\" \"%\"\"\"9$F/F/F.!\"\"F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 43 "normale:=unapply(-1/f1(x0)*(x-x0)+f(x0),x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%(normaleGf*6#%\"xG6\"6$%)operatorG%&arrowGF(,&*&#\"\" \"\"\"%F/9$F/!\"\"#\"\"*\"\"#F/F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 180 "p1:=plot(f(x),x=von..bis,y=von..bis,scaling=constrai ned,color=black):\np2:=plot(tangente(x),x=von..bis,color=blue):\np3:=p lot(normale(x),x=von..bis,color=grey):\n\ndisplay([p1,p2,p3]);" }} {PARA 13 "" 1 "" {GLPLOT2D 457 263 263 {PLOTDATA 2 "6(-%'CURVESG6$7S7$ $!\"$\"\"!$\"\"*F*7$$!3YLLLe%G?y#!#<$\"3BWl(HM#oRxF07$$!3#om;aesBf#F0$ \"3B$*)>;i&R?nF07$$!3ALL$3s%3zBF0$\"3W>E!*3T/gcF07$$!31LL$e/$Qk@F0$\"3 !ex!4pRb%o%F07$$!3ommT5=q]>F0$\"3$3'G;`vB0QF07$$!3ILL3_>f_G8_MYR#F07$$!3;LL3-OJN8F0$\"3Cm(3fTiIy \"F07$$!3\"****\\P*o%Q7\"F0$\"3_B:fS=.j7F07$$!3;jmm;RFj!*!#=$\"3GFI&)3 MH9#)Fhn7$$!3'3LL$e4OZrFhn$\"3va2(o'oZ3^Fhn7$$!3[(*****\\n\\!*\\Fhn$\" 3k`g<\"y00\\#Fhn7$$!3V)*****\\ixCGFhn$\"39aSci3Ozz!#>7$$!3Y\"******\\K qP(Fjo$\"3H7cg]31Ua!#?7$$\"3]om;z*ev:\"Fhn$\"3qz$\\-zU*R8Fjo7$$\"3GNLL $347T$Fhn$\"3S&e@5uMO;\"Fhn7$$\"3tOLLLjM?`Fhn$\"3A[8m5&31$GFhn7$$\"3$3 ++D\"o7TvFhn$\"3)=k?-Ofoo&Fhn7$$\"3$>LLL$Q*o]*Fhn$\"3.Lr#e..\"Q!*Fhn7$ $\"3m++D\"=lj;\"F0$\"3+ZB.OxSg8F07$$\"3S++vV&RF0$\"3!QMM(z2G!)RF07$$\"3=nm\"zRQb@#F0$\"38_Jk#R5'3\\F0 7$$\"3:++v=>Y2CF0$\"3qK9B!*G(ez&F07$$\"3Znm;zXu9EF0$\"3ys9G9#*)o$oF07$ $\"34+++]y))GGF0$\"3)HixyY1E+)F07$$\"3H++]i_QQIF0$\"3x&>xL+&yJ#*F07$$ \"3b++D\"y%3TKF0$\"3SO]#f0j/0\"!#;7$$\"3+++]P![hY$F0$\"3>5ly@#=9?\"Fau 7$$\"3iKLL$Qx$oOF0$\"3!4:bEE*pX8Fau7$$\"3Y+++v.I%)QF0$\"3Z9DKS*y(3:Fau 7$$\"3?mm\"zpe*zSF0$\"3+'eqwH1Ym\"Fau7$$\"3;,++D\\'QH%F0$\"3rEXT*fFP%= Fau7$$\"3%HL$e9S8&\\%F0$\"3J2k!4)Hi??Fau7$$\"3s++D1#=bq%F0$\"3FA]$*e,> 9AFau7$$\"3\"HLL$3s?6\\F0$\"3!*G&=Vi&*>T#Fau7$$\"3a***\\7`Wl7&F0$\"3\" y#*)3$)e9GEFau7$$\"3enmmm*RRL&F0$\"3-,/!ob\"4XGFau7$$\"3%zmmTvJga&F0$ \"3%3]A=#o%e2$Fau7$$\"3]MLe9tOcdF0$\"3LN./mkd8LFau7$$\"31,++]Qk\\fF0$ \"3G$G%=%>E)RNFau7$$\"3![LL3dg6<'F0$\"3@,35zAK3QFau7$$\"3%ymmmw(GpjF0$ \"3!o'4YlEycSFau7$$\"3C++D\"oK0e'F0$\"3gJ***o.T.L%Fau7$$\"35,+v=5s#y'F 0$\"3f0$>=WI0g%Fau7$$\"\"(F*$\"#\\F*-%'COLOURG6&%$RGBGF*F*F*-F$6$7S7$F ($FauF*7$F.$!3QLLL$Q6G^\"Fau7$F4$!3tmm;M!\\pV\"Fau7$F9$!3ILLL))Qj^8Fau 7$F>$!3CLLL=Kvl7Fau7$FC$!3omm;C2G!=\"Fau7$FH$!3KLL$3yO55\"Fau7$FM$!38+ +]nU)*=5Fau7$FR$!3lKLL3WDT$*F07$FW$!3u)****\\d(Q&\\)F07$Ffn$!3Elmmm&4` i(F07$F\\o$!3MKLL$QW*eoF07$Fao$!3+*******p)>'*fF07$Ffo$!3Q*******\\5*H ^F07$F\\p$!3m*******H\"3&H%F07$Fbp$!3gKLL3k(p`$F07$Fgp$!3*emmmO;bj#F07 $F\\q$!3Ilmmm9'=(=F07$Faq$!3o'*****\\F\\N)*Fhn7$Ffq$!3EsmmmYUs>Fhn7$F[ r$\"3SE++]sgamFhn7$F`r$\"3g,++v\"ep[\"F07$Fer$\"3$pLLLe/TM#F07$Fjr$\"3 .MLLeDBJJF07$F_s$\"3Immm;kD!)RF07$Fds$\"3somm\"f`@'[F07$Fis$\"3h+++vw% )HcF07$F^t$\"3))pmm;$y*ekF07$Fct$\"3P++++9b:tF07$Fht$\"3=,++]5a`\")F07 $F]u$\"3?-++D\"RV'*)F07$Fcu$\"3++++]@fk)*F07$Fhu$\"31LLL`4Nn5Fau7$F]v$ \"3?+++],s`6Fau7$Fbv$\"3\\mm;zM)>B\"Fau7$Fgv$\"3Z+++qfa<8Fau7$F\\w$\"3 =LL$eg`!)R\"Fau7$Faw$\"3I++]#G2A[\"Fau7$Ffw$\"3;LLL$)G[k:Fau7$F[x$\"3# )****\\7yh];Fau7$F`x$\"3/nmm')fdLFau7$F_y$\"3W+++Sv&)z>Fau7$Fdy$\"3#RLL$GUYo?Fau7$Fiy$\"39nmm1^r Z@Fau7$F^z$\"35++]sI@KAFau7$Fcz$\"3W++]2%)38BFau7$Fhz$\"#CF*-F][l6&F_[ l$F*F*Fgdl$\"*++++\"!\")-F$6$7S7$F($\"3+++++++]_F07$F.$\"37LLe9r]&>&F0 7$F4$\"3QmTNYJ4[^F07$F9$\"3IL$3-=rZ4&F07$F>$\"3;L$e9w&4T]F07$FC$\"3!p; /EXvw)\\F07$FH$\"3*H$3-))z9Q\\F07$FM$\"3k*\\(=n^'o)[F07$FR$\"3&H$3_+%G Q$[F07$FW$\"3q*\\PMsh4y%F07$Ffn$\"38mm\"z%=eEZF07$F\\o$\"3gL$eR-%oyYF0 7$Fao$\"3h***\\(=CwCYF07$Ffo$\"3i***\\iS>1d%F07$F\\p$\"3`***\\7eU%=XF0 7$Fbp$\"3=L3_D51rWF07$Fgp$\"3^mm\"Hx>ZT%F07$F\\q$\"3-nmmT8*pO%F07$Faq$ \"34+voH=Z6VF07$Ffq$\"3gmm;awKiUF07$F[r$\"3$)*\\(o/(3%3UF07$F`r$\"37+D 19^1dTF07$Fer$\"3mm;ajM\\.TF07$Fjr$\"3SmT5lzHaSF07$F_s$\"3eL$eR(RB,SF0 7$Fds$\"3?L3_+a6YRF07$Fis$\"3'**\\7._M\")*QF07$F^t$\"3!HL3_&QJYQF07$Fc t$\"3w****\\P!yFz$F07$Fht$\"3$***\\P%o./u$F07$F]u$\"3')*\\(o/)G(*o$F07 $Fcu$\"3++]i!*HYLOF07$Fhu$\"3%ommTl0He$F07$F]v$\"3))***\\i!\\#*GNF07$F bv$\"3YL3_D.,![$F07$Fgv$\"3r***\\(oP`EMF07$F\\w$\"3)p;aj\\;iP$F07$Faw$ \"3g*\\P%[/iBLF07$Ffw$\"3cmm\"z>)>sKF07$F[x$\"37+v=nQO=KF07$F`x$\"35LL L3]^mJF07$Fex$\"3-L$e91#\\8JF07$Fjx$\"3QmTNr\"341$F07$F_y$\"3t****\\P! *e7IF07$Fdy$\"3Im;Hd)4s&HF07$Fiy$\"3/LLLe!yw!HF07$F^z$\"3%**\\(oHo'[&G F07$Fcz$\"3s*\\7`u>V!GF07$Fhz$\"3+++++++]FF0-F][l6&F_[l$\")=THvFjdlFc^ mFc^m-%(SCALINGG6#%,CONSTRAINEDG-%+AXESLABELSG6%Q\"x6\"Q\"yF]_m-%%FONT G6#%(DEFAULTG-%%VIEWG6$;F(FhzFf_m" 1 2 0 1 10 0 2 9 1 4 1 1.000000 45.000000 45.000000 0 0 "Curve 1" "Curve 2" "Curve 3" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}} {MARK "10 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }