{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 }{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 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "y:='y':" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 89 "Sol:=dsolve(diff(y(x),x$2)+(Pi^2)*y (x)+(3/(8*Pi))*sin(Pi*x)-(9/64)*(sin(Pi*x))^2=0,y(x));" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 71 "assign(Sol): Eq1:=eval(subs(x=0,y(x )=0)); Eq2:=eval(subs(x=1,y(x)=0)); " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 " b_vals:=solve(\{Eq1,Eq2\});" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "assign(b_vals): eval(y(x));" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 26 "int((sin(Pi*x))^2,x=0..1);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "int((sin(Pi*x))^3,x=0..1);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "int((sin(2*Pi*x))^2,x=0..1);" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "int((sin(2*Pi*x))^3,x=0..1); " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 49 "restart: u:=epsilon*u1+ epsilon^2*u2+epsilon^3*u3;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "lambda:=4*Pi^2+epsilon*a1+epsilon^2*a2;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "expand(lambda*u*(1-u));" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "collect(%,epsilon);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "14" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 } {PAGENUMBERS 0 1 2 33 1 1 }