3871 {
3873
3876
3877 const int nb_gauss_pts = data.
getN().size1();
3878
3881
3884
3885 auto t_state_gp =
3887
3888 auto t_lagrange_slave =
3891
3892 for (int gg = 0; gg != nb_gauss_pts; gg++) {
3894
3898 t_state_gp = 1;
3899 }
3900
3904 t_state_gp = 1;
3905 }
3906
3907 ++t_lagrange_slave;
3908 ++t_gap_gp;
3909 ++t_state_gp;
3910 }
3911
3915 indices.data(), &
vecR[0], ADD_VALUES);
3916
3918}
#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.
static auto getFTensor0FromVec(ublas::vector< T, A > &data)
Get tensor rank 0 (scalar) form data vector.
MoFEMErrorCode VecSetValues(Vec V, const EntitiesFieldData::EntData &data, const double *ptr, InsertMode iora)
Assemble PETSc vector.
MatrixDouble & getN(const FieldApproximationBase base)
get base functions this return matrix (nb. of rows is equal to nb. of Gauss pts, nb....
const VectorInt & getIndices() const
Get global indices of dofs on entity.