89   for (CeedInt m = 0; m < 6; m++) Ainv[m] = B[m] / (detA);  in computeMatinvSym()  local
104   for (CeedInt m = 0; m < 6; m++) {  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()
136   for (CeedInt m = 0; m < 6; m++) {  in commonFS()  local
137     Swork[m] = (lambda * (*logJ)) * Cinvwork[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()
201         for (CeedInt m = 0; m < 3; m++) grad_u[j][k][i] += dXdx[m][k] * du[j][m];  in ElasFSResidual_NH()  local
234         for (CeedInt m = 0; m < 3; m++) P[j][k] += F[j][m] * S[m][k];  in ElasFSResidual_NH()  local
242         for (CeedInt m = 0; m < 3; m++) dvdX[k][j][i] += dXdx[k][m] * P[j][m] * wdetJ;  in ElasFSResidual_NH()  local
297         for (CeedInt m = 0; m < 3; m++) graddeltau[j][k] += dXdx[m][k] * deltadu[j][m];  in ElasFSJacobian_NH()  local
321     for (CeedInt m = 0; m < 6; m++) {  in ElasFSJacobian_NH()  local
322       deltaEwork[m] = 0;  in ElasFSJacobian_NH()
323 …Int n = 0; n < 3; n++) deltaEwork[m] += (graddeltau[n][indj[m]] * F[n][indk[m]] + F[n][indj[m]] * …  in ElasFSJacobian_NH()
358         for (CeedInt m = 0; m < 3; m++) deltaECinv[j][k] += deltaE[j][m] * C_inv[m][k];  in ElasFSJacobian_NH()  local
366         for (CeedInt m = 0; m < 3; m++) deltaS[j][k] += C_inv[j][m] * deltaECinv[m][k];  in ElasFSJacobian_NH()  local
379 …for (CeedInt m = 0; m < 3; m++) deltaP[j][k] += graddeltau[j][m] * S[m][k] + F[j][m] * deltaS[m][k…  in ElasFSJacobian_NH()  local
387         for (CeedInt m = 0; m < 3; m++) deltadvdX[k][j][i] += dXdx[k][m] * deltaP[j][m] * wdetJ;  in ElasFSJacobian_NH()  local
437         for (int m = 0; m < 3; m++) grad_u[j][k] += dXdx[m][k] * du[j][m];  in ElasFSEnergy_NH()  local
445     for (CeedInt m = 0; m < 6; m++) {  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()
507         for (int m = 0; m < 3; m++) grad_u[j][k] += dXdx[m][k] * du[j][m];  in ElasFSDiagnostic_NH()  local
515     for (CeedInt m = 0; m < 6; m++) {  in ElasFSDiagnostic_NH()  local
516       E2work[m] = grad_u[indj[m]][indk[m]] + grad_u[indk[m]][indj[m]];  in ElasFSDiagnostic_NH()
517       for (CeedInt n = 0; n < 3; n++) E2work[m] += grad_u[n][indj[m]] * grad_u[n][indk[m]];  in ElasFSDiagnostic_NH()
539       for (CeedInt m = 0; m < 3; m++) diagnostic[5][i] += E2[j][m] * E2[m][j] / 4.;  in ElasFSDiagnostic_NH()  local