Changeset 3607 for LMDZ6/branches/IPSLCM6.0.15/libf/dynphy_lonlat/phylmd/etat0phys_netcdf.F90

Timestamp:

Nov 29, 2019, 9:08:29 AM (5 years ago)

Author:

jghattas

Message:

Revert commit [3604]. This is only done temporary because we need to make a correction for Jean-Zay and to have a revision without these changes to go into IPSLCM6.1.10.

File:

• LMDZ6/branches/IPSLCM6.0.15/libf/dynphy_lonlat/phylmd/etat0phys_netcdf.F90 (modified) (2 diffs)

LMDZ6/branches/IPSLCM6.0.15/libf/dynphy_lonlat/phylmd/etat0phys_netcdf.F90

@@ -113 +113 @@
   INTEGER :: flag_aerosol
   INTEGER :: flag_aerosol_strat
-  INTEGER :: flag_volc_surfstrat
   LOGICAL :: flag_aer_feedback
   LOGICAL :: flag_bc_internal_mixture
@@ -134 +133 @@
                    iflag_cldcon,                                          &
                    iflag_ratqs,ratqsbas,ratqshaut,tau_ratqs,              &
-                   ok_ade,ok_aie,ok_alw,ok_cdnc,ok_volcan,flag_volc_surfstrat,&
+                   ok_ade, ok_aie, ok_alw, ok_cdnc, ok_volcan,            &
                    aerosol_couple, chemistry_couple, flag_aerosol,        &
                    flag_aerosol_strat,                                    &