Lines Matching refs:spintdim
1441 PetscInt nodeIdxDim, spintdim; in PetscDualSpaceLagrangeCreateAllNodeIdx() local
1462 PetscCall(PetscSectionGetDof(section, 0, &spintdim)); in PetscDualSpaceLagrangeCreateAllNodeIdx()
1463 if (spintdim) { in PetscDualSpaceLagrangeCreateAllNodeIdx()
1464 PetscCall(PetscArraycpy(ni->nodeIdx, lag->intNodeIndices->nodeIdx, spintdim * nodeIdxDim)); in PetscDualSpaceLagrangeCreateAllNodeIdx()
1465 PetscCall(PetscArraycpy(ni->nodeVec, lag->intNodeIndices->nodeVec, spintdim * Nk)); in PetscDualSpaceLagrangeCreateAllNodeIdx()
2171 sp->spdim = sp->spintdim = spdim; in PetscDualSpaceSetUp_Lagrange()
2449 PetscCall(PetscSectionGetConstrainedStorageSize(section, &sp->spintdim)); in PetscDualSpaceSetUp_Lagrange()
2480 if (!sp->spintdim) { in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()
2682 PetscInt spintdim; in PetscDualSpaceGetSymmetries_Lagrange() local
2696 spintdim = sp->spintdim; in PetscDualSpaceGetSymmetries_Lagrange()
2701 …if (spintdim && 0 < dim && dim < 3 && (lag->tensorSpace == lag->tensorCell)) { /* compute self sym… in PetscDualSpaceGetSymmetries_Lagrange()
2716 …PetscCheck(nNodes * nCopies == spintdim, PETSC_COMM_SELF, PETSC_ERR_PLIB, "Node indices incompatib… in PetscDualSpaceGetSymmetries_Lagrange()
2724 PetscCall(PetscMalloc1(spintdim, &perm)); in PetscDualSpaceGetSymmetries_Lagrange()
2725 PetscCall(PetscCalloc1(spintdim, &flips)); in PetscDualSpaceGetSymmetries_Lagrange()
2726 for (i = 0; i < spintdim; i++) perm[i] = -1; in PetscDualSpaceGetSymmetries_Lagrange()
2755 for (i = 0; i < spintdim; i++) in PetscDualSpaceGetSymmetries_Lagrange()
2757 if (i == spintdim) { in PetscDualSpaceGetSymmetries_Lagrange()
2762 for (i = 0; i < spintdim; i++) in PetscDualSpaceGetSymmetries_Lagrange()
2764 if (i == spintdim) { in PetscDualSpaceGetSymmetries_Lagrange()