{VERSION 3 0 "IBM INTEL NT" "3.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 0 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 } {PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Text Output" -1 2 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 0 0 0 0 0 1 3 0 3 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Warning" 2 7 1 {CSTYLE "" -1 -1 "" 0 1 0 0 255 1 0 0 0 0 0 0 1 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 } {PSTYLE "Error" 7 8 1 {CSTYLE "" -1 -1 "" 0 1 255 0 255 1 0 0 0 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Maple Output" 0 11 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 3 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "" 11 12 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Title" 0 18 1 {CSTYLE "" -1 -1 "" 1 18 0 0 0 0 0 1 1 0 0 0 0 0 0 }3 0 0 -1 12 12 0 0 0 0 0 0 19 0 }{PSTYLE "Author" 0 19 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 0 0 -1 8 8 0 0 0 0 0 0 -1 0 }} {SECT 0 {EXCHG {PARA 18 "" 0 "" {TEXT -1 20 "Wie leitet Maple ab?" }} {PARA 19 "" 0 "" {TEXT -1 51 "Oder: 'Wie funktionieren Computer-Algebr a-Systeme?'" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 175 "Die Frage ist so \+ spannend, da\337 wir es ja einmal versuchen k\366nnen, selbst einen Te il der erforderlichen Befehle zusammenzustellen, mit denen man z.B. ei n Polynom ableiten kann." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 " " 0 "" {TEXT -1 38 "Zun\344chst brauchen wir die Potenzregel." }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart:" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 8 "op(x^n);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$% \"xG%\"nG" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 82 "So kann man Basis un d Exponent einzeln ansprechen und eine erste Regel aufstellen:" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 47 "pot:=proc(f,x)\nop(2,f)*op(1 ,f)^(op(2,f)-1)\nend:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" } }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 44 "pot(x^n,x);pot(x^2,x);pot( u^2,u);pot(a^2,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#*&%\"nG\"\"\")% \"xG,&F$F%!\"\"F%F%" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$%\"xG\"\"#" } }{PARA 11 "" 1 "" {XPPMATH 20 "6#,$%\"uG\"\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$%\"aG\"\"#" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 48 "Da s letzte Ergebnis ist nicht zufriedenstellend." }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 75 " pot:=proc(f,x) \nif has(f,x) then\nop(2,f)*op(1,f)^(op(2,f)-1)\nelse 0 fi\nend:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 44 "pot(x^n,x);pot (x^2,x);pot(u^2,u);pot(a^2,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#*&% \"nG\"\"\")%\"xG,&F$F%!\"\"F%F%" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$% \"xG\"\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$%\"uG\"\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"!" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 18 "U nd 'Sonderf\344lle'?" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "pot (x^(-1),x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$*&\"\"\"F%*$)%\"xG\" \"#F%!\"\"!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "pot(x^0, x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "pot(x^(1/2),x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$*&\"\"\"F%*$-%%sqrtG6#%\"xGF%!\"\"#\"\"\"\"\"#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "pot(x^(1.314/2),x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$*&\"\"\"F%*$)%\"xG$\"++++IM!#5F%!\"\"$\"++++qlF+" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "pot(x,x);" }}{PARA 8 "" 1 "" {TEXT -1 49 "Error, (in pot) improper op or subscript selector" }}} {EXCHG {PARA 0 "" 0 "" {TEXT -1 30 "Das mu\337 noch korrigiert werden " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 101 "pot:=proc(f,x) \nif ha s(f,x) then\nif f=x then RETURN(1) fi:\nop(2,f)*op(1,f)^(op(2,f)-1)\ne lse 0 fi\nend:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "pot(x,x); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"\"" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 35 "Was passiert mit den Koeffizienten?" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "pot(a*x^2,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#*&)%\"xG\"\"#\"\"\")%\"aG,&*$F$F'\"\"\"!\"\"F,F," }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 17 "Das ging daneben!" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 72 "Wir ben\366tigen ein Kriterium, das die Koeffiziente n von der Potenz trennt" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 " summand:=a*b*c*x^2;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%(summandG**% \"aG\"\"\"%\"bGF'%\"cGF')%\"xG\"\"#\"\"\"" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 18 "coeffs(summand,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#*(%\"aG\"\"\"%\"bGF%%\"cGF%" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "coeffs(x^2,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"\"" }}} {EXCHG {PARA 0 "" 0 "" {TEXT -1 32 "O.K. Aber hier gibt es Probleme:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "coeffs(x^n,x);" }}{PARA 8 "" 1 "" {TEXT -1 34 "Error, invalid arguments to coeffs" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "coeffs(x^(1/2),x);" }}{PARA 8 "" 1 "" {TEXT -1 34 "Error, invalid arguments to coeffs" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "coeffs(x^1.3,x);" }}{PARA 8 "" 1 "" {TEXT -1 34 "Error, invalid arguments to coeffs" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 19 "Also vielle icht so?" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "select(has,summ and,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#*$)%\"xG\"\"#\"\"\"" }}} {EXCHG {PARA 0 "" 0 "" {TEXT -1 39 "Aber hier gibt es leider auch Prob leme:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "select(has,x^2,x);" }}{PARA 8 "" 1 "" {TEXT -1 62 "Error, non algebraic terms in power should be of the same type" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "select(has,2*x^n,x );" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#)%\"xG%\"nG" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 20 "select(has,1*x^n,x);" }}{PARA 8 "" 1 "" {TEXT -1 62 "Error, non algebraic terms in power should be of the same type" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 102 "Also m\374ssen wir auf das elementare op() zur \374ckgreifen und entsprechende Fallunterscheidungen vorsehen:" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "op(a*x^2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$%\"aG*$)%\"xG\"\"#\"\"\"" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 8 "op(x^2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$%\"xG\" \"#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "op(summand);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6&%\"aG%\"bG%\"cG*$)%\"xG\"\"#\"\"\"" }} }{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "nops(summand);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"%" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 246 "trenne:=proc(term,x)\nif nops(term) > 2 then \nRETURN([select(h as,term,x) , remove(has,term,x)])\nelif nops(term)=2 then \nif type(te rm,`^`) then RETURN([term,1])\nelse RETURN([select(has,term,x) , remov e(has,term,x)])\nfi\nelse RETURN([term,1]) fi\nend;" }}{PARA 12 "" 1 " " {XPPMATH 20 "6#>%'trenneGR6$%%termG%\"xG6\"F)F)@'2\"\"#-%%nopsG6#9$- %'RETURNG6#7$-%'selectG6%%$hasGF09%-%'removeGF7/F-F,@%-%%typeG6$F0%\"^ G-F26#7$F0\"\"\"F1FBF)F)F)" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 88 "Nun ja, auf Anhieb kommt man nicht auf alle Fallunterscheidungen. Funktio niert es jetzt?" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "trenne(summand,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7$*$)%\"xG\"\"#\"\"\"*(%\"aG\"\"\"%\"bGF+%\" cGF+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "trenne(x^n,x);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#7$)%\"xG%\"nG\"\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "trenne(summand,x)[1];" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#*$)%\"xG\"\"#\"\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "trenne(a*x^2,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7 $*$)%\"xG\"\"#\"\"\"%\"aG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "trenne(x,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7$%\"xG\"\"\"" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "trenne(1,x),trenne(a*b*c,x); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6$7$\"\"\"F$7$F$*(%\"aGF$%\"bGF$%\"c GF$" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 18 "trenne(summand,a);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7$%\"aG*(%\"bG\"\"\"%\"cGF')%\"xG\"\"#\"\"\"" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 91 "So funktioniert also die Trennung der Koeffizienten von d er Potenz und wir k\366nnen ableiten:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 49 "trenne(summand,x)[2]*pot(trenne(summand,x)[1],x);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#,$**%\"aG\"\"\"%\"bGF&%\"cGF&%\"xGF&\" \"#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 49 "trenne(summand,a)[2]*pot(trenne(summand,a)[1 ],a);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#*(%\"bG\"\"\"%\"cGF%)%\"xG\" \"#\"\"\"" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 14 "Sogar partiell" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 57 "Die Summand en eines Polynoms lassen sich relativ trennen:" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 102 "abl:=0:\nfor ter in x^2+2*a*x^4+3*x^(-2)+a*b \+ do \nabl:=abl+trenne(ter,x)[2]*pot(trenne(ter,x)[1],x);\nod;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$ablG,$%\"xG\"\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$ablG,&%\"xG\"\"#*&%\"aG\"\"\")F&\"\"$\"\"\"\"\")" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#>%$ablG,(%\"xG\"\"#*&%\"aG\"\"\")F&\" \"$\"\"\"\"\")*&F-F-*$)F&\"\"$F-!\"\"!\"'" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$ablG,(%\"xG\"\"#*&%\"aG\"\"\")F&\"\"$\"\"\"\"\")*&F- F-*$)F&\"\"$F-!\"\"!\"'" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 41 "Und wi r packen das Ganze in eine Prozedur" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 114 "di:=proc(f,x)\nlocal abl, ter:\nabl:=0:\nfor ter in \+ f do \nabl:=abl+trenne(ter,x)[2]*pot(trenne(ter,x)[1],x);\nod;\nend;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 12 "" 1 "" {XPPMATH 20 " 6#>%#diGR6$%\"fG%\"xG6$%$ablG%$terG6\"F,C$>8$\"\"!?&8%9$%%trueG>F/,&F/ \"\"\"*&&-%'trenneG6$F29%6#\"\"#F7-%$potG6$&F:6#F7F=F7F7F,F,F," }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "di(x^2+2*a*x^4+3*x^(-2)+a*b, x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,(%\"xG\"\"#*&%\"aG\"\"\")F$\" \"$\"\"\"\"\")*&F+F+*$)F$\"\"$F+!\"\"!\"'" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 31 "di(x^2+2*a*x^4+3*x^(-2)+a*b,b);" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#%\"aG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "d i(di(x^2+2*a*x^4+3*x^(-2)+a*b,x),a);" }}{PARA 11 "" 1 "" {XPPMATH 20 " 6#,$*$)%\"xG\"\"$\"\"\"\"\")" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "di(sqrt(x),x);" }} {PARA 8 "" 1 "" {TEXT -1 41 "Error, (in di) invalid subscript selector " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "di(sin(x),x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"\"" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 39 "Solche Fehler sollten wir noch abfangen" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 205 "di:=proc(f,x)\nlocal abl, ter:\nif not(type(f,rat poly)) then RETURN(`Im Moment k\366nnen nur Polynome abgeleitet werden `) fi:\nabl:=0:\nfor ter in f do \nabl:=abl+trenne(ter,x)[2]*pot(trenn e(ter,x)[1],x);\nod;\nend;" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#diGR6 $%\"fG%\"xG6$%$ablG%$terG6\"F,C%@$4-%%typeG6$9$%(ratpolyG-%'RETURNG6#% PIm~Moment~k|aznnen~nur~Polynome~abgeleitet~werdenG>8$\"\"!?&8%F3%%tru eG>F:,&F:\"\"\"*&&-%'trenneG6$F=9%6#\"\"#FA-%$potG6$&FD6#FAFGFAFAF,F,F ," }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "di(sin(x),x);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#%PIm~Moment~k|aznnen~nur~Polynome~abge leitet~werdenG" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 63 "Das stimmt zwar nicht ganz, aber es ist auch nicht ganz falsch:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "di(1/x,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6 #\"\"\"" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 45 "Oho! Da haben wir noch einen Fehler entdeckt!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 " di(b*a*x^2,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$%\"xG\"\"#" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 333 "di:= proc(f,x)\nlocal abl, ter:\nif not(type(f,`+`) or type(f,`*`) or type( f,`^`) or type(f,name) ) then RETURN(`Im Moment k\366nnen nur verallge meinerte Polynome abgeleitet werden`) fi:\nabl:=0:\nif type(f,`+`) the n \nfor ter in f do \nabl:=abl+trenne(ter,x)[2]*pot(trenne(ter,x)[1],x );\nod;\nelse trenne(f,x)[2]*pot(trenne(f,x)[1],x);\nfi:\nend;" }} {PARA 12 "" 1 "" {XPPMATH 20 "6#>%#diGR6$%\"fG%\"xG6$%$ablG%$terG6\"F, C%@$4555-%%typeG6$9$%\"+G-F46$F6%\"*G-F46$F6%\"^G-F46$F6%%nameG-%'RETU RNG6#%[oIm~Moment~k|aznnen~nur~verallgemeinerte~Polynome~abgeleitet~we rdenG>8$\"\"!@%F3?&8%F6%%trueG>FF,&FF\"\"\"*&&-%'trenneG6$FJ9%6#\"\"#F N-%$potG6$&FQ6#FNFTFNFN*&&-FR6$F6FTFUFN-FX6$&FhnFenFTFNF,F,F," }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 97 "di(x,x),di(1/x,x),di(a*b*x^2,x),di(ln(x),x),di(x^(2 .3),x),di(5*a!*x^m+binomial(2,1/2)*x^(m-n),x);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6(\"\"\",$*&\"\"\"F&*$)%\"xG\"\"#F&!\"\"!\"\",$*(%\"aGF#% \"bGF#F)F#\"\"#%[oIm~Moment~k|aznnen~nur~verallgemeinerte~Polynome~abg eleitet~werdenG,$*$)F)$\"#8F,F&$\"#BF,,&*(-%*factorialG6#F/F#%\"mGF#)F ),&F?F#F,F#F#\"\"&*&*&,&F?F#%\"nGF,F#)F),(F?F#FFF,F,F#F#F&%#PiGF+#\"#; \"\"$" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 39 "N un scheint's aber zu funktionieren... " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 29 "Halt, da ist \+ noch eine L\374cke:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "di(e xp(x)+x,x);" }}{PARA 8 "" 1 "" {TEXT -1 49 "Error, (in pot) improper o p or subscript selector" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 12 "Die ei nzige?" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "di(exp(a*x)^2,x); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$-%$expG6#*&%\"aG\"\"\"%\"xGF)\" \"#" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 39 "Da gibt es noch viel zu tu n, bis wir so" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "diff(exp(a *x)^2,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,$*&)-%$expG6#*&%\"aG\"\" \"%\"xGF+\"\"#\"\"\"F*F.F-" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 12 "wei t sind..." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 25 "komma@oe.uni-tuebingen.de" }}}}{MARK "0 0 0" 6 }{VIEWOPTS 1 1 0 1 1 1803 }