URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Go to most recent revision |
Only display areas with differences |
Details |
Blame |
View Log
Rev 149 |
Rev 154 |
// { dg-do run }
|
// { dg-do run }
|
template
|
template
|
double integrate(double a, double b, int numSamplePoints)
|
double integrate(double a, double b, int numSamplePoints)
|
{
|
{
|
// PRECONDITION(numSamplePoints > 1);
|
// PRECONDITION(numSamplePoints > 1);
|
double delta = (b-a) / (numSamplePoints-1);
|
double delta = (b-a) / (numSamplePoints-1);
|
double sum = 0.;
|
double sum = 0.;
|
for (int i=0; i < numSamplePoints; ++i)
|
for (int i=0; i < numSamplePoints; ++i)
|
sum += functionToIntegrate(a + i*delta);
|
sum += functionToIntegrate(a + i*delta);
|
return sum * (b-a) / numSamplePoints;
|
return sum * (b-a) / numSamplePoints;
|
}
|
}
|
|
|
inline double myFunction(double x)
|
inline double myFunction(double x)
|
{
|
{
|
return 1 / (1 + x);
|
return 1 / (1 + x);
|
}
|
}
|
|
|
// Example use
|
// Example use
|
int main() {
|
int main() {
|
double z = integrate(0.0, 1.0, 50);
|
double z = integrate(0.0, 1.0, 50);
|
return 0 ;
|
return 0 ;
|
}
|
}
|
|
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.