Re: solving non-algebraic exponential equations
- To: mathgroup at smc.vnet.net
- Subject: [mg38112] Re: solving non-algebraic exponential equations
- From: "Steve Luttrell" <luttrell at _removemefirst_westmal.demon.co.uk>
- Date: Tue, 3 Dec 2002 04:32:28 -0500 (EST)
- References: <as5q8h$nin$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
The following works OK in Mathematica 4.2 for Windows:
input:
With[{a = 1.1, b = 1.1},
NSolve[Exp[-Pi*a/x] + Exp[-Pi*b/x] == 1, x]
]
output:
{{x -> 4.9856}}
Steve Luttrell
"Eva Hohberger" <eva.hoehberger at gmx.net> wrote in message
news:as5q8h$nin$1 at smc.vnet.net...
> I am trying to solve the following equation for given values of two
> parameters a and b:
>
> NSolve[Exp[-Pi*a/x] + Exp[-Pi*b/x] == 1, x]
>
> This is straightforward for integer values of the parameters a and b
> (e.g. a=1, b=1). However, Mathematica is unable to compute the
> solution for non-integer values of a and b (e.g. a=1.1, b=1.1; even
> a=1.0, b=1.0 doesn't work). Instead, the error message "Solve::"tdep":
> "The equations appear to involve the variables to be solved for in an
> essentially non-algebraic way." is produced.
>
> Can anybody point out a way to overcome this problem and to obtain a
> solution?
>
> Thanks,
> Eva
>