Skip to content
Snippets Groups Projects
Commit 7eb3af9c authored by Oliver Sander's avatar Oliver Sander Committed by sander@FU-BERLIN.DE
Browse files

fix two index bugs in compute_dDR_dv

[[Imported from SVN: r8566]]
parent dbd788e5
No related branches found
No related tags found
No related merge requests found
...@@ -171,14 +171,14 @@ public: // for testing ...@@ -171,14 +171,14 @@ public: // for testing
for (int v_i=0; v_i<4; v_i++) for (int v_i=0; v_i<4; v_i++)
for (int l=0; l<4; l++) for (int l=0; l<4; l++)
for (int m=0; m<4; m++) for (int m=0; m<4; m++)
dDR_dv[i][j][k][v_i] += dd_dq_dq[j][i][l][m] * derOfValueWRTx[l+3][k] * derOfValueWRTCoefficient[m+3][v_i+3]; dDR_dv[i][j][k][v_i] += dd_dq_dq[j][i][l][m] * derOfValueWRTx[l+3][k] * derOfValueWRTCoefficient[v_i+3][m+3];
for (int i=0; i<3; i++) for (int i=0; i<3; i++)
for (int j=0; j<3; j++) for (int j=0; j<3; j++)
for (int k=0; k<gridDim; k++) for (int k=0; k<gridDim; k++)
for (int v_i=0; v_i<4; v_i++) for (int v_i=0; v_i<4; v_i++)
for (int l=0; l<4; l++) for (int l=0; l<4; l++)
dDR_dv[i][j][k][v_i] += dd_dq[j][i][l] * derOfGradientWRTCoefficient[l+3][v_i+3][k]; dDR_dv[i][j][k][v_i] += dd_dq[j][i][l] * derOfGradientWRTCoefficient[v_i+3][l+3][k];
// Project onto the tangent space at M(q) // Project onto the tangent space at M(q)
Dune::FieldMatrix<double,3,3> Mtmp; Dune::FieldMatrix<double,3,3> Mtmp;
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment