Commit 1b08c01a authored by Martin Schneider's avatar Martin Schneider
Browse files

[flux][forchheimer] Extend to full permeability tensors

parent 57c6acfa
......@@ -327,19 +327,22 @@ private:
{
for (int k = 0; k <= i; k++)
{
derivative[i][k] = sqrtK[i][i] * velocity[i] * velocity[k] * forchCoeff
derivative[i][k] = velocity[i] * velocity[k] * forchCoeff
/ absV * rhoOverMu;
if (k < i)
derivative[k][i] = derivative[i][k];
}
}
derivative = sqrtK * derivative;
}
// add on the main diagonal:
// 1 + sqrtK_i forchCoeff density |v| / viscosity
// Id + sqrtK forchCoeff density |v| / viscosity
DimWorldMatrix Id(0.0);
for (int i = 0; i < dim; i++)
derivative[i][i] += (1.0 + (sqrtK[i][i]*forchCoeff * absV * rhoOverMu));
Id[i][i] = 1.0;
derivative += Id + (forchCoeff * absV * rhoOverMu)*sqrtK;
}
/*!
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment