SURFEX v7.3: /home/dasprezs/EXPORT_v7_3/src/SURFEX/modd_write_cover

Go to the documentation of this file.
00001 !     ######################
00002       MODULE MODD_WRITE_COVER_TEX
00003 !     ######################
00004 !
00005 !!****  *MODD_WRITE_COVER_TEX* -
00006 !!
00007 !!    PURPOSE
00008 !!    -------
00009 !
00010 !!
00011 !!**  IMPLICIT ARGUMENTS
00012 !!    ------------------
00013 !!      None 
00014 !!
00015 !!    REFERENCE
00016 !!    ---------
00017 !!      
00018 !!
00019 !!    AUTHOR
00020 !!    ------
00021 !!      V. Masson   *Meteo France*
00022 !!
00023 !!    MODIFICATIONS
00024 !!    -------------
00025 !-------------------------------------------------------------------------------
00026 !
00027 !*       0.   DECLARATIONS
00028 !             ------------
00029 !
00030 IMPLICIT NONE
00031 !
00032 INTEGER           :: NTEX       ! logical unit of file 'class.tex'
00033 INTEGER, PARAMETER:: NLINES = 50! number of lines per page
00034 !
00035  CHARACTER(LEN=2)                               :: CLANG = 'EN' ! language used
00036  CHARACTER(LEN=60), DIMENSION(:), ALLOCATABLE   :: CNAME        ! names of ecosystems (1 language)
00037 !-------------------------------------------------------------------------------
00038 !
00039 END MODULE MODD_WRITE_COVER_TEX