Panzer_ParameterLibraryUtilities.cpp

Go to the documentation of this file.

// @HEADER
// *****************************************************************************
//           Panzer: A partial differential equation assembly
//       engine for strongly coupled complex multiphysics systems
//
// Copyright 2011 NTESS and the Panzer contributors.
// SPDX-License-Identifier: BSD-3-Clause
// *****************************************************************************
// @HEADER
 
#ifndef PANZER_PARAMETER_LIBRARY_UTILITIES_CPP
#define PANZER_PARAMETER_LIBRARY_UTILITIES_CPP
 
#include "Panzer_ParameterLibraryUtilities.hpp"
 
namespace panzer {
 
struct RegisterScalarParameter {
  std::string name;
  Teuchos::Ptr<panzer::ParamLib> pl;
 
  template <typename T>
  void apply() const
  { createAndRegisterScalarParameter<T>(name,*pl); }
};
 
void registerScalarParameter(const std::string name,panzer::ParamLib& pl,double realValue)
{
  RegisterScalarParameter rsp; 
  rsp.name = name;
  rsp.pl = Teuchos::ptrFromRef(pl);
 
  rsp.apply<panzer::Traits::Residual>();
  rsp.apply<panzer::Traits::Jacobian>();
  rsp.apply<panzer::Traits::Tangent>();
#ifdef    Panzer_BUILD_HESSIAN_SUPPORT
  rsp.apply<panzer::Traits::Hessian>();
#endif // Panzer_BUILD_HESSIAN_SUPPORT
 
  pl.setRealValueForAllTypes(name,realValue);
}
 
}
 
#endif