Open pkottmanjr opened 8 months ago
For reference: the profiles we want for numerical experiments - (formula resp. implementation):
viscosity[eps_, r_] := viscosity1 + viscosity2 * hEps[eps, r-R];
viscosity[eps_, r_] := viscosity1 + viscosity2 * D[hEps[eps, r-R], r];
viscosity[eps_, r_] := viscosity1 * c/r^(2*q) * Abs[ -3/(r * specVol[eps, r]) + D[specVol[eps, r], r]]^q;
For the full power law, we want 2 separate cases:
For the revised article, we have decided to: