Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2001
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2001

[Date Index] [Thread Index] [Author Index]

Search the Archive

RE: Fast Intergration of a product of 2 interpolating functions

  • To: mathgroup at smc.vnet.net
  • Subject: [mg26568] RE: Fast Intergration of a product of 2 interpolating functions
  • From: "Ersek, Ted R" <ErsekTR at navair.navy.mil>
  • Date: Fri, 5 Jan 2001 22:23:03 -0500 (EST)
  • Sender: owner-wri-mathgroup at wolfram.com

Sebastien de Menten de Horne  wanted to efficiently Integrate the product of
two IntegratingFunctions.  I think the following will work.

  f=FunctionInterpolation[ Cos[x + y] + y^2, {x, -1., 1}, {y, -1., 1}];
  g=FunctionInterpolation[ Exp[y] + z/(y + 2), {y, -1., 1}, {z, -1., 1}];
  h=FunctionInterpolation[ f[x,y] g[y,z], {x,-1.,1.}, {y,-1.,1.},
{z,-1.,1.}];
  int[x_,z_]:=Integrate[ h[x,y,z], {y, -1, 1} ]


The following standard package might also be helpful.
     NumericalMath`NIntegrateInterpolatingFunct`

--------------------
Regards,
Ted Ersek

Download Mathematica tips, tricks from 
http://www.verbeia.com/mathematica/tips/Tricks.html



  • Prev by Date: Re: mathematica log sessions
  • Next by Date: Stellar nucleosynthesis
  • Previous by thread: Publishing with Mathematica
  • Next by thread: Stellar nucleosynthesis