GRINS-0.8.0
Functions
gaussian_profiles.C File Reference
#include "grins/gaussian_xy_profile.h"
#include "libmesh/point.h"
Include dependency graph for gaussian_profiles.C:

Go to the source code of this file.

Functions

int main ()
 

Function Documentation

int main ( )

Definition at line 32 of file gaussian_profiles.C.

33 {
34  const double a = 5.0;
35  const double mu = 1.5;
36  const double sigma = 2.1;
37  const double b = 3.2;
38  GRINS::GaussianXYProfile profile( a, mu, sigma, b );
39 
40  const double x = 1.1;
41  const double y = 1.5;
42 
43  libMesh::Point p( x, y );
44 
45  const double value = profile( p, 0.0 );
46 
47  const double r = std::sqrt( x*x + y*y);
48  const double exact_value = a*std::exp( -(r-mu)*(r-mu)/(2.0*sigma*sigma) ) - b;
49 
50  const double error = std::fabs( value - exact_value);
51  const double tol = 1.0e-15;
52 
53  int return_flag = 0;
54 
55  if( error > tol )
56  {
57  std::cout << "Error: GaussianXYProfile tolerance exceeded." << std::endl
58  << "exact value = " << exact_value << std::endl
59  << "value = " << value << std::endl
60  << "error = " << error << std::endl
61  << "tolerance = " << tol << std::endl;
62  return_flag = 1;
63  }
64 
65  return return_flag;
66 }

Generated on Tue Dec 19 2017 12:47:29 for GRINS-0.8.0 by  doxygen 1.8.9.1