mo_filename.f90
 
      MODULE mo_filename
      
        IMPLICIT NONE
      
   5:   ! -----------------------------------------------------------------
        !
        ! module *mo_filename* - quantities needed for file names etc.
        !
        ! -----------------------------------------------------------------
  10:   !
        ! L. Kornblueh, MPI, April 1998, added NWP forecast mode
        !
      
        INTEGER, PARAMETER :: path_limit=256, name_limit=19
  15:   INTEGER, PARAMETER :: dir_limit = path_limit-name_limit
      
        INTEGER :: nhm
        INTEGER :: nhy
        INTEGER :: nhd
  20: 
        CHARACTER (dir_limit) :: yomdn
        CHARACTER (dir_limit) :: ypath
        CHARACTER (9)         :: yexp
      
  25:   CHARACTER (path_limit) :: standard_grib_file
        CHARACTER (path_limit) :: extended_grib_file
      
      END MODULE mo_filename




Info Section
back to top
ECHAM 4 vf90 (C) 1998 Max-Planck-Institut für Meteorologie, Hamburg
Wed Nov 24 01:25:21 CST 1999

HTML derived from FORTRAN source by f2html.pl v0.3 (C) 1997,98 Beroud Jean-Marc.