Home
last modified time | relevance | path

Searched refs:indk (Results 1 – 2 of 2) sorted by relevance

/libCEED/examples/solids/qfunctions/
H A Dfinite-strain-neo-hookean.h102 const CeedInt indj[6] = {0, 1, 2, 1, 0, 0}, indk[6] = {0, 1, 2, 2, 2, 1}; in commonFS() local
105 E2work[m] = grad_u[indj[m]][indk[m]] + grad_u[indk[m]][indj[m]]; in commonFS()
106 for (CeedInt n = 0; n < 3; n++) E2work[m] += grad_u[n][indj[m]] * grad_u[n][indk[m]]; in commonFS()
138 for (CeedInt n = 0; n < 3; n++) Swork[m] += mu * C_inv[indj[m]][n] * E2[n][indk[m]]; in commonFS()
319 const CeedInt indj[6] = {0, 1, 2, 1, 0, 0}, indk[6] = {0, 1, 2, 2, 2, 1}; in ElasFSJacobian_NH() local
323 … n++) deltaEwork[m] += (graddeltau[n][indj[m]] * F[n][indk[m]] + F[n][indj[m]] * graddeltau[n][ind… in ElasFSJacobian_NH()
443 const CeedInt indj[6] = {0, 1, 2, 1, 0, 0}, indk[6] = {0, 1, 2, 2, 2, 1}; in ElasFSEnergy_NH() local
446 E2work[m] = grad_u[indj[m]][indk[m]] + grad_u[indk[m]][indj[m]]; in ElasFSEnergy_NH()
447 for (CeedInt n = 0; n < 3; n++) E2work[m] += grad_u[n][indj[m]] * grad_u[n][indk[m]]; in ElasFSEnergy_NH()
513 const CeedInt indj[6] = {0, 1, 2, 1, 0, 0}, indk[6] = {0, 1, 2, 2, 2, 1}; in ElasFSDiagnostic_NH() local
[all …]
H A Dfinite-strain-mooney-rivlin.h106 const CeedInt indj[6] = {0, 1, 2, 1, 0, 0}, indk[6] = {0, 1, 2, 2, 2, 1}; in commonFSMR() local
109 E2work[m] = grad_u[indj[m]][indk[m]] + grad_u[indk[m]][indj[m]]; in commonFSMR()
110 for (CeedInt n = 0; n < 3; n++) E2work[m] += grad_u[n][indj[m]] * grad_u[n][indk[m]]; in commonFSMR()
319 const CeedInt indj[6] = {0, 1, 2, 1, 0, 0}, indk[6] = {0, 1, 2, 2, 2, 1}; in ElasFSJacobian_MR() local
323 …< 3; n++) dEwork[m] += (graddeltau[n][indj[m]] * F[n][indk[m]] + F[n][indj[m]] * graddeltau[n][ind… in ElasFSJacobian_MR()
380 …ontract_dE * Cinvwork[i] + 2 * (mu_1 + 2 * mu_2 - lambda * logJ) * Cinv_dE_Cinv[indj[i]][indk[i]] + in ElasFSJacobian_MR()
460 const CeedInt indj[6] = {0, 1, 2, 1, 0, 0}, indk[6] = {0, 1, 2, 2, 2, 1}; in ElasFSEnergy_MR() local
463 E2work[m] = grad_u[indj[m]][indk[m]] + grad_u[indk[m]][indj[m]]; in ElasFSEnergy_MR()
464 for (CeedInt n = 0; n < 3; n++) E2work[m] += grad_u[n][indj[m]] * grad_u[n][indk[m]]; in ElasFSEnergy_MR()
552 const CeedInt indj[6] = {0, 1, 2, 1, 0, 0}, indk[6] = {0, 1, 2, 2, 2, 1}; in ElasFSDiagnostic_MR() local
[all …]