43 #ifndef PANZER_STK_SCATTER_CELL_QUANTITY_IMPL_HPP 44 #define PANZER_STK_SCATTER_CELL_QUANTITY_IMPL_HPP 46 #include "Teuchos_Assert.hpp" 48 #include "Phalanx_config.hpp" 49 #include "Phalanx_Evaluator_Macros.hpp" 50 #include "Phalanx_MDField.hpp" 51 #include "Phalanx_DataLayout.hpp" 52 #include "Phalanx_DataLayout_MDALayout.hpp" 57 #include "Teuchos_FancyOStream.hpp" 58 #include "Teuchos_ArrayRCP.hpp" 68 std::string scatterName = p.get<std::string>(
"Scatter Name");
69 int worksetSize = p.get<
int>(
"Workset Size");
71 const std::vector<std::string> & names =
78 for (std::size_t fd = 0; fd < names.size(); ++fd) {
79 scatterFields_[fd] = PHX::MDField<const ScalarT,Cell>(names[fd],dl_cell);
84 PHX::Tag<ScalarT> scatterHolder(scatterName,
Teuchos::rcp(
new PHX::MDALayout<panzer::Dummy>(0)));
85 this->addEvaluatedField(scatterHolder);
87 this->setName(scatterName+
": STK-Scatter Cell Quantity Fields");
105 const std::vector<std::size_t> & localCellIds = this->wda(workset).cell_local_ids;
106 std::string blockId = this->wda(workset).block_id;
108 for(std::size_t fieldIndex=0; fieldIndex<
scatterFields_.size();fieldIndex++) {
111 PHX::MDField<double,panzer::Cell,panzer::NODE>
value = af.
buildStaticArray<double,panzer::Cell,panzer::NODE>(
"",
field.dimension(0),1);
114 for(
unsigned i=0; i<
field.dimension(0);i++)
115 value(i,0) = Sacado::ScalarValue<ScalarT>::eval(
field(i));
117 mesh_->setCellFieldData(
field.fieldTag().name(),blockId,localCellIds,
value);
PHX_POST_REGISTRATION_SETUP(ScatterCellAvgQuantity, d, fm)
PHX::MDField< Scalar, T0 > buildStaticArray(const std::string &str, int d0) const
std::vector< PHX::MDField< const ScalarT, panzer::Cell, panzer::Point > > scatterFields_
PHX_EVALUATE_FIELDS(ScatterCellAvgQuantity, workset)
TEUCHOS_DEPRECATED RCP< T > rcp(T *p, Dealloc_T dealloc, bool owns_mem)
Teuchos::RCP< STK_Interface > mesh_
PHX_EVALUATOR_CTOR(ScatterCellAvgQuantity, p)
PHX::MDField< const ScalarT, Cell, IP > field