SURFEX
V8_0
Surfex V8_0 release
Main Page
Data Types List
Files
File List
File Members
All
Classes
Files
Functions
Variables
src
SURFEX
modd_ch_surf.F90
Go to the documentation of this file.
1
!SFX_LIC Copyright 1994-2014 CNRS, Meteo-France and Universite Paul Sabatier
2
!SFX_LIC This is part of the SURFEX software governed by the CeCILL-C licence
3
!SFX_LIC version 1. See LICENSE, CeCILL-C_V1-en.txt and CeCILL-C_V1-fr.txt
4
!SFX_LIC for details. version 1.
5
! #####################
6
MODULE
modd_ch_surf
7
! ######################
8
!
9
!!
10
!! PURPOSE
11
!! -------
12
! this module is for the surface scheme only
13
!
14
!
15
!!
16
!!** IMPLICIT ARGUMENTS
17
!! ------------------
18
!! None
19
!!
20
!
21
!! AUTHOR
22
!! ------
23
!! P. Tulet (16/01/01) *Meteo France*
24
!!
25
!! MODIFICATIONS
26
!! -------------
27
!-------------------------------------------------------------------------------
28
!
29
!* 0. DECLARATIONS
30
! ------------
31
!
32
IMPLICIT NONE
33
!
34
INTEGER
,
PARAMETER
:: JPEMISMAX_F = 10000
35
INTEGER
,
PARAMETER
:: JPEMISMAX_S = 1000
36
INTEGER
,
PARAMETER
:: JPSNAPMAX = 50
37
!
38
REAL
,
SAVE
,
DIMENSION(:)
,
ALLOCATABLE
:: XSREALMASSMOLVAL
! final molecular
39
! diffusivity value
40
REAL
,
SAVE
,
DIMENSION(:)
,
ALLOCATABLE
:: XSREALREACTVAL
! final chemical
41
! reactivity factor
42
! with biology
43
REAL
,
SAVE
,
DIMENSION(:,:)
,
ALLOCATABLE
:: XSREALHENRYVAL
! chemical Henry
44
! constant value
45
!
46
END MODULE
modd_ch_surf
47
48
modd_ch_surf
Definition:
modd_ch_surf.F90:6
Generated on Fri May 13 2016 09:31:04 for SURFEX by
1.8.5