{VERSION 5 0 "IBM INTEL NT" "5.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 0 128 128 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 Comment" 2 18 "" 0 1 0 0 0 0 0 0 0 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 }{PSTYLE "R3 Font 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 20 "restart:with(plots): " }}{PARA 7 "" 1 "" {TEXT -1 50 "Warning, the name changecoords has be en redefined\n" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 61 " Es werden Tang enten vom Punkt (x1|y1) an den Graphen gelegt." }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 45 "f:=x->(-1/2*x^2+4);\n_EnvAllSolutions := true:" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fGf*6#%\"xG6\"6$%)operatorG%&arrow GF(,&*&#\"\"\"\"\"#F/*$)9$F0F/F/!\"\"\"\"%F/F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 " von:=-3: bis:=6:\nx1:=1; y1:=5;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#x1G\"\"\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#y1G\"\"&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 111 "f1:=u napply(diff(f(x),x),x);\n tangente:=unapply(f1(x0)*(x-x0)+f(x0),x);\ns telle:=fsolve( tangente(x1)=y1,x0);\n\n\n" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#f1Gf*6#%\"xG6\"6$%)operatorG%&arrowGF(,$9$!\"\"F(F(F (" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%)tangenteGf*6#%\"xG6\"6$%)opera torG%&arrowGF(,(*&%#x0G\"\"\",&9$F/F.!\"\"F/F2*&\"\"#F2F.F4F2\"\"%F/F( F(F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%'stelleG6$$!+w!30K(!#5$\"+33 0KF!\"*" }}}{EXCHG {PARA 11 "" 1 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 " " 0 "" {TEXT -1 1 " " }}}{EXCHG {PARA 11 "" 1 "" {TEXT -1 0 "" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 129 "tangente1:=unapply(f1(stelle[1])*(x-stelle[1])+f(s telle[1]),x);\ntangente2:=unapply(f1(stelle[2])*(x-stelle[2])+f(stelle [2]),x);\n\n" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%*tangente1Gf*6#%\"xG 6\"6$%)operatorG%&arrowGF(,&*&$\"+w!30K(!#5\"\"\"9$F1F1$\"+$>\\zE%!\"* F1F(F(F(" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%*tangente2Gf*6#%\"xG6\"6 $%)operatorG%&arrowGF(,&*&$\"+330KF!\"*\"\"\"9$F1!\"\"$\"+430KxF0F1F(F (F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 184 "p1:=plot(f(x),x=von ..bis,y=von..bis,scaling=constrained,color=black):\np2:=plot(tangente1 (x),x=von..bis,color=blue):\np3:=plot(tangente2(x),x=von..bis,color=bl ue):\n\n\ndisplay([p1,p2,p3]);" }}{PARA 13 "" 1 "" {GLPLOT2D 388 388 388 {PLOTDATA 2 "6(-%'CURVESG6$7S7$$!\"$\"\"!$!3++++++++]!#=7$$!3%)*** *\\7c#Q!G!#<$\"3.^+XMn4Gp!#>7$$!3=+](oKNJj#F1$\"3(4V9=v\"*HL&F-7$$!3s* **\\([i@FhxLF17$$!3(3++D'[ iK%*F-$\"3-Mn,Tz7bNF17$$!3G(****\\2Z9\\(F-$\"38qBh.6R>PF17$$!3q,++D')H UbF-$\"3_:mvHYTYQF17$$!3Y(****\\#H$Rm$F-$\"3&\\]0w(z(G$RF17$$!3Y,+v=p> e>F-$\"3#)*)p8Ct#3)RF17$$\"3*=/++]<)3q!#?$\"3)eiQ#Qa(***RF17$$\"3S++++ EHGRF17$$\"3S(** ***\\W?cbF-$\"3+,!\\0'HkXQF17$$\"3;/+DJmG(\\(F-$\"3!**RWeY`*=PF17$$\"3 ]/+v$*elX$*F-$\"37z!y&zNHjNF17$$\"3s++DJNUF6F1$\"3]*)=f!4eWO$F17$$\"32 +]iDt_/8F1$\"3SU)[$GU5\\JF17$$\"3[***\\Ppdb\\\"F1$\"3W\"fKBf`;)GF17$$ \"3#***\\7eX)Rp\"F1$\"3aCqTe\"3_c#F17$$\"3K+](os:n'=F1$\"3')p(=v>'odAF 17$$\"3u***\\77qK0#F1$\"3#e+\"f/4/#*=F17$$\"3Y*****\\1**fC#F1$\"39k&4+ 5WxZ\"F17$$\"3t***\\itYXV#F1$\"3)pB2X4\"\\O5F17$$\"3'***\\7.j(ph#F1$\" 3sR5TW^GF1$\"3$3^j*)=<;^#F47$$\"3P*****\\kR:+$F1 $!3;6O`-7?Y]F-7$$\"3e++]P.(e>$F1$!3o$=cqg$z16F17$$\"3e**\\7GG'>P$F1$!3 +t$Grlm]o\"F17$$\"3_++]K%yWc$F1$!3AI)yyC`FN#F17$$\"3S**\\781iXPF1$!3Y[ Mt))o$[,$F17$$\"3n**\\i&Qm\\$RF1$!3hO$**zA!)>u$F17$$\"31++](['3?TF1$!3 #\\/SALcv[%F17$$\"3e**\\7y+*QJ%F1$!3*zlsI!Q#[I&F17$$\"3,,++qfa+XF1$!3Y C;/9qXFhF17$$\"31++vy&G9p%F1$!3.Ahva5v/qF17$$\"3_+]7$eI2)[F1$!3Dae_7bw 5zF17$$\"3a*****\\YzY0&F1$!3=Sj%pC#*[x)F17$$\"3Q***\\P^WSD&F1$!3PLKBw= \\-)*F17$$\"3*3+++**eBV&F1$!3c\"p6)4i_v5!#;7$$\"3L**\\78%zCi&F1$!3!=s] vt81=\"F\\z7$$\"3v**\\(o\"*[W!eF1$!3)zcI9O\"e%G\"F\\z7$$\"\"'F*$!#9F*- %'COLOURG6&%$RGBGF*F*F*-F$6$7S7$F($\"3u****>qnzr?F17$F/$\"3N5)***)Q1a@ #F17$F6$\"3%f1T/Ng.M#F17$F;$\"3;C'3'[T)3[#F17$F@$\"3CkxsH%RBi#F17$FE$ \"3=Fze)RAJw#F17$FJ$\"3q@d>Kik$*GF17$FO$\"3f$4h;5'zGIF17$FT$\"3kng***G o&oJF17$FY$\"3a//:FA*yI$F17$Fhn$\"3#QP-;-/7X$F17$F]o$\"3S.>;GJVxNF17$F bo$\"3@f`'[?P&>PF17$Fgo$\"3cP3cuZAiQF17$F\\p$\"3+_hK(oI(**RF17$Fap$\"3 )G#*=%H#*fCTF17$Ffp$\"3+'>6N+!3tUF17$F\\q$\"3q_DU&pi))R%F17$Faq$\"3)oT <$oy.3bF17$Fis$\"3Xk%=%[*zWj&F17$F^t$\"3q6?[Vs/rdF17$Fc t$\"3J%4-CiM@\"fF17$Fht$\"37cL'F17$Fgu$\"3!omlTrG_Y'F17$F\\v$\"3\\f*3%yF17$F^y$\"3?&Q7vPJ#ozF17$Fcy$\"39N qXAn<9\")F17$Fhy$\"3(*>E!)y>rW#)F17$F^z$\"3/GD4)y*)QQ)F17$Fcz$\"37)Gr- r+r^)F17$Fhz$\"3w****fQSDg')F1-F][l6&F_[l$F*F*Fhdl$\"*++++\"!\")-F$6$7 S7$F($\"3'*****HB.#Gf\"F\\z7$F/$\"3&><7R[C#R:F\\z7$F6$\"3s=ijI5f#\\\"F \\z7$F;$\"3Y%y'=No9S9F\\z7$F@$\"3STrc0]N(Q\"F\\z7$FE$\"3mK%)H'39[L\"F \\z7$FJ$\"37@0VG>5'G\"F\\z7$FO$\"3P*fw/JjcB\"F\\z7$FT$\"3]kaj>'*\\$=\" F\\z7$FY$\"37=CT=K]J6F\\z7$Fhn$\"3Y!R%eG&=!y5F\\z7$F]o$\"3BS:n%=44.\"F \\z7$Fbo$\"3[)HMC@_(y(*F17$Fgo$\"3]a3m_\\BY#*F17$F\\p$\"340/#)**e0L()F 17$Fap$\"3/1%4k:SqE)F17$Ffp$\"3+,g[jB!Hr(F17$F\\q$\"3F:f]m\\ZVsF17$Faq $\"3y-6G2$>up'F17$Ffq$\"3(>V'HBv19iF17$F[r$\"3u#eG\"4Sv$o&F17$F`r$\"3I M!>a8q(y^F17$Fer$\"3!HA!\\RC(=l%F17$Fjr$\"3=S\"o\\(e,oTF17$F_s$\"3I)pz L?6hk$F17$Fds$\"3tr]BG*)*R5$F17$Fis$\"3#)[[3*f)3KEF17$F^t$\"3i!o'>:DTA @F17$Fct$\"3O2&*p[s'ef\"F17$Fht$\"3AEW6Jau!3\"F17$F]u$\"3q;\\IbeQBeF-7 $Fbu$\"3)Q9Y]&fF%*GF47$Fgu$!3!4!GmL+3$o%F-7$F\\v$!3Kx5I)G$H#***F-7$Fav $!3_p[7gHK![\"F17$Ffv$!3z)>5EP&G1?F17$F[w$!3O4'\\N,v6]#F17$F`w$!3E>'*H %Gx%=IF17$Few$!3RbU?3[BCNF17$Fjw$!3+)ekX1;P0%F17$F_x$!35X'zZWpOc%F17$F dx$!3!zA[-Vq^3&F17$Fix$!3>opDCJN-cF17$F^y$!3yaU`2.fxgF17$Fcy$!3:_'e+vl Ai'F17$Fhy$!32mb(*e*H%4rF17$F^z$!3k=:f9'[)GwF17$Fcz$!3dnIMW&)*f7)F17$F hz$!3-)*****QSDg')F1Ffdl-%+AXESLABELSG6%Q\"x6\"Q\"yFf^m-%%FONTG6#%(DEF AULTG-%(SCALINGG6#%,CONSTRAINEDG-%%VIEWG6$;F(FhzFc_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 91 "z1:=int(tangente1(x)-f (x),x=stelle[1]..1);\nz2:=int(tangente2(x)-f(x),x=1..stelle[2]);z1+z2; " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#z1G$\"+[SDg')!#5" }}{PARA 11 " " 1 "" {XPPMATH 20 "6#>%#z2G$\"+\\SDg')!#5" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+530K " 0 "" {MPLTEXT 1 0 0 "" }{TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }} }{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "f(stelle[2]);" }}{PARA 11 " " 1 "" {XPPMATH 20 "6#$\"*#>\\zE!\"*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 " tangente2(stelle[2]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"*#>\\zE!\"*" }}}{EXCHG {PARA 0 "" 0 "" {XPPEDIT 18 0 "" "6#%# %?G" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }} {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 "" }}}{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 "" }}}{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 "1 0 0" 1 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }