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

Diff of /trunk/phylmd/clesphys.f

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 51 by guez, Tue Sep 20 09:14:34 2011 UTC revision 68 by guez, Wed Nov 14 16:59:30 2012 UTC
# Line 4  module clesphys Line 4  module clesphys
4    
5    implicit none    implicit none
6    
7    LOGICAL bug_ozone    LOGICAL bug_ozone ! Pour retrouver le bug de l'ozone (IPCC)
8    REAL co2_ppm, solaire    REAL co2_ppm ! concentration du gaz carbonique en ppmv
9    double precision RCO2, RCH4, RN2O, RCFC11, RCFC12      real solaire ! Constante solaire en W/m2
10      double precision RCO2 ! Concentration du CO2
11      double precision RCH4 ! Concentration du CH4
12      double precision RN2O ! Concentration du N2O
13      double precision RCFC11 ! Concentration du CFC11
14      double precision RCFC12 ! Concentration du CFC12
15    double precision CH4_ppb, N2O_ppb, CFC11_ppt, CFC12_ppt    double precision CH4_ppb, N2O_ppb, CFC11_ppt, CFC12_ppt
16    INTEGER top_height, overlap ! simulateur ISCCP  
17      ! Simulateur ISCCP:
18      INTEGER top_height
19      INTEGER overlap ! 1, 2 or 3
20    
21    REAL cdmmax, cdhmax ! seuils cdrm, cdrh    REAL cdmmax, cdhmax ! seuils cdrm, cdrh
22    REAL ksta, ksta_ter ! paramètres stabilité sur terres et en dehors    REAL ksta, ksta_ter ! paramètres stabilité sur terres et en dehors
23    LOGICAL ok_kzmin ! calcul Kzmin dans la couche limite de surface    LOGICAL ok_kzmin ! calcul Kzmin dans la couche limite de surface
24    
25    INTEGER lev_histhf ! niveau sorties 6h    INTEGER lev_histhf ! niveau sorties 6h
26      ! 4: histhf3d.nc champs 3d niveaux modele
27    
28    integer lev_histday ! niveau sorties journalieres    integer lev_histday ! niveau sorties journalieres
29      ! 3: champs 3D => F. Lott
30      ! 4: + champs sous-surfaces
31    
32    integer lev_histmth ! niveau sorties mensuelles    integer lev_histmth ! niveau sorties mensuelles
33    CHARACTER(len=4) type_run    ! 3: albedo, rugosite sous-surfaces
34      ! 4: champs tendances 3d
35    
36      CHARACTER(len=4) type_run ! 'AMIP' ou 'ENSP'
37    LOGICAL ok_isccp, ok_regdyn    LOGICAL ok_isccp, ok_regdyn
38    
39    REAL lonmin_ins, lonmax_ins, latmin_ins, latmax_ins    REAL lonmin_ins, lonmax_ins, latmin_ins, latmax_ins
40      ! longitude et latitude minimales et maximales pour la zone avec
41      ! sorties instantanées tous les pas de temps de la physique,
42      ! fichier "histbilKP_ins.nc"
43    
44    INTEGER ecrit_ins, ecrit_hf, ecrit_hf2mth, ecrit_day    INTEGER ecrit_ins, ecrit_hf, ecrit_hf2mth, ecrit_day
45    INTEGER ecrit_mth, ecrit_tra, ecrit_reg    INTEGER ecrit_mth, ecrit_tra, ecrit_reg
46    
Legend:
Removed from v.51  
changed lines
  Added in v.68
  ViewVC Help
Powered by ViewVC 1.1.21