I have a system of three DE's and one other definition. The system I'm working with is given in the attached equations.nb. I've attempted two methods to solve the system.(adsbygoogle = window.adsbygoogle || []).push({});

The first is by assuming steady states on the three DE's, setting them to zero, and using algebraic manipulation to reduce the system to one expression for T in terms of x. The manipulation is tedious and difficult to confirm, so I've attempted to solve the system with Mathematica. The difficulty I've had with this method is in the square term corresponding to the ρ definition. It returns two values and the remaining system doesn't seem to respond well to it. This is shown in Direct Substitution.nb.

The other attempt is to use the steady state conditions, determined by solving the system numerically at x = 0 and x = 10,000, and using NDSolve and plot to determine convergence between the two conditions. I've received prior help with this, but the expressions are not consistent with what I'd expect. The attempt is given in the remaining .nb file.

Ultimately, I'd like two graphs of this system with T, ε and ω plotted against x on a logarithmic horizontal axis. The first as given in the original equations.nb file and the second with ε set to zero. Any help would be greatly appreciated.

**Physics Forums | Science Articles, Homework Help, Discussion**

Join Physics Forums Today!

The friendliest, high quality science and math community on the planet! Everyone who loves science is here!

The friendliest, high quality science and math community on the planet! Everyone who loves science is here!

# Mathematica: Having issues with simple DE system

Can you offer guidance or do you also need help?

Draft saved
Draft deleted

Loading...

Similar Threads for Mathematica Having issues |
---|

Mathematica Storing Mathematica output |

Mathematica Mathematica to MATLAB |

Mathematica Cannot do the integral of the Hyper-geometric function? |

Mathematica Cannot Plot This Function in Mathematica |

Mathematica While Loop in Mathematica |

**Physics Forums | Science Articles, Homework Help, Discussion**