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!
>