Searched refs:Cinv_contract_E (Results 1 – 1 of 1) sorted by relevance
349 CeedScalar Cinv_contract_E = 0; in ElasFSJacobian_NH() local351 for (CeedInt k = 0; k < 3; k++) Cinv_contract_E += C_inv[j][k] * deltaE[j][k]; in ElasFSJacobian_NH()371 …for (CeedInt k = 0; k < 3; k++) deltaS[j][k] = lambda * Cinv_contract_E * C_inv[j][k] - 2. * (lamb… in ElasFSJacobian_NH()