Changeset 2007 for LMDZ5/trunk/libf/phylmd/clesphys.h

Timestamp:

Apr 6, 2014, 2:20:38 PM (10 years ago)

Author:

fhourdin

Message:

Modification pour garantir la conservation des espèces traces.

Modification for tracer conservation

Jean-Yves Grandpeix

File:

• LMDZ5/trunk/libf/phylmd/clesphys.h (modified) (3 diffs)

LMDZ5/trunk/libf/phylmd/clesphys.h

@@ -18 +18 @@
        REAL(kind=8) CH4_ppb, N2O_ppb, CFC11_ppt, CFC12_ppt
 !IM ajout CFMIP2/CMIP5
-       REAL co2_ppm_per
        LOGICAL ok_4xCO2atm
        REAL(kind=8) RCO2_per,RCH4_per,RN2O_per,RCFC11_per,RCFC12_per
@@ -77 +76 @@
        LOGICAL :: ok_strato
        LOGICAL :: ok_hines, ok_gwd_rando
+       LOGICAL :: ok_conserv_q
 
        COMMON/clesphys/                                                 &
 ! REAL FIRST
-     &       co2_ppm, co2_ppm_per, solaire                              &
+     &       co2_ppm, solaire                                           &
      &     , RCO2, RCH4, RN2O, RCFC11, RCFC12                           &
      &     , RCO2_act, RCH4_act, RN2O_act, RCFC11_act, RCFC12_act       &
@@ -114 +114 @@
      &     , ok_lic_melt,           aer_type                            &
      &     , iflag_rrtm, ok_strato,ok_hines                             &
-     &     , iflag_ice_thermo, ok_gwd_rando, NSW
+     &     , iflag_ice_thermo, ok_gwd_rando, NSW                        &
+     &     , ok_conserv_q
      
        save /clesphys/