Lines Matching refs:cfl_idt
553 PetscReal hxf, hxs, cfl_idt = 0; in FVRHSFunction_2WaySplit() local
697 …cfl_idt = PetscMax(cfl_idt, PetscAbsScalar(maxspeed / hxs)); /* Max allowable value of 1/Delta t */ in FVRHSFunction_2WaySplit()
710 …PetscCallMPI(MPIU_Allreduce(&cfl_idt, &ctx->cfl_idt, 1, MPIU_SCALAR, MPIU_MAX, PetscObjectComm((Pe… in FVRHSFunction_2WaySplit()
716 if (dt > 0.5 / ctx->cfl_idt) { in FVRHSFunction_2WaySplit()
717 …nstraint exceeded at t=%g, dt %g > %g\n", (double)tnow, (double)dt, (double)(0.5 / ctx->cfl_idt))); in FVRHSFunction_2WaySplit()
718 …ERR_PLIB, "Stability constraint exceeded, %g > %g", (double)dt, (double)(ctx->cfl / ctx->cfl_idt)); in FVRHSFunction_2WaySplit()
729 PetscReal hxs, hxf, cfl_idt = 0; in FVRHSFunctionslow_2WaySplit() local
823 …cfl_idt = PetscMax(cfl_idt, PetscAbsScalar(maxspeed / hxs)); /* Max allowable value of 1/Delta t */ in FVRHSFunctionslow_2WaySplit()
872 …PetscCallMPI(MPIU_Allreduce(&cfl_idt, &ctx->cfl_idt, 1, MPIU_SCALAR, MPIU_MAX, PetscObjectComm((Pe… in FVRHSFunctionslow_2WaySplit()
1316 PetscCall(TSSetTimeStep(ts, ctx.cfl / ctx.cfl_idt)); in main()
1353 …etscPrintf(comm, "Maximum allowable stepsize according to CFL %g\n", (double)(1.0 / ctx.cfl_idt))); in main()