tcngf-pf.c: fix order of initial stress computations - cngf-pf - continuum mode… | |
git clone git://src.adamsgaard.dk/cngf-pf | |
Log | |
Files | |
Refs | |
README | |
LICENSE | |
--- | |
commit bcfdeee0984251238a21f42b6491db14638ce373 | |
parent 8050a4f258c3648cf3bc6f9dad04d4173b6450b6 | |
Author: Anders Damsgaard <[email protected]> | |
Date: Wed, 13 Jan 2021 14:46:04 +0100 | |
cngf-pf.c: fix order of initial stress computations | |
Diffstat: | |
M cngf-pf.c | 2 +- | |
1 file changed, 1 insertion(+), 1 deletion(-) | |
--- | |
diff --git a/cngf-pf.c b/cngf-pf.c | |
t@@ -245,7 +245,6 @@ main(int argc, char *argv[]) | |
sim.k[i] = new_k; | |
lithostatic_pressure_distribution(&sim); | |
- compute_effective_stress(&sim); | |
if (sim.fluid) { | |
hydrostatic_fluid_pressure_distribution(&sim); | |
t@@ -257,6 +256,7 @@ main(int argc, char *argv[]) | |
if (sim.dt > sim.file_dt) | |
sim.dt = sim.file_dt; | |
+ compute_effective_stress(&sim); | |
check_simulation_parameters(&sim); | |