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.

{
  const double a = 5.0;
  const double mu = 1.5;
  const double sigma = 2.1;
  const double b = 3.2;
  GRINS::GaussianXYProfile profile( a, mu, sigma, b );

  const double x = 1.1;
  const double y = 1.5;

  libMesh::Point p( x, y );

  const double value = profile( p, 0.0 );

  const double r = std::sqrt( x*x + y*y);
  const double exact_value = a*std::exp( -(r-mu)*(r-mu)/(2.0*sigma*sigma) ) - b;

  const double error = std::fabs( value - exact_value);
  const double tol = 1.0e-15;

  int return_flag = 0;

  if( error > tol )
    {
      std::cout << "Error: GaussianXYProfile tolerance exceeded." << std::endl
                << "exact value = " << exact_value << std::endl
                << "value = " << value << std::endl
                << "error = " << error << std::endl
                << "tolerance = " << tol << std::endl;
      return_flag = 1;
    }

  return return_flag;
}