{VERSION 6 0 "IBM INTEL LINUX" "6.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 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 
0 0 1 }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 1 }3 3 0 -1 -1 -1 0 
0 0 0 0 0 -1 0 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "unassign('u'); Order
 := 3;\n" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&OrderG\"\"$" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 36 "dd := a*u(j-1) + b*u(j) + c*u(j+1);
\n" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#ddG,(*&%\"aG\"\"\"-%\"uG6#,&%
\"jGF(F(!\"\"F(F(*&%\"bGF(-F*6#F-F(F(*&%\"cGF(-F*6#,&F-F(F(F(F(F(" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 64 "u := (arg) -> convert(taylor
(uu(x+dx*(arg - j)),dx=0),polynom);\n" }}{PARA 11 "" 1 "" {XPPMATH 20 
"6#>%\"uGf*6#%$argG6\"6$%)operatorG%&arrowGF(-%(convertG6$-%'taylorG6$
-%#uuG6#,&%\"xG\"\"\"*&%#dxGF7,&9$F7%\"jG!\"\"F7F7/F9\"\"!%(polynomGF(
F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "dd1 := simplify(dd)
;\n" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$dd1G,0*&%\"aG\"\"\"-%#uuG6#%
\"xGF(F(*(F'F(--%\"DG6#F*F+F(%#dxGF(!\"\"*&#F(\"\"#F(*(F'F(---%#@@G6$F
0F6F1F+F()F2F6F(F(F(*&%\"bGF(F)F(F(*&%\"cGF(F)F(F(*(FAF(F.F(F2F(F(*&F5
F(*(FAF(F8F(F=F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "eq0
 := coeff(dd1,uu(x));\n" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$eq0G,(%
\"aG\"\"\"%\"bGF'%\"cGF'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 
"eq1 := coeff(dd1,D(uu)(x));\n" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$e
q1G,&*&%\"aG\"\"\"%#dxGF(!\"\"*&%\"cGF(F)F(F(" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 31 "eq2 := coeff(dd1,D(D(uu))(x));\n" }}{PARA 11 "" 
1 "" {XPPMATH 20 "6#>%$eq2G,&*&#\"\"\"\"\"#F(*&%\"aGF()%#dxGF)F(F(F(*&
F'F(*&%\"cGF(F,F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 43 "so
l := solve(\{eq0=0,eq1=1,eq2=0\},\{a,b,c\});\n" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%$solG<%/%\"aG,$*&\"\"\"F**&\"\"#F*%#dxGF*!\"\"F./%\"b
G\"\"!/%\"cG,$*&F*F**&F,F*F-F*F.F*" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 14 "unassign('u');" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 29 "d1 :=simplify(subs(sol,dd));\n" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#>%#d1G,$*&#\"\"\"\"\"#F(*&,&-%\"uG6#,&%\"jGF(F(!\"\"F(-F-6#,&F0F
(F(F(F1F(%#dxGF1F(F1" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "10 0 0" 0 }
{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }