Re: Sheer frustration with integration of piecewise continuous functions
- To: mathgroup at smc.vnet.net
- Subject: [mg40912] Re: Sheer frustration with integration of piecewise continuous functions
- From: Olaf Rogalsky <Olaf.Rogalsky at physik.uni-erlangen.de>
- Date: Thu, 24 Apr 2003 05:24:28 -0400 (EDT)
- Organization: University of Erlangen, Germany
- References: <b85m4u$ace$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
box[x_] := UnitStep[x]UnitStep[1 - x];
Plot[box[x], {x, -1, 2}];
f[x_, L_,
fpeak_] := (fpeak/L)(box[x/(0.6L)](x/0.6) + box[(x - 0.6L)/(0.3L)]L +
box[(x - 0.9L)/(0.1L)]((L - x)/(0.1)));
Plot[f[x, 10, 1], {x, 0, 10}];
Integrate[f[x, L, fpeak], {x, 0, L}, Assumptions -> {L > 0}]
yields
0.65 fpeak L
--
+----------------------------------------------------------------------+
I Dr. Olaf Rogalsky Institut f. Theo. Physik I I
I Tel.: 09131 8528440 Univ. Erlangen-Nuernberg I
I Fax.: 09131 8528444 Staudtstrasse 7 B3 I
I rogalsky at theorie1.physik.uni-erlangen.de D-91058 Erlangen I
+----------------------------------------------------------------------+