{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 27 " Schnittwinkel" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "f:=x->x^2;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fGf*6#%\"xG6\"6$%)operatorG%&arrowGF(*$)9$\"\"#\"\" \"F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "g:=x->(x-2)^2+1 ;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"gGf*6#%\"xG6\"6$%)operatorG%& arrowGF(,&*$),&9$\"\"\"\"\"#!\"\"F2F1F1F1F1F(F(F(" }}}{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%&arrowGF(,$*&\"\"# \"\"\"9$F/F/F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "g1:=u napply(diff(g(x),x),x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#g1Gf*6#% \"xG6\"6$%)operatorG%&arrowGF(,&*&\"\"#\"\"\"9$F/F/\"\"%!\"\"F(F(F(" } }}{EXCHG {PARA 0 "" 0 "" {TEXT -1 1 " " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 " xs:=solve(f(x)=g(x),x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#xsG#\"\"&\"\"%" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 143 "von:=-2:\nbis: =4:\np1:=plot(f(x),x=von..bis,y=von..bis,scaling=constrained,color=bla ck):\np2:=plot(g(x),x=von..bis,color=blue):\n\ndisplay([p1,p2]);" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 13 "" 1 "" {GLPLOT2D 260 260 260 {PLOTDATA 2 "6'-%'CURVESG6$7S7$$!\"#\"\"!$\"\"%F*7$$!3!****** \\2<#p=!#<$\"3;b:ZtC(R\\$F07$$!31++D^NUbiUCFY$\"39)z @1*>Smf!#>7$$!3B++]7YY08FY$\"3#fx*[ayB/\"FY$\"3lS3QQ%f8U\"F_p7$$\"3h****\\(3wY_#FY$\" 370VzY$*)RP'F_p7$$\"3F)******HOTq$FY$\"3%yw(*Gdi?P\"FY7$$\"3I,+](3\">) *\\FY$\"3oWkr99>)\\#FY7$$\"3_,+]isVIiFY$\"39^[>[[$=)QFY7$$\"3&=++](o:; vFY$\"3%*y4'pTh#\\cFY7$$\"3#>++v$)[op)FY$\"3%R^K-(z^jvFY7$$\"3W*****\\ i%Qq**FY$\"3\"yjVq&p&3%**FY7$$\"3&****\\(QIKH6F0$\"3)R`^e_q`F\"F07$$\" 3#****\\7:xWC\"F0$\"35:L)*zLs[:F07$$\"37++]Zn%)o8F0$\"3+H89=9ut=F07$$ \"3y******4FL(\\\"F0$\"3HVfVW_+UAF07$$\"3#)****\\d6.B;F0$\"36*y:#Q,BME F07$$\"3(****\\(o3lWw7$ F0$\"3w(*4cP4+#y*F07$$\"3O++v)Q?QD$F0$\"3O?XA7Zte5!#;7$$\"3G+++5jypLF0 $\"3xTj]xfaN6F^y7$$\"3<++]Ujp-NF0$\"3$yGwn;))oA\"F^y7$$\"3++++gEd@OF0$ \"3eZf;`)y:J\"F^y7$$\"39++v3'>$[PF0$\"3QvR$*))**)\\S\"F^y7$$\"37++D6Ej pQF0$\"3Y\\\\gacS(\\\"F^y7$F+$\"#;F*-%'COLOURG6&%$RGBGF*F*F*-F$6$7S7$F ($\"#$\"3*yE()p1TSK\"F^y7$FC$\"3'G'Q')HQ(fB\"F^y7$FH$\"3wh#oJ5hs :\"F^y7$FM$\"3/:yJfkty5F^y7$FR$\"3k:F#z.82+\"F^y7$FW$\"3?[H6iskh#*F07$ Fgn$\"3N5(=n()=%G&)F07$F\\o$\"3HYt?g%33\"zF07$Fao$\"3_QB7]$\\rC(F07$Ff o$\"3UH_5HmY9mF07$F[p$\"3B=i!**z7n.'F07$Fap$\"3'o*[aB#G#RbF07$Ffp$\"3[ xnn_;L\")\\F07$F]q$\"3l2QQu/LPXF07$Fbq$\"3MVzYe%pQ0%F07$Fgq$\"3ox(*GP< bbOF07$F\\r$\"37W;Z1Fa]KF07$Far$\"3c%[>)z&3g*GF07$Ffr$\"3[(4'p\"Rj%eDF 07$F[s$\"3i]K-iAhxAF07$F`s$\"3yjVqX=$f+#F07$Fes$\"3=M:&3Py!e^q,\"F07$Fbv$\"3G5T64<\\h5F07$Fgv$\"3E#H#*e&fhT6F07 $F\\w$\"3wmIwK*)3Z7F07$Faw$\"3Oygm2l^)Q\"F07$Ffw$\"3A0na " 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 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 65 "w1:=e valf(grad(arctan(f1(xs))));\nw2:=evalf(grad(arctan(g1(xs))));" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%#w1G$\"+`!f)>o!\")" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#w2G$!+YK*4j&!\")" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "w:=abs( w1-w2);\n " }{TEXT -1 18 " oder" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"wG$\"+I_3X7!\"(" }}}{EXCHG {PARA 11 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "w:=180-abs(w1-w2) ;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"wG$\"*qZ\"\\b!\"(" }}}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{MARK "17 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }