Re: solve an integration equation
- To: mathgroup at smc.vnet.net
- Subject: [mg99519] Re: [mg99495] solve an integration equation
- From: Bob Hanlon <hanlonr at cox.net>
- Date: Thu, 7 May 2009 06:34:23 -0400 (EDT)
- Reply-to: hanlonr at cox.net
With[{a = 1, b = 2, d = 4, e = 7},
FindRoot[
Integrate[
Sqrt[(1 + c*x^2)/(1 + d*x^2)],
{x, a, b},
GenerateConditions -> False] == e,
{c, 2}]] // Chop
{c -> 219.67294373109104}
Quiet[With[{a = 1, b = 2, d = 4, e = 7},
FindRoot[
NIntegrate[
Sqrt[(1 + c*x^2)/(1 + d*x^2)],
{x, a, b}] == e,
{c, 2}]] // Chop]
{c -> 219.67294373109013}
Bob Hanlon
---- sathyapaladugu at gmail.com wrote:
=============
Hi .My problem is this.
I have integral
\!\(
\*SubsuperscriptBox[\(\[Integral]\), \(a\), \(b\)]\(
SqrtBox[
FractionBox[\(1 + c\
\*SuperscriptBox[\(x\), \(2\)]\), \(1 + d\
\*SuperscriptBox[\(x\), \(2\)]\)]] \[DifferentialD]x\)\) = e
I know a,b,d &e but need to find c
how can i find c .Please help me