5.2. CYCVAR, Cycle Variables

      MODULE cycvar
      USE kindef
      IMPLICIT NONE
      SAVE

      INTEGER (INT4) :: NCYCLE, IDTCAL, MTSTEP, ITSTEP, JTSTEP, KTSTEP
      INTEGER (INT4) :: NCYBEG, NRSCYC,   MDELS,   JDELS
      REAL (REAL8) :: TIMB, TIME, DLTB, DLTH, DLTE, DLTMIN, DLTMAX
      REAL (REAL8) :: DTFRAC, SSSTEP, SSSTAB, DRSTAB, VLSTAB, DVSTAB
      REAL (REAL8) :: DLTHOL, CSSTEP,  DTMIN
      INTEGER (INT4) :: FCTSTEP
      INTEGER (INT4) :: NCYCLEEUL, IDTCALEUL, MTSTEPEUL, ITSTEPEUL, JTSTEPEUL,
      KTSTEPEUL
      INTEGER (INT4) :: NCYBEGEUL, NRSCYCEUL,   MDELSEUL,   JDELSEUL
      REAL (REAL8) :: TIMBEUL, TIMEEUL, DLTBEUL, DLTHEUL, DLTEEUL, DLTMINEUL, DLTMAXEUL
      REAL (REAL8) :: DTFRACEUL, SSSTEPEUL, SSSTABEUL, DRSTABEUL, VLSTABEUL, 
      DVSTABEUL
      REAL (REAL8) :: DLTHOLEUL, CSSTEPEUL,  DTMINEUL
NCYCLE

Current cycle number

IDTCAL

Not available

MTSTEP

Part number controlling timestep

ITSTEP

I-index controlling timestep

JTSTEP

J-index controlling timestep

KTSTEP

Not used in 2D

NCYBEG

Starting cycle for current segment of calculation

NRSCYC

Cycle number for which SAVE file is to be loaded (passed to GETRST)

TIMB

Time at beginning of cycle: t(n)

TIME

Time at end of cycle: t(n+1)

DLTB

Timestep from t(n-1/2) to t(n+1/2)

DLTH

Timestep from t(n) to t(n+1)

DLTE

Timestep from t(n+1/2) to t(n+3/2)

DLTMIN

Minimum timestep

DLTMAX

Maximum timestep

DTFRAC

Timestep stability factor

SSSTEP

Stability timestep

SSSTAB

Soundspeed in cell controlling timestep

DRSTAB

Cell dimension in cell controlling timestep

VLSTAB

Cell velocity in cell controlling timestep

DVSTAB

Cell divergence in cell controlling timestep

DLTHOL

Previous timestep, DLTH