material_property_isotropic_mg_src.h

Go to the documentation of this file.

#ifndef CHI_PHYSICS_PROPERTY_ISOTROPIC_MG_SRC_H
#define CHI_PHYSICS_PROPERTY_ISOTROPIC_MG_SRC_H
 
#include "material_property_base.h"
 
namespace chi_physics
{
 
//###################################################################
/** Basic thermal conductivity material property.*/
class IsotropicMultiGrpSource : public chi_physics::MaterialProperty
{
public:
  std::vector<double> source_value_g_;
 
  IsotropicMultiGrpSource() :
    MaterialProperty(PropertyType::ISOTROPIC_MG_SOURCE) {}
 
  void PushLuaTable(lua_State* L) const override
  {
    lua_newtable(L);
    lua_pushstring(L,"is_empty");
    lua_pushboolean(L,false);
    lua_settable(L,-3);
 
    lua_pushstring(L,"G");
    lua_pushnumber(L, source_value_g_.size());
    lua_settable(L,-3);
 
    lua_pushstring(L,"source_value_g");
    lua_newtable(L);
    int g=0;
    for (auto val : source_value_g_)
    {
      ++g;
      lua_pushnumber(L,g);
      lua_pushnumber(L,val);
      lua_settable(L,-3);
    }
    lua_settable(L,-3);
  }
};
 
}
 
#endif //CHI_PHYSICS_PROPERTY_ISOTROPIC_MG_SRC_H