Re: Sheer frustration with integration of piecewise continuous functions
- To: mathgroup at smc.vnet.net
- Subject: [mg40981] Re: Sheer frustration with integration of piecewise continuous functions
- From: Madhusudan Singh <spammers-go-here at yahoo.com>
- Date: Sat, 26 Apr 2003 03:27:11 -0400 (EDT)
- References: <b85m4u$ace$1@smc.vnet.net> <b88b1g$h30$1@smc.vnet.net>
- Reply-to: spammers-get-bounced at yahoo.com
- Sender: owner-wri-mathgroup at wolfram.com
On Thursday 24 April 2003 05:33, Raibatak Das (rd54 at cornell.edu) held forth
in comp.soft-sys.math.mathematica (<b88b1g$h30$1 at smc.vnet.net>):
> ms -
>
> are you trying to obtain a numerical estimate for the integral? in that
> case following command where you explicitly break up the integral into
> its piecewise continuous parts will work
>
> g[x_, L_, fpeak_] := (fpeak/L) Which[((0 <= x) && (x < 0.6 L)),
> NIntegrate[t/(0.6), {t, 0, x}], ((0.6 L <= x) && (x <= 0.9 L)),
> NIntegrate[t/(0.6), {t, 0, 0.6 L}] +
> NIntegrate[L, {t, 0.6 L, x}], ((0.9 L < x) && (x <= L)),
> NIntegrate[t/(0.6), {t, 0, 0.6 L}] + NIntegrate[L, {t, 0.6 L, 0.9
> L}] +
> NIntegrate[10 (L - t), {t, 0.9 L, x}]]
>
> hope this helps.
>
> - rd.
>
> ps. is this madhusudan singh from iitk physics '99?
>
Hi Dodo,
Guilty as charged :)
No, I am not looking for a numerical estimate at this stage as this i
s just the first step of a fairly involved calculation (hence the
use of Mathematica as a validation tool).
My email add is c h h a b r a at e e c s dot u m i c h dot ... . It
s been quite a while. How are things ?
MS