source: LMDZ5/trunk/libf/phy1d/compar1d.h @ 1612

Last change on this file since 1612 was 1607, checked in by lguez, 13 years ago

Import 1D files. Files added to directory "phy1d" were in directories:

lmdz1d_source_20111207/phy1d_source
lmdz1d_source_20111207/phy1d_source_upd

extracted from:

http://www.lmd.jussieu.fr/~jyg/lmdz1d_source_20111207.tar.gz

File size: 807 bytes
Line 
1!
2! $Id: compar1d.h 2010-08-04 17:02:56Z lahellec $
3!
4      integer :: forcing_type
5      real :: nat_surf
6      real :: tsurf
7      real :: rugos
8      real :: qsol(1:2)
9      real :: qsurf
10      real :: psurf
11      real :: zsurf
12      real :: albedo
13
14      real :: time
15      real :: time_ini
16      real :: xlat
17      real :: xlon
18      real :: airefi
19      real :: wtsurf
20      real :: wqsurf
21      real :: restart_runoff
22      real :: xagesno
23      real :: qsolinp
24      real :: zpicinp
25
26      logical :: restart
27
28      common/com_par1d/forcing_type,nat_surf,tsurf,rugos,               &
29     & qsol,qsurf,psurf,zsurf,albedo,time,time_ini,xlat,xlon,airefi,    &
30     & wtsurf,wqsurf,restart_runoff,xagesno,qsolinp,zpicinp,            &
31     & restart
32
33!$OMP THREADPRIVATE(/com_par1d/)
34
35
36
37
38
39
40
41
42
43
Note: See TracBrowser for help on using the repository browser.