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

Go to the documentation of this file.
00001 MODULE MODD_SLT_SURF
00002 !
00003 IMPLICIT NONE
00004 !
00005 REAL, PARAMETER  :: XDENSITY_SLT     = 2.1e3    ! [kg/m3] density of sea salt
00006 REAL, PARAMETER  :: XMOLARWEIGHT_SLT = 58.e-3   ! [kg/mol] molar weight sea salt
00007 !
00008 INTEGER, PARAMETER  :: NEMISMODES_MAX=3
00009 INTEGER, DIMENSION(NEMISMODES_MAX), PARAMETER :: JORDER_SLT=(/3,2,1/) !Dust modes in order of importance
00010 !Set emission related parameters
00011 REAL,DIMENSION(NEMISMODES_MAX)   :: XEMISRADIUS_INI_SLT          ! number madian radius initialization for sea salt mode (um)
00012 REAL,DIMENSION(NEMISMODES_MAX)   :: XEMISSIG_INI_SLT             ! dispersion initialization for sea salt mode
00013 !
00014  CHARACTER(LEN=5)   :: CEMISPARAM_SLT    ! Reference to paper where emission parameterization is proposed
00015 INTEGER            :: JPMODE_SLT        ! number of sea salt modes (max 3; default = 1)
00016 LOGICAL            :: LVARSIG_SLT       ! switch to active pronostic dispersion for all modes
00017 LOGICAL            :: LRGFIX_SLT        ! switch to active pronostic mean radius for all modes
00018 !
00019 INTEGER            :: NSLT_MDEBEG       ! Index of mass flux in first sea salt mode in scalar list
00020 INTEGER            :: NSLTMDE           ! Number of sea salt modes emitted
00021 !
00022 END MODULE MODD_SLT_SURF