Searched refs:tstep (Results 1 – 2 of 2) sorted by relevance
| /phasta/phSolver/compressible/ |
| H A D | MachControl.f90 | 36 subroutine MC_init(dt, tstep, BC) argument
47 integer :: tstep local
57 call MC_readState(tstep)
195 subroutine MC_readState(tstep) argument
211 integer :: tstep local
215 write(fname, "('./MachControl/MachControl.',I0,'.dat')") tstep
247 subroutine MC_writeState(tstep) argument
254 integer tstep local
258 write(fname, "('./MachControl/MachControl.',I0,'.dat')") tstep
|
| /phasta/phSolver/common/ |
| H A D | blowerControl.f90 | 193 subroutine BC_ReadPhase(tstep) argument
197 integer :: tstep local
214 write(fname, "('blowerPhase.', I0, '.dat')") tstep
247 subroutine BC_writePhase(tstep) argument
250 integer :: tstep !time step to use in the file name local
261 write(fname, "('blowerPhase.', I0, '.dat')") tstep
316 subroutine BC_init(dt, tstep, BC) argument
324 integer :: i, iBlower, imapped, tstep local
349 call BC_ReadPhase(tstep) !t0 is updated in the call.
|