/[lmdze]/trunk/phylmd/clesphys.f
ViewVC logotype

Annotation of /trunk/phylmd/clesphys.f

Parent Directory Parent Directory | Revision Log Revision Log


Revision 51 - (hide annotations)
Tue Sep 20 09:14:34 2011 UTC (12 years, 8 months ago) by guez
Original Path: trunk/libf/phylmd/clesphys.f90
File size: 842 byte(s)
Split "getincom.f90" into "getincom.f90" and "getincom2.f90". Split
"nuage.f" into "nuage.f90", "diagcld1.f90" and "diagcld2.f90". Created
module "chem" from included file "chem.h". Moved "YOEGWD.f90" to
directory "Orography".

In "physiq", for evaporation of water, "zlsdcp" was equal to
"zlvdc". Removed useless variables.

1 guez 3 module clesphys
2    
3 guez 51 ! From version 1.3 2005/06/06 13:16:33
4 guez 3
5     implicit none
6    
7     LOGICAL bug_ozone
8     REAL co2_ppm, solaire
9     double precision RCO2, RCH4, RN2O, RCFC11, RCFC12
10     double precision CH4_ppb, N2O_ppb, CFC11_ppt, CFC12_ppt
11 guez 51 INTEGER top_height, overlap ! simulateur ISCCP
12     REAL cdmmax, cdhmax ! seuils cdrm, cdrh
13     REAL ksta, ksta_ter ! paramètres stabilité sur terres et en dehors
14     LOGICAL ok_kzmin ! calcul Kzmin dans la couche limite de surface
15 guez 3 INTEGER lev_histhf ! niveau sorties 6h
16     integer lev_histday ! niveau sorties journalieres
17     integer lev_histmth ! niveau sorties mensuelles
18     CHARACTER(len=4) type_run
19     LOGICAL ok_isccp, ok_regdyn
20     REAL lonmin_ins, lonmax_ins, latmin_ins, latmax_ins
21     INTEGER ecrit_ins, ecrit_hf, ecrit_hf2mth, ecrit_day
22     INTEGER ecrit_mth, ecrit_tra, ecrit_reg
23    
24     save
25    
26     end module clesphys

  ViewVC Help
Powered by ViewVC 1.1.21