{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 10 "restart; \n" }{TEXT -1 60 "DGL wird n\344herungsweise durch eine Reihenentwicklung gel\366 st." }{MPLTEXT 1 0 11 "\nOrder:=15:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 40 "dgl:=diff(y(x),x$2)+diff(y(x),x)+y(x)=0;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$dglG/,(-%%diffG6$-%\"yG6#%\"xG-%\"$G6$F-\"\" #\"\"\"-F(6$F*F-F2F*F2\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 48 "lsg:=dsolve(\{dgl,y(0)=1,D(y)(0)=0\},y(x),series);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$lsgG/-%\"yG6#%\"xG+9F)\"\"\"\"\"!#!\"\"\"\"#F/# F+\"\"'\"\"$#F.\"$?\"\"\"&#F+\"$?(F1#F.\"&?.%\"\")#F+\"'!)GO\"\"*#F.\" )+o\"*R\"#6#F+\"*+;+z%\"#7#F.\",+7Hyr)\"#9-%\"OG6#F+\"#:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "f:=convert(rhs(lsg),polynom);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"fG,6\"\"\"F&*&#F&\"\"#F&*$)%\"xGF) F&F&!\"\"*&#F&\"\"'F&*$)F,\"\"$F&F&F&*&#F&\"$?\"F&*$)F,\"\"&F&F&F-*&#F &\"$?(F&*$)F,F0F&F&F&*&#F&\"&?.%F&*$)F,\"\")F&F&F-*&#F&\"'!)GOF&*$)F, \"\"*F&F&F&*&#F&\")+o\"*RF&*$)F,\"#6F&F&F-*&#F&\"*+;+z%F&*$)F,\"#7F&F& F&*&#F&\",+7Hyr)F&*$)F,\"#9F&F&F-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "g:=unapply(f,x):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "plot(g(x),x=-6..6);\n" }}{PARA 13 "" 1 "" {GLPLOT2D 311 311 311 {PLOTDATA 2 "6%-%'CURVESG6$7[o7$$!\"'\"\"!$\"3!e8NM*zd!*>! #;7$$!3&*****\\P&3Y$f!#<$\"3o].#)zC@_=F-7$$!3!******\\2<#peF1$\"39\"z^ #o_P::zW\"F-7$$!3s***\\iiSYi&F1$\"3m(y#**3#GQA\"F-7$$!3l****\\-r%3^&F 1$\"3mJ%33uW&45F-7$$!3%****\\PQuGQ&F1$\"3Y6oLfBE?yF17$$!3A+++l;!\\D&F1 $\"3loJ\\`l<.dF17$$!3^******f13E^F1$\"3>82c%*\\8WPF17$$!3o*****\\lfs* \\F1$\"3]z7\\GXMm>F17$$!3w***\\P\"40p[F1$\"3S>QjULL>Q!#=7$$!3%)****\\s @%3u%F1$!3^T52>yI;5F17$$!32++]di(>i%F1$!3[!4P.(\\RZ@F17$$!3J++]U.6.XF1 $!3^3rUF1$!37mH))e _dc>F17$$!3'*******R%e:w\"F1$!3UFS!=grCG\"F17$$!33++]#yk]\\\"F1$!3W(Q% ocXPvfF`o7$$!3M+++SF7$$!3u****\\#yh.+\"F1$\"3>3QM FC.DMF`o7$$!3(p****\\ZD\"RvF`o$\"35HLD\"oD%p*F`o7$$\"3E )****\\-V&*)[F`o$\"3'))H$))4vI(**)F`o7$$\"3a-++]\\$pP(F`o$\"3*=68KMK@$ zF`o7$$\"3y&******>am%**F`o$\"3kO&4\"zPWDmF`o7$$\"3k*****\\JigC\"F1$\" 3aFu2ynfh_F`o7$$\"3%*****\\P`$f') >(Q:F`o7$$\"35+++0\"Q_D%F1$!3o*4$>\"H5\\R\"F`o7$$\"3q++]x2k2XF1$!3iCZI mJcC7F`o7$$\"3d+++?EdRZF1$!3ELJ\"Q%yBv5F`o7$$\"3M+++&o#R0]F1$!3c'\\h2( )>Ei*F_v7$$\"3++++?`9V_F1$!3%)*=X-8jey*F_v7$$\"3G++]<#Rm\\&F1$!3v?C%3f N\"G7F`o7$$\"3F++]A_ERdF1$!3=0&y!=F`h=F`o7$$\"\"'F*$!3o?$QXg_-H$F`o-%' COLOURG6&%$RGBG$\"#5!\"\"$F*F*Fi_l-%+AXESLABELSG6$Q\"x6\"Q!F^`l-%%VIEW G6$;F(F^_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 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" 33 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 } {PAGENUMBERS 0 1 2 33 1 1 }