source: codes/icosagcm/branches/SATURN_DYNAMICO/LMDZ.COMMON/libf/phystd/surfdat_h.F90 @ 222

Last change on this file since 222 was 222, checked in by ymipsl, 10 years ago

Creating temporary dynamico/lmdz/saturn branche

YM

File size: 881 bytes
Line 
1
2       module surfdat_h
3
4       implicit none
5
6       real,allocatable,dimension(:) :: albedodat ! albedo of bare ground
7       ! Ehouarn: moved inertiedat to comsoil.h
8       !      real inertiedat, ! thermal inertia
9       real,allocatable,dimension(:) :: phisfi ! geopotential at ground level
10       real,dimension(2) :: albedice
11       real,dimension(2) :: emisice ! ice emissivity; 1:Northern hemisphere 2:Southern hemisphere
12       real emissiv
13       real,dimension(2) :: iceradius, dtemisice
14       real,allocatable,dimension(:) :: zmea,zstd,zsig,zgam,zthe
15
16       real,allocatable,dimension(:) :: dryness  !"Dryness coefficient" for grnd water ice sublimation
17                                                 ! AS: previously in tracer.h. it is more logical here.
18
19       logical,allocatable,dimension(:) :: watercaptag !! was in watercap.h
20
21       end module surfdat_h
22
Note: See TracBrowser for help on using the repository browser.