MathGroup Archive 2006

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

Search the Archive

Re: symbolic solution of ODE


I do not know how to teach Mathematica to simplify its result for the cast
However you can read off the solution yourself:
The two double-sqrt-expressions appearing in the exponent are complex
conjugate; just introduce new notation a+bi and a-bi and let Mathematica
replace the old by the
new notation. Then you "see" the solution immeadiatly

C[5] Exp[a z] Cos[b z + C[6]]+C[7] Exp[-a z] Cos[b z + C[8]]

Bye Ben

the replacement-rule:

\!\(\(w[z] /.
      sol[\([1]\)]\) /. {\@\(t - \@\(\(-k\) + t\^2\)\) \[Rule]
        a + b\ I, \@\(t + \@\(\(-k\) + t\^2\)\) \[Rule] a - b\ I}\)

\!\(\[ExponentialE]\^\(\((a + \[ImaginaryI]\ b)\)\ z\)\ C[
        1] + \[ExponentialE]\^\(\(-\((a + \[ImaginaryI]\ b)\)\)\ z\)\
        2] + \[ExponentialE]\^\(\((a - \[ImaginaryI]\ b)\)\ z\)\ C[
        3] + \[ExponentialE]\^\(\(-\((a - \[ImaginaryI]\ b)\)\)\ z\)\

C[5] Exp[a z] Cos[b z + C[6]]+C[7] Exp[-a z] Cos[b z + C[8]]

visbuga at schrieb:

> Hello,
> I like to solve the ODE
> DSolve[w''''[z] - 2*t*w''[z] + k*w[z] == 0, w[z], z]
> by imposing the condition "t^2 < k" on constants in the eqn.In fact, solution
> of this homogenous ODE is known, but I want to see the result of mathematica
> to use in a complex eqn. Thank you.
> VV

  • Prev by Date: Re: documentation NestWhile
  • Next by Date: Re: Re: How to determine whether a message has been switched
  • Previous by thread: Re: symbolic solution of ODE
  • Next by thread: symbolic solution of ODE