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_type_snow.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_type_snow
7
! #####################
8
!
9
!!**** *MODD_TYPE_SNOW* - declaration of surface snow types
10
!!
11
!! PURPOSE
12
!! -------
13
! The purpose of this declarative module is to define
14
! the surface snow types.
15
!
16
!!
17
!!** IMPLICIT ARGUMENTS
18
!! ------------------
19
!! NONE
20
!!
21
!! REFERENCE
22
!! ---------
23
!!
24
!! AUTHOR
25
!! ------
26
!! P. Jabouille *Meteo France*
27
!!
28
!! MODIFICATIONS
29
!! -------------
30
!! Original 20/01/99
31
!! F. solmon 01/06/00 adaptation for patch approach (+1D)
32
!! V. Masson 01/2004 surface externalization
33
!! P. Samuelsson 07/2014 additional snow albedos
34
!-------------------------------------------------------------------------------
35
!
36
!* 0. DECLARATIONS
37
! ------------
38
!
39
!
40
IMPLICIT NONE
41
!
42
TYPE
surf_snow
43
CHARACTER(LEN=3)
:: SCHEME
! snow scheme used
44
INTEGER
:: NLAYER
! number of layers
45
REAL
,
DIMENSION(:,:,:)
,
POINTER
:: WSNOW
! snow (& liq. water) content (kg/m2)
46
REAL
,
DIMENSION(:,:,:)
,
POINTER
:: HEAT
! heat content (J/m2)
47
REAL
,
DIMENSION(:,:,:)
,
POINTER
:: T
! temperature '1-L'
48
REAL
,
DIMENSION(:,:,:)
,
POINTER
:: TEMP
! temperature '3-L' (K)
49
REAL
,
DIMENSION(:,:,:)
,
POINTER
:: RHO
! density
50
REAL
,
DIMENSION(:,:)
,
POINTER
:: ALB
! snow surface albedo
51
REAL
,
DIMENSION(:,:)
,
POINTER
:: ALBVIS
! snow surface visible albedo
52
REAL
,
DIMENSION(:,:)
,
POINTER
:: ALBNIR
! snow surface near-infrared albedo
53
REAL
,
DIMENSION(:,:)
,
POINTER
:: ALBFIR
! snow surface far-infrared albedo
54
REAL
,
DIMENSION(:,:)
,
POINTER
:: EMIS
! snow surface emissivity
55
REAL
,
DIMENSION(:,:)
,
POINTER
:: TS
! snow surface temperature
56
REAL
,
DIMENSION(:,:,:)
,
POINTER
:: GRAN1
! snow grain parameter 1
57
REAL
,
DIMENSION(:,:,:)
,
POINTER
:: GRAN2
! snow grain parameter 2
58
REAL
,
DIMENSION(:,:,:)
,
POINTER
:: HIST
! snow historical variable
59
! (non dendritic case)
60
REAL
,
DIMENSION(:,:,:)
,
POINTER
:: AGE
! snow grain age
61
END TYPE
surf_snow
62
!
63
END MODULE
modd_type_snow
64
65
modd_type_snow
Definition:
modd_type_snow.F90:6
modd_type_snow::surf_snow
Definition:
modd_type_snow.F90:42
Generated on Fri May 13 2016 09:31:04 for SURFEX by
1.8.5