Urgent Help for Maple please
Fırat
I have a problem in maple. I think this is a very easy problem for
you. But, for a beginner this is a complicate problem for me.
I have a equation in the following simple form
D(x0+px1+p^2x2+p^3x3+...)=p(x0+px1+p^2x2+p^3x3+...)
where D is an, for example, ordinary differential operator. As you see
in this equation there is a power of $p$ both side of equation. I want
to arrange the coefficient of the same power of $p$ and then equate as
follow
D(x0)=0 (I equte some power of $p$ both side of above equation,
for example p^0, p^1,...)
D(x1)=x0
D(x2)=x1
...
and so on
Is there any command or procedure in maple for this purpose.
Firat
Robert Israel
I won't use D because that has a special meaning in Maple. Let's call
the operator L. For example:
L:= f -> diff(f, t) + f;
A:= sum(x[i](t)*p^i, i = 0 .. infinity);
eq:= L(A) = p*A;
map(series,eq,p);
//d \ \ //d \ \
||-- x[0](t)| + x[0](t)| + ||-- x[1](t)| + x[1](t)| p +
\\dt / / \\dt / /
//d \ \ 2 / /d \\ 3
||-- x[2](t)| + x[2](t)| p + |x[3](t) + |-- x[3](t)|| p +
\\dt / / \ \dt //
//d \ \ 4 //d \ \ 5
||-- x[4](t)| + x[4](t)| p + ||-- x[5](t)| + x[5](t)| p +
\\dt / / \\dt / /
6 2 3 4
O(p ) = x[0](t) p + x[1](t) p + x[2](t) p + x[3](t) p +
5 6
x[4](t) p + O(p )
> seq(map(coeftayl,%,p=0,j),j=0..5);
/d \ /d \
|-- x[0](t)| + x[0](t) = 0, |-- x[1](t)| + x[1](t) = x[0](t),
\dt / \dt /
/d \
|-- x[2](t)| + x[2](t) = x[1](t),
\dt /
/d \
x[3](t) + |-- x[3](t)| = x[2](t),
\dt /
/d \
|-- x[4](t)| + x[4](t) = x[3](t),
\dt /
/d \
|-- x[5](t)| + x[5](t) = x[4](t)
\dt /
Is this what you had in mind?
--
Robert Israel isr...@math.MyUniversitysInitials.ca
Department of Mathematics http://www.math.ubc.ca/~israel
University of British Columbia Vancouver, BC, Canada
Fırat
<isr...@math.MyUniversitysInitials.ca> wrote:
>
> - Alıntıyı göster -
Properly this, thank for your kindly help