My Project
 All Classes Files Functions Variables Macros
fisrtilp.h
Go to the documentation of this file.
1 !
2 ! $Header$
3 !
4 !
5 ! ATTENTION!!!!: ce fichier include est compatible format fixe/format libre
6 ! veillez n'utiliser que des ! pour les commentaires
7 ! et bien positionner les & des lignes de continuation
8 ! (les placer en colonne 6 et en colonne 73)
9 !
10  REAL cld_lc_lsc,cld_lc_con
11  REAL cld_tau_lsc,cld_tau_con
12  REAL ffallv_lsc,ffallv_con
13  REAL coef_eva
14  LOGICAL reevap_ice
15  INTEGER iflag_pdf
16 
17  common/comfisrtilp/ &
18  & cld_lc_lsc &
19  & ,cld_lc_con &
20  & ,cld_tau_lsc &
21  & ,cld_tau_con &
22  & ,ffallv_lsc &
23  & ,ffallv_con &
24  & ,coef_eva &
25  & ,reevap_ice &
26  & ,iflag_pdf
27 
28 !$OMP THREADPRIVATE(/comfisrtilp/)