!
! $Id$
!

MODULE control_mod

! LF 01/2010
! Remplacement du fichier et common control

  IMPLICIT NONE

  REAL    :: periodav
  INTEGER :: nday,day_step,iperiod,iapp_tracvl
  INTEGER :: iconser,iecri,idissip,iphysiq,iecrimoy
  INTEGER :: dayref,anneeref, raz_date, ip_ebil_dyn
  LOGICAL :: offline, output_grads_dyn
  CHARACTER (len=4)  :: config_inca
  CHARACTER (len=10) :: planet_type

  LOGICAL ok_dynzon  ! output zonal transports in dynzon.nc file
  LOGICAL ok_dyn_ins ! output instantaneous values of fields
                     ! in the dynamics in NetCDF files dyn_hist*nc
  LOGICAL ok_dyn_ave ! output averaged values of fields in the dynamics
                     ! in NetCDF files dyn_hist*ave.nc

END MODULE