heat_transfer_base.C

Go to the documentation of this file.

//-----------------------------------------------------------------------bl-
//--------------------------------------------------------------------------
//
// GRINS - General Reacting Incompressible Navier-Stokes
//
// Copyright (C) 2014-2016 Paul T. Bauman, Roy H. Stogner
// Copyright (C) 2010-2013 The PECOS Development Team
//
// This library is free software; you can redistribute it and/or
// modify it under the terms of the Version 2.1 GNU Lesser General
// Public License as published by the Free Software Foundation.
//
// This library is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
// Lesser General Public License for more details.
//
// You should have received a copy of the GNU Lesser General Public
// License along with this library; if not, write to the Free Software
// Foundation, Inc. 51 Franklin Street, Fifth Floor,
// Boston, MA  02110-1301  USA
//
//-----------------------------------------------------------------------el-


// This class
#include "grins/heat_transfer_base.h"

// GRINS
#include "grins_config.h"
#include "grins/common.h"
#include "grins/assembly_context.h"
#include "grins/heat_transfer_macros.h"
#include "grins/materials_parsing.h"
#include "grins/variables_parsing.h"
#include "grins/variable_warehouse.h"

// libMesh
#include "libmesh/utility.h"
#include "libmesh/string_to_enum.h"
#include "libmesh/getpot.h"
#include "libmesh/fem_system.h"

namespace GRINS
{
  template<class K>
  HeatTransferBase<K>::HeatTransferBase( const std::string& physics_name,
                                         const std::string& core_physics_name,
                                         const GetPot& input )
    : Physics(physics_name, input),
      _flow_vars(input,PhysicsNaming::incompressible_navier_stokes()),
      _press_var(input,PhysicsNaming::incompressible_navier_stokes(), true /*is_constraint_var*/),
      _temp_vars(input,PhysicsNaming::heat_transfer()),
      _rho(0.0),
      _Cp(0.0),
      _k(input,MaterialsParsing::material_name(input,core_physics_name))
  {
    MaterialsParsing::read_density( core_physics_name, input, (*this), this->_rho );

    MaterialsParsing::read_specific_heat( core_physics_name, input, (*this), this->_Cp );

    this->register_variables();
  }

  template<class K>
  void HeatTransferBase<K>::register_variables()
  {
    GRINSPrivate::VariableWarehouse::check_and_register_variable(VariablesParsing::pressure_section(),
                                                                 this->_press_var);
    GRINSPrivate::VariableWarehouse::check_and_register_variable(VariablesParsing::velocity_section(),
                                                                 this->_flow_vars);
    GRINSPrivate::VariableWarehouse::check_and_register_variable(VariablesParsing::temperature_section(),
                                                                 this->_temp_vars);
  }

  template<class K>
  void HeatTransferBase<K>::init_variables( libMesh::FEMSystem* system )
  {
    // Get libMesh to assign an index for each variable
    this->_dim = system->get_mesh().mesh_dimension();

    _flow_vars.init(system);
    this->_press_var.init(system);
    _temp_vars.init(system);

    return;
  }

  template<class K>
  void HeatTransferBase<K>::set_time_evolving_vars( libMesh::FEMSystem* system )
  {
    // Tell the system to march temperature forward in time
    system->time_evolving(_temp_vars.T());

    return;
  }

  template<class K>
  void HeatTransferBase<K>::init_context( AssemblyContext& context )
  {
    // We should prerequest all the data
    // we will need to build the linear system
    // or evaluate a quantity of interest.
    context.get_element_fe(_temp_vars.T())->get_JxW();
    context.get_element_fe(_temp_vars.T())->get_phi();
    context.get_element_fe(_temp_vars.T())->get_dphi();
    context.get_element_fe(_temp_vars.T())->get_xyz();

    context.get_side_fe(_temp_vars.T())->get_JxW();
    context.get_side_fe(_temp_vars.T())->get_phi();
    context.get_side_fe(_temp_vars.T())->get_dphi();
    context.get_side_fe(_temp_vars.T())->get_xyz();

    return;
  }

  template<class K>
  void HeatTransferBase<K>::register_parameter
    ( const std::string & param_name,
      libMesh::ParameterMultiAccessor<libMesh::Number> & param_pointer )
    const
  {
    ParameterUser::register_parameter(param_name, param_pointer);
    _k.register_parameter(param_name, param_pointer);
  }

} // namespace GRINS

// Instantiate
INSTANTIATE_HEAT_TRANSFER_SUBCLASS(HeatTransferBase);