667 {
669 if (!this->timeScalingFun.empty())
670 this->locF *= this->timeScalingFun(this->getFEMethod()->ts_t);
671 if (!this->feScalingFun.empty())
672 this->locF *= this->feScalingFun(this->getFEMethod());
674 auto *vec_ptr = this->locF.data().data();
675 const auto nb_dofs = row_data.getIndices().size();
676 auto *ind_ptr = row_data.getIndices().data().data();
678 }
680 const auto field_ents = row_data.getFieldEntities();
681 std::vector<EntityHandle> ents(field_ents.size());
682 std::transform(field_ents.begin(), field_ents.end(), ents.begin(),
683 [](const auto *fe) { return fe->getEnt(); });
684 if (field_ents.empty())
688 auto &moab = this->getMoab();
691 topo_values.data().data());
692 topo_values += this->locF;
694 topo_values.data().data());
695 }
697 }
#define MoFEMFunctionReturnHot(a)
Last executable line of each PETSc function used for error handling. Replaces return()
#define MoFEMFunctionBegin
First executable line of each MoFEM function, used for error handling. Final line of MoFEM functions ...
#define MoFEMFunctionReturn(a)
Last executable line of each PETSc function used for error handling. Replaces return()
#define CHKERR
Inline error check.
UBlasVector< double > VectorDouble
auto type_from_handle(const EntityHandle h)
get type from entity handle
MoFEMErrorCode VecSetValues(Vec V, const EntitiesFieldData::EntData &data, const double *ptr, InsertMode iora)
Assemble PETSc vector.