! $Id $

module com_io_dyn_mod

  IMPLICIT NONE

! Names of various files for outputs (in the dynamics)
  ! to store instantaneous values:
  CHARACTER(LEN=18),parameter :: dynhist_file="dyn_hist.nc" ! on scalar grid
  CHARACTER(LEN=18),parameter :: dynhistv_file="dyn_histv.nc" ! on v grid
  CHARACTER(LEN=18),parameter :: dynhistu_file="dyn_histu.nc" ! on u grid

  ! to store averaged values:
  CHARACTER(LEN=18),parameter :: dynhistave_file="dyn_hist_ave.nc"
  CHARACTER(LEN=18),parameter :: dynhistvave_file="dyn_histv_ave.nc"
  CHARACTER(LEN=18),parameter :: dynhistuave_file="dyn_histu_ave.nc"
  
! Ids of various files for outputs (in the dynamics)

  ! instantaneous (these are set by inithist.F)
  INTEGER :: histid
  INTEGER :: histvid
  INTEGER :: histuid
  
  ! averages (these are set by initdynav.F)
  INTEGER :: histaveid
  INTEGER :: histvaveid
  INTEGER :: histuaveid
  
END MODULE com_io_dyn_mod