{VERSION 3 0 "DEC ALPHA UNIX" "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 "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 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 52 "f:=int((x^3+a*x^2+b* x+c)^2*exp(-2*x),x=0..infinity);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>% \"fG,6%\"aG#\"#:\"\"%%\"bG#\"\"$\"\"#*&F*\"\"\"%\"cGF/#F/F-*&F&F/F0\" \"\"F1*&F&F3F*F3#F,F)F0F5*$)F&F-F3F5*$)F0F-F3F1*$)F*F-F3#F/F)#\"#X\"\" )F/" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 54 "var:=\{a,b,c\}:\nfor i in var do\n difff.i:=diff(f,i)\nod:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "sys:=\{seq(difff.i,i=var)\};" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$sysG<%,*%\"bG#\"\"\"\"\"#%\"aGF(#\"\"$\"\"%F)%\"cGF) ,*#F-F*F)F/F(F+F,F'F(,*#\"#:F.F)F/F(F'F,F+F1" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "s:=solve(sys,var);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"sG<%/%\"aG#!\"*\"\"#/%\"bG#\"\"*F*/%\"cG#!\"$\"\"%" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "subs(s,f);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6##\"\"*\"#K" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "5 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 }