MathGroup Archive 2005

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: solving simultaneous coupled differential equations

  • To: mathgroup at
  • Subject: [mg62704] Re: solving simultaneous coupled differential equations
  • From: dh <dh at>
  • Date: Fri, 2 Dec 2005 05:53:03 -0500 (EST)
  • References: <dmlvm8$m95$>
  • Sender: owner-wri-mathgroup at

here is a simple example:
we replace one 5th order lin DEQ by 5 first order lin DEQ:

we have
y'''''[x] == 0
for testing, the solution of this is
y[x]= c0 + c1 x + x2 x^2 + c3 x^3+c4 x^4

from this we can get 5 coupled lin DEQ by replacing derivatives by new 
y by y0
y' by y1
y'''' by y4

with this we get the following 5 lin DEQ:
this can be solved like this:
var = {y0, y1, y2, y3, y4};
DSolve[eq, var, x]
this yields for y0:
C[1] + x*C[2] + (x^2*C[3])/2 + 35*C[4] +
  (x^3*C[4])/6 + 15*(C[3] + x*C[4]) +
  5*(C[2] + x*C[3] + (x^2*C[4])/2)
note that the constants are different ci != c[i] but we can verify that 
this has the above form by:


akgsh at wrote:
> Hi,
> i am trying to solve 5 coupled first order differential
> there any way to solve this using mathematica.please help with
> necessary steps.
> thanks
> kumar

  • Prev by Date: Re: Output display of exponential function in Mathematica
  • Next by Date: Fixed points for system using PlotVectorField
  • Previous by thread: Re: solving simultaneous coupled differential equations
  • Next by thread: Why do I need this unused default value?