{VERSION 5 0 "IBM INTEL NT" "5.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 0 128 0 128 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 "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 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 0 "" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 21 "restart: with(plots):" }}{PARA 7 "" 1 "" {TEXT -1 50 "Warning, the name changecoords has been redefined\n" }}} {EXCHG {PARA 0 "" 0 "" {TEXT -1 83 " Tangente in einer Nu llstelle, mit der x-Achse eingeschlossener Winkel" }}{PARA 0 "> " 0 " " {MPLTEXT 1 0 20 " f:=x->-1/18*x^2+2;\n" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fGf*6#%\"xG6\"6$%)operatorG%&arrowGF(,&*&#\"\"\"\"#=F/*$)9$ \"\"#F/F/!\"\"F4F/F(F(F(" }}}{EXCHG {PARA 11 "" 1 "" {TEXT -1 0 "" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "f1:=unapply(diff(f(x),x),x); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#f1Gf*6#%\"xG6\"6$%)operatorG%&a rrowGF(,$*&#\"\"\"\"\"*F/9$F/!\"\"F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 " xs:=so lve(f(x)=0,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#xsG6$!\"'\"\"'" } }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "grad:=x ->180*x/Pi:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "x0:=xs[1]: " }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 38 "w1_grad:=evalf(grad(arctan(f1(x0))));\n" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%(w1_gradG$\"+_n+pL!\")" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 " f1:=unapply(diff(f(x),x),x):" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 39 " f1:=unapply(simplify(diff(f(x),x)),x);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%#f1Gf*6#%\"xG6\"6$%)operatorG%&arrow GF(,$*&#\"\"\"\"\"*F/9$F/!\"\"F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 41 "tangente:=unapply(f1(x0)*(x-x0)+f(x0),x);" }{TEXT -1 0 "" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%)tangenteGf*6#%\"xG6\"6$%)ope ratorG%&arrowGF(,&*&#\"\"#\"\"$\"\"\"9$F1F1\"\"%F1F(F(F(" }}}{PARA 0 " " 0 "" {TEXT -1 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}} {EXCHG {PARA 11 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "von:=-10: bis:=10:\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 134 "p1:=plot(f(x),x=von..bis,y=von+6..bis,scaling=constr ained,color=black):\np2:=plot(tangente(x),x=von..bis,color=blue):\ndis play([p1,p2]);" }}{PARA 13 "" 1 "" {GLPLOT2D 345 345 345 {PLOTDATA 2 " 6'-%'CURVESG6$7S7$$!#5\"\"!$!3ObbbbbbbN!#<7$$!3!pmmm\"p0k&*F-$!3m;Wi$[ K<3$F-7$$!3uKL$3FW=9E# F-7$$!3/nmm\"4m(G$)F-$!3!R\"4wApz`=F-7$$!3OLL$3i.9!zF-$!3%f+^))Ra%o9F- 7$$!3fmm;/R=0vF-$!3B*ovIT@$H6F-7$$!3k++]P8#\\4(F-$!3]I$H2)[]lz!#=7$$!3 Kmm;/siqmF-$!3TF8(Q0/2s%FQ7$$!3Q****\\(y$pZiF-$!3uoA4zkP&o\"FQ7$$!3jKL L$yaE\"eF-$\"3,h*GV4p%H7FQ7$$!3s%HaF-$\"3mSN%))G%oAOFQ7$$!3]*** ***\\$*4)*\\F-$\"3L?9GV/\"F-7$$!3Imm;/#)[oPF-$\"38%fZ>fF5@ \"F-7$$!3%HLLL=exJ$F-$\"3#o\"e\\Y6Z)Q\"F-7$$!3lKLLL2$f$HF-$\"3\\br$QPG 6_\"F-7$$!3%)****\\PYx\"\\#F-$\"3!p4&*>%)e]l\"F-7$$!3gLLLL7i)4#F-$\"3q [7h1;KbF-7$$!3M:LL$3x%z#)FQ$\"3K@9o5o\">'>F-7$$!3()HLL3s$QM%FQ$\"3 A)QEdE<&*)>F-7$$!3]^omm;zr)*!#?$\"3gg\\)fe%****>F-7$$\"3fVLLezw5VFQ$\" 3Mq'\\kEw'*)>F-7$$\"3-.++v$Q#\\\")FQ$\"3S[js2b5j>F-7$$\"3%\\LL$e\"*[H7 F-$\"3sV+`+)>g\">F-7$$\"3=++++dxd;F-$\"33&>Fg4@t%=F-7$$\"3e+++D0xw?F-$ \"3cXGeK-Rg_#=LJA:F-7$$\"3ElmmmZvOLF-$\"3qrq],#[9Q\"F-7$$\"3%4+++v+'oPF-$\"3bo *\\fY!)4@\"F-7$$\"3UKL$eR<*fTF-$\"3Kz,))efhQ5F-7$$\"3K-++])Hxe%F-$\"3b ?%**=!\\22$)FQ7$$\"3!fmm\"H!o-*\\F-$\"3[KhP)*\\7lhFQ7$$\"3X,+]7k.6aF-$ \"3k2&**p&QrLPFQ7$$\"3#emmmT9C#eF-$\"3]=BmLNQm6FQ7$$\"33****\\i!*3`iF- $!38*G(38g%Gs\"FQ7$$\"3;NLLL*zym'F-$!3*o'=(H+Y.q%FQ7$$\"3'eLL$3N1#4(F- $!3(GT2zW!)H%zFQ7$$\"3,pm;HYt7vF-$!3P-+Y+7iN6F-7$$\"37-+++xG**yF-$!3k1 %)H4qfm9F-7$$\"3gpmmT6KU$)F-$!3q/x#RA^j'=F-7$$\"3qNLLLbdQ()F-$!3<@i(GN sBC#F-7$$\"3[++]i`1h\"*F-$!3/.ab(e1Dm#F-7$$\"3A-+]P?Wl&*F-$!3_l&42_/K3 $F-7$$\"#5F*F+-%'COLOURG6&%$RGBGF*F*F*-F$6$7S7$F($!31mmmmmmmEF-7$F/$!3 gWWWWz.wBF-7$F4$!3%=AAsWjJ7#F-7$F9$!3.xxxF'z(Q=F-7$F>$!3WxxxF2^_:F-7$F C$!3i)))))QT-wE\"F-7$FH$!31666OfX.5F-7$FM$!3oMLL$ev%*H(FQ7$FS$!3epxxF! [3Z%FQ7$FX$!3afmm;>H^;FQ7$Fgn$\"3G<666\"o*[7FQ7$F\\o$\"3`DAAA(=N!QFQ7$ Fao$\"3]rmmmwLzmFQ7$Ffo$\"310+++]'pc*FQ7$F[p$\"3E++++H(\\B\"F-7$F`p$\" 35cbbIXn([\"F-7$Fep$\"3Q66667;)y\"F-7$Fjp$\"3!\\WWW%GrU?F-7$F_q$\"3WLL L3p\")QBF-7$Fdq$\"3fxxxx\">4g#F-7$Fiq$\"3?MLL3p[))GF-7$F^r$\"3?nmm\"R> B;$F-7$Fcr$\"3Y766h[.[MF-7$Fhr$\"3;yxx_3T5PF-7$F]s$\"3Gbbb0)=M*RF-7$Fc s$\"3CcbbIXQ(G%F-7$Fhs$\"3$QLL$eDGVXF-7$F]t$\"3E!*))))Q%f'>[F-7$Fbt$\" 3$)*******z$=0^F-7$Fgt$\"39LLL$o8XQ&F-7$F\\u$\"3wLLL3(zZl&F-7$Fau$\"3S ******\\S'[&fF-7$Ffu$\"3%oxxx<.XA'F-7$F[v$\"3/++++0S7lF-7$F`v$\"3)z))) )QEyKx'F-7$Fev$\"3inmmml[eqF-7$Fjv$\"3Fxxx_`%oK(F-7$F_w$\"3IMLL3wN2wF- 7$Fdw$\"3C5666'4;)yF-7$Fiw$\"3/mmmTgso\")F-7$F^x$\"3%*)))))))G`_W)F-7$ Fcx$\"3e!*))))QB/G()F-7$Fhx$\"3vyxx_(*[3!*F-7$F]y$\"3U,+++=>m#*F-7$Fby $\"3cyxxFuah&*F-7$Fgy$\"3@BAAAqrD)*F-7$F\\z$\"3DLL$3pP2,\"!#;7$Faz$\"3 VLL$e8'pP5F\\dl7$Ffz$\"3immmmmmm5F\\dl-Fiz6&F[[l$F*F*Fedl$\"*++++\"!\" )-%(SCALINGG6#%,CONSTRAINEDG-%+AXESLABELSG6%Q\"x6\"Q\"yFael-%%FONTG6#% (DEFAULTG-%%VIEWG6$;F(Ffz;$!\"%F*Ffz" 1 2 0 1 10 0 2 9 1 4 1 1.000000 45.000000 45.000000 0 0 "Curve 1" "Curve 2" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }} {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 "21 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }