Skip to content

File canopy_files_mod.F90

File List > src > canopy_files_mod.F90

Go to the documentation of this file

MODULE canopy_files_mod

    IMPLICIT NONE


    INTEGER                       :: cdfid_m
    INTEGER,            PARAMETER :: max_mm       = 10000
    INTEGER,            PARAMETER :: iutnml       =  8



    CHARACTER(LEN=256)            :: file_vars    ( max_mm )
    CHARACTER(LEN=256)            :: file_canvars ( max_mm )
    CHARACTER(LEN=256)            :: file_out     ( 1 )



    CHARACTER(LEN=*), PARAMETER   :: file_nml     = 'input/namelist.canopy'



END MODULE canopy_files_mod