Lines Matching refs:dE
2367 const PetscInt dE = fegeom->dimEmbed; in PetscFEEvaluateFieldJets_Internal() local
2378 for (d = 0; d < dE * Ncf; ++d) u_x[fOffset * dE + d] = 0.0; in PetscFEEvaluateFieldJets_Internal()
2384 …for (d = 0; d < cdim; ++d) u_x[(fOffset + c) * dE + d] += Dq[cidx * cdim + d] * coefficients[dOffs… in PetscFEEvaluateFieldJets_Internal()
2388 for (g = 0; g < Nf; ++g) hOffset += T[g]->Nc * dE; in PetscFEEvaluateFieldJets_Internal()
2389 for (d = 0; d < dE * dE * Ncf; ++d) u_x[hOffset + fOffset * dE * dE + d] = 0.0; in PetscFEEvaluateFieldJets_Internal()
2394 …for (d = 0; d < cdim * cdim; ++d) u_x[hOffset + (fOffset + c) * dE * dE + d] += Hq[cidx * cdim * c… in PetscFEEvaluateFieldJets_Internal()
2397 PetscCall(PetscFEPushforwardHessian(fe, fegeom, 1, &u_x[hOffset + fOffset * dE * dE])); in PetscFEEvaluateFieldJets_Internal()
2400 PetscCall(PetscFEPushforwardGradient(fe, fegeom, 1, &u_x[fOffset * dE])); in PetscFEEvaluateFieldJets_Internal()
2434 const PetscInt dE = fegeom->dimEmbed; in PetscFEEvaluateFieldJets_Hybrid_Internal() local
2449 for (d = 0; d < dE * Ncf; ++d) u_x[fOffset * dE + d] = 0.0; in PetscFEEvaluateFieldJets_Hybrid_Internal()
2455 …for (d = 0; d < dEt; ++d) u_x[(fOffset + c) * dE + d] += Dq[cidx * dEt + d] * coefficients[dOffset… in PetscFEEvaluateFieldJets_Hybrid_Internal()
2459 …scCall(PetscFEPushforwardGradient(fe, isCohesive ? fegeom : &fegeomNbr[s], 1, &u_x[fOffset * dE])); in PetscFEEvaluateFieldJets_Hybrid_Internal()
2505 const PetscInt dE = fegeom->dimEmbed; in PetscFEUpdateElementVec_Internal() local
2519 …for (d = 0; d < dEt; ++d) tmpBasisDer[bcidx * dE + d] = basisDer[q * Nb * Nc * dEt + bcidx * dEt +… in PetscFEUpdateElementVec_Internal()
2520 for (d = dEt; d < dE; ++d) tmpBasisDer[bcidx * dE + d] = 0.0; in PetscFEUpdateElementVec_Internal()
2532 for (d = 0; d < dE; ++d) elemVec[b] += tmpBasisDer[bcidx * dE + d] * f1[qcidx * dE + d]; in PetscFEUpdateElementVec_Internal()
2541 const PetscInt dE = T->cdim; in PetscFEUpdateElementVec_Hybrid_Internal() local
2546 const PetscReal *basisDer = &T->T[1][r * Nq * Nb * Nc * dE]; in PetscFEUpdateElementVec_Hybrid_Internal()
2554 …for (PetscInt d = 0; d < dE; ++d) tmpBasisDer[bcidx * dE + d] = basisDer[q * Nb * Nc * dE + bcidx … in PetscFEUpdateElementVec_Hybrid_Internal()
2569 …for (PetscInt d = 0; d < dE; ++d) elemVec[Nb * s + b] += tmpBasisDer[bcidx * dE + d] * f1[qcidx * … in PetscFEUpdateElementVec_Hybrid_Internal()
2581 …for (PetscInt d = 0; d < dE; ++d) elemVec[Nb * side + b] += tmpBasisDer[bcidx * dE + d] * f1[qcidx… in PetscFEUpdateElementVec_Hybrid_Internal()
2648 const PetscInt dE = fegeom->dimEmbed; in PetscFEUpdateElementMat_Internal() local
2665 … for (PetscInt df = 0; df < cdim; ++df) tmpBasisDerI[fidx * dE + df] = basisDerI[fidx * cdim + df]; in PetscFEUpdateElementMat_Internal()
2676 … for (PetscInt dg = 0; dg < cdim; ++dg) tmpBasisDerJ[gidx * dE + dg] = basisDerJ[gidx * cdim + dg]; in PetscFEUpdateElementMat_Internal()
2703 if (dE == 2) { in PetscFEUpdateElementMat_Internal()
2705 } else if (dE == 3) { in PetscFEUpdateElementMat_Internal()
2708 petsc_elemmat_kernel_g1(NbI, NcI, NbJ, NcJ, dE); in PetscFEUpdateElementMat_Internal()
2724 …for (PetscInt df = 0; df < dE; ++df) elemMat[fOff] += bI * g1[(fc * NcJ + gc) * dE + df] * tmpBasi… in PetscFEUpdateElementMat_Internal()
2733 if (dE == 2) { in PetscFEUpdateElementMat_Internal()
2735 } else if (dE == 3) { in PetscFEUpdateElementMat_Internal()
2738 petsc_elemmat_kernel_g2(NbI, NcI, NbJ, NcJ, dE); in PetscFEUpdateElementMat_Internal()
2754 …for (PetscInt df = 0; df < dE; ++df) elemMat[fOff] += tmpBasisDerI[fidx * dE + df] * g2[(fc * NcJ … in PetscFEUpdateElementMat_Internal()
2763 if (dE == 2) { in PetscFEUpdateElementMat_Internal()
2765 } else if (dE == 3) { in PetscFEUpdateElementMat_Internal()
2768 petsc_elemmat_kernel_g3(NbI, NcI, NbJ, NcJ, dE); in PetscFEUpdateElementMat_Internal()
2784 for (PetscInt df = 0; df < dE; ++df) { in PetscFEUpdateElementMat_Internal()
2785 … dg = 0; dg < dE; ++dg) elemMat[fOff] += tmpBasisDerI[fidx * dE + df] * g3[((fc * NcJ + gc) * dE +… in PetscFEUpdateElementMat_Internal()
2802 const PetscInt dE = TI->cdim; in PetscFEUpdateElementMat_Hybrid_Internal() local
2807 const PetscReal *basisDerI = &TI->T[1][(r * NqI + q) * NbI * NcI * dE]; in PetscFEUpdateElementMat_Hybrid_Internal()
2812 const PetscReal *basisDerJ = &TJ->T[1][(r * NqJ + q) * NbJ * NcJ * dE]; in PetscFEUpdateElementMat_Hybrid_Internal()
2822 for (df = 0; df < dE; ++df) tmpBasisDerI[fidx * dE + df] = basisDerI[fidx * dE + df]; in PetscFEUpdateElementMat_Hybrid_Internal()
2832 for (dg = 0; dg < dE; ++dg) tmpBasisDerJ[gidx * dE + dg] = basisDerJ[gidx * dE + dg]; in PetscFEUpdateElementMat_Hybrid_Internal()
2849 for (df = 0; df < dE; ++df) { in PetscFEUpdateElementMat_Hybrid_Internal()
2850 … elemMat[fOff] += tmpBasisI[fidx] * g1[(fc * NcJ + gc) * dE + df] * tmpBasisDerJ[gidx * dE + df]; in PetscFEUpdateElementMat_Hybrid_Internal()
2851 … elemMat[fOff] += tmpBasisDerI[fidx * dE + df] * g2[(fc * NcJ + gc) * dE + df] * tmpBasisJ[gidx]; in PetscFEUpdateElementMat_Hybrid_Internal()
2852 …(dg = 0; dg < dE; ++dg) elemMat[fOff] += tmpBasisDerI[fidx * dE + df] * g3[((fc * NcJ + gc) * dE +… in PetscFEUpdateElementMat_Hybrid_Internal()
2901 const PetscInt dE = dimEmbed;
2919 for (PetscInt i = 0; i < NcI * NcJ * dE; i++)
2922 for (PetscInt i = 0; i < NcI * NcJ * dE; i++)
2925 for (PetscInt i = 0; i < NcI * NcJ * dE * dE; i++)
2928 if (g1_i == NbI * NbJ * NcI * NcJ * dE) g1_i = 0;
2929 if (g2_i == NbI * NbJ * NcI * NcJ * dE) g2_i = 0;
2930 if (g3_i == NbI * NbJ * NcI * NcJ * dE * dE) g3_i = 0;
2962 for (PetscInt df = 0; df < dE; ++df) {
2964 if (g1[(fc * NcJ + gc) * dE + df]) {
2966 g1_idxs[4 * g1_i + 1] = (fc * NcJ + gc) * dE + df;
2967 g1_idxs[4 * g1_i + 2] = gidx * dE + df;
2973 if (g2[(fc * NcJ + gc) * dE + df]) {
2974 g2_idxs[4 * g2_i + 0] = fidx * dE + df;
2975 g2_idxs[4 * g2_i + 1] = (fc * NcJ + gc) * dE + df;
2982 for (PetscInt dg = 0; dg < dE; ++dg) {
2983 if (g3[((fc * NcJ + gc) * dE + df) * dE + dg]) {
2984 g3_idxs[4 * g3_i + 0] = fidx * dE + df;
2985 g3_idxs[4 * g3_i + 1] = ((fc * NcJ + gc) * dE + df) * dE + dg;
2986 g3_idxs[4 * g3_i + 2] = gidx * dE + dg;