201       for (CeedInt k = 0; k < 3; k++) {  // Derivative  in ElasFSResidual_MR()  local
202         grad_u[j][k][i] = 0;  in ElasFSResidual_MR()
203         for (CeedInt m = 0; m < 3; m++) grad_u[j][k][i] += dXdx[m][k] * du[j][m];  in ElasFSResidual_MR()
235       for (CeedInt k = 0; k < 3; k++) {  in ElasFSResidual_MR()  local
236         P[j][k] = 0;  in ElasFSResidual_MR()
237         for (CeedInt m = 0; m < 3; m++) P[j][k] += F[j][m] * S[m][k];  in ElasFSResidual_MR()
243       for (CeedInt k = 0; k < 3; k++) {  // Derivative  in ElasFSResidual_MR()  local
244         dvdX[k][j][i] = 0;  in ElasFSResidual_MR()
245         for (CeedInt m = 0; m < 3; m++) dvdX[k][j][i] += dXdx[k][m] * P[j][m] * wdetJ;  in ElasFSResidual_MR()
294       for (CeedInt k = 0; k < 3; k++) {  // Derivative  in ElasFSJacobian_MR()  local
295         graddeltau[j][k] = 0;  in ElasFSJacobian_MR()
296         for (CeedInt m = 0; m < 3; m++) graddeltau[j][k] += dXdx[m][k] * deltadu[j][m];  in ElasFSJacobian_MR()
345       for (CeedInt k = 0; k < 3; k++) Cinv_contract_dE += C_inv[j][k] * dE[j][k];  in ElasFSJacobian_MR()  local
351       for (CeedInt k = 0; k < 3; k++) C_contract_dE += C[j][k] * dE[j][k];  in ElasFSJacobian_MR()  local
357       for (CeedInt k = 0; k < 3; k++) {  in ElasFSJacobian_MR()  local
358         dE_Cinv[j][k] = 0;  in ElasFSJacobian_MR()
359         for (CeedInt m = 0; m < 3; m++) dE_Cinv[j][k] += dE[j][m] * C_inv[m][k];  in ElasFSJacobian_MR()
367       for (CeedInt k = 0; k < 3; k++) {  in ElasFSJacobian_MR()  local
368         Cinv_dE_Cinv[j][k] = 0;  in ElasFSJacobian_MR()
369         for (CeedInt m = 0; m < 3; m++) Cinv_dE_Cinv[j][k] += C_inv[j][m] * dE_Cinv[m][k];  in ElasFSJacobian_MR()
398       for (CeedInt k = 0; k < 3; k++) {  in ElasFSJacobian_MR()  local
399         dP[j][k] = 0;  in ElasFSJacobian_MR()
400         for (CeedInt m = 0; m < 3; m++) dP[j][k] += graddeltau[j][m] * S[m][k] + F[j][m] * dS[m][k];  in ElasFSJacobian_MR()
406       for (CeedInt k = 0; k < 3; k++) {  // Derivative  in ElasFSJacobian_MR()  local
407         deltadvdX[k][j][i] = 0;  in ElasFSJacobian_MR()
408         for (CeedInt m = 0; m < 3; m++) deltadvdX[k][j][i] += dXdx[k][m] * dP[j][m] * wdetJ;  in ElasFSJacobian_MR()
452       for (int k = 0; k < 3; k++) {  // Derivative  in ElasFSEnergy_MR()  local
453         grad_u[j][k] = 0;  in ElasFSEnergy_MR()
454         for (int m = 0; m < 3; m++) grad_u[j][k] += dXdx[m][k] * du[j][m];  in ElasFSEnergy_MR()
482       for (CeedInt k = 0; k < 3; k++) {  in ElasFSEnergy_MR()  local
483         CC[j][k] = 0;  in ElasFSEnergy_MR()
484         for (CeedInt m = 0; m < 3; m++) CC[j][k] += C[j][m] * C[m][k];  in ElasFSEnergy_MR()
544       for (int k = 0; k < 3; k++) {  // Derivative  in ElasFSDiagnostic_MR()  local
545         grad_u[j][k] = 0;  in ElasFSDiagnostic_MR()
546         for (int m = 0; m < 3; m++) grad_u[j][k] += dXdx[m][k] * du[j][m];  in ElasFSDiagnostic_MR()
592       for (CeedInt k = 0; k < 3; k++) {  in ElasFSDiagnostic_MR()  local
593         CC[j][k] = 0;  in ElasFSDiagnostic_MR()
594         for (CeedInt m = 0; m < 3; m++) CC[j][k] += C[j][m] * C[m][k];  in ElasFSDiagnostic_MR()