GRINS-0.8.0
gaussian_profiles.C
Go to the documentation of this file.
1 //-----------------------------------------------------------------------bl-
2 //--------------------------------------------------------------------------
3 //
4 // GRINS - General Reacting Incompressible Navier-Stokes
5 //
6 // Copyright (C) 2014-2017 Paul T. Bauman, Roy H. Stogner
7 // Copyright (C) 2010-2013 The PECOS Development Team
8 //
9 // This library is free software; you can redistribute it and/or
10 // modify it under the terms of the Version 2.1 GNU Lesser General
11 // Public License as published by the Free Software Foundation.
12 //
13 // This library is distributed in the hope that it will be useful,
14 // but WITHOUT ANY WARRANTY; without even the implied warranty of
15 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 // Lesser General Public License for more details.
17 //
18 // You should have received a copy of the GNU Lesser General Public
19 // License along with this library; if not, write to the Free Software
20 // Foundation, Inc. 51 Franklin Street, Fifth Floor,
21 // Boston, MA 02110-1301 USA
22 //
23 //-----------------------------------------------------------------------el-
24 
25 
26 // GRINS
27 #include "grins/gaussian_xy_profile.h"
28 
29 // libMesh
30 #include "libmesh/point.h"
31 
32 int main()
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 }
int main()

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