MODULE tabcontrol_mod

! stores some formation about run parameters

IMPLICIT NONE

INTEGER,SAVE :: radpas ! rate of computation of radiative transfert, in physics steps
!$OMP THREADPRIVATE(radpas)

INTEGER,SAVE :: chimpas ! rate of computation of chemistry, in physics steps
!$OMP THREADPRIVATE(chimpas)

REAL,SAVE :: dtime  ! time step of the physics (s)
!$OMP THREADPRIVATE(dtime)

! the "controle" array, used to store information in the restartphy file
INTEGER,PARAMETER :: length=100
REAL,SAVE :: tabcntr0(length)
!$OMP THREADPRIVATE(tabcntr0)

END MODULE tabcontrol_mod