constant_catalycity_unit.C File Reference

#include "grins/constant_catalycity.h"

Include dependency graph for constant_catalycity_unit.C:

Go to the source code of this file.

Functions
int	main ()

Function Documentation

int main

(

)

Definition at line 28 of file constant_catalycity_unit.C.

References GRINS::ConstantCatalycity::dT(), and GRINS::ConstantCatalycity::set_params().

{
  double gamma0 = 0.01;

  GRINS::ConstantCatalycity gamma( gamma0 );

  double T1 = 10.0;

  double tol = std::numeric_limits<double>::epsilon()*10;

  int return_flag = 0;

  if( std::fabs( gamma(T1) - gamma0 ) > tol )
    {
      std::cerr << "Error: mismatch in gamma" << std::endl
                << "       gamma       = " << gamma(T1) << std::endl
                << "       gamma exact = " << gamma0 << std::endl;

      return_flag = 1;
    }

  if( std::fabs( gamma.dT(T1) ) > tol )
    {
      std::cerr << "Error: mismatch in dgamma_dT" << std::endl
                << "       dgamma_dT       = " << gamma.dT(T1) << std::endl
                << "       dgamma_dT exact = " << 0.0 << std::endl;

      return_flag = 1;
    }

  std::vector<double> gamma1;
  gamma1.push_back( 1.0e-5 );

  gamma.set_params( gamma1 );

  if( std::fabs( gamma(T1) - gamma1[0] ) > tol )
    {
      std::cerr << "Error: mismatch in gamma" << std::endl
                << "       gamma       = " << gamma(T1) << std::endl
                << "       gamma exact = " << gamma0 << std::endl;

      return_flag = 1;
    }

  if( std::fabs( gamma.dT(T1) ) > tol )
    {
      std::cerr << "Error: mismatch in dgamma_dT" << std::endl
                << "       dgamma_dT       = " << gamma.dT(T1) << std::endl
                << "       dgamma_dT exact = " << 0.0 << std::endl;

      return_flag = 1;
    }

  return return_flag;
}