Searched refs:scalar_n (Results 1 – 1 of 1) sorted by relevance
74 PetscInt scalar_n; in PetscFESetUp_Vector() local81 PetscCall(PetscFEGetDimension(v->scalar_fe, &scalar_n)); in PetscFESetUp_Vector()86 n = Ncopies * scalar_n; in PetscFESetUp_Vector()88 PetscCall(PetscMalloc2(scalar_n, &d, scalar_n, &d_mapped)); in PetscFESetUp_Vector()89 for (PetscInt i = 0; i < scalar_n; i++) d[i] = i; in PetscFESetUp_Vector()91 PetscCall(ISLocalToGlobalMappingApply(sum->all_rows[c], scalar_n, d, d_mapped)); in PetscFESetUp_Vector()92 for (PetscInt i = 0; i < scalar_n; i++) { in PetscFESetUp_Vector()95 const PetscReal *row_r = &v->scalar_fe->invV[i * scalar_n]; in PetscFESetUp_Vector()96 PetscInt j0 = v->interleave_basis ? c : c * scalar_n; in PetscFESetUp_Vector()99 for (PetscInt j = 0; j < scalar_n; j++) row_w[j0 + j * jstride] = row_r[j]; in PetscFESetUp_Vector()