Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2007

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

Search the Archive

Re: Solving simple equations

  • To: mathgroup at smc.vnet.net
  • Subject: [mg83222] Re: Solving simple equations
  • From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
  • Date: Thu, 15 Nov 2007 05:41:08 -0500 (EST)
  • Organization: Uni Leipzig
  • References: <fheh0u$mm7$1@smc.vnet.net>
  • Reply-to: kuska at informatik.uni-leipzig.de

Hi,

and you expect that a numerical routine can deal with
symbolic parts in the equation like Subscript[P,f] or
Subscript[a,1] ??

eqp = NSolve[
   meqn /. {p'[t] -> 0, x'[t] -> 0, Subscript[a, 1] -> 0,
     Subscript[a, 2] -> 0, Subscript[P, f] -> 1}, {p[t], x[t]}]

will do it with usefull values for the variables.

Regards
   Jens

Holger wrote:
> I'm trying to solve these two simple equations but it doesn't work.
> 
> meqn = {
> x'[t]==beta(x[t]+(Subscript[P,f]-p[t])),
> p'[t]==(Tanh[Subscript[a,1](x[t]+(Subscript[P,f]-p[t]))+
>         Subscript[a,2]x[t]]-x[t])
>    };
> 
> eqp = NSolve[
> meqn/.{
> p'[t]->0,x'[t]->0},{p[t], x[t]
> }
> ]
> 
> I guess I'm doing a mistake somewhere. Does anyone have idea where the mistake is?
> Thank!
> 


  • Prev by Date: Mathematica, Graph Theory
  • Next by Date: Re: Choosing preferred functions for Trig Simplification?
  • Previous by thread: Solving simple equations
  • Next by thread: Re: Solving simple equations