cngf-pf

continuum model for granular flows with pore-pressure dynamics (renamed from 1d_fd_simple_shear)
git clone git://src.adamsgaard.dk/cngf-pf # fast
git clone https://src.adamsgaard.dk/cngf-pf.git # slow
Log | Files | Refs | README | LICENSE Back to index

commit 5bd5b0c8750a91f1b5a7bc083a98aa6e474eda46
parent bcfdeee0984251238a21f42b6491db14638ce373
Author: Anders Damsgaard <anders@adamsgaard.dk>
Date:   Wed, 13 Jan 2021 14:51:21 +0100

cngf-pf.c: fix manual override of numerical time step

Diffstat:
Mcngf-pf.c | 13++++++++-----
1 file changed, 8 insertions(+), 5 deletions(-)

diff --git a/cngf-pf.c b/cngf-pf.c @@ -69,7 +69,7 @@ usage(void) int main(int argc, char *argv[]) { - int i, normalize; + int i, normalize, dt_override; unsigned long iter; double new_phi, new_k, filetimeclock; struct simulation sim; @@ -88,7 +88,7 @@ main(int argc, char *argv[]) normalize = 0; new_phi = sim.phi[0]; new_k = sim.k[0]; - sim.dt = -1.0; + dt_override = 0; ARGBEGIN { case 'A': @@ -138,6 +138,7 @@ main(int argc, char *argv[]) break; case 'j': sim.dt = atof(EARGF(usage())); + dt_override = 1; break; case 'K': sim.dilatancy_constant = atof(EARGF(usage())); @@ -248,9 +249,11 @@ main(int argc, char *argv[]) if (sim.fluid) { hydrostatic_fluid_pressure_distribution(&sim); - if (sim.dt <= 0.0 && set_largest_fluid_timestep(&sim, 0.5)) { - free_arrays(&sim); - return 20; + if (!dt_override) { + if (set_largest_fluid_timestep(&sim, 0.5)) { + free_arrays(&sim); + return 20; + } } }