Changeset 3989 for LMDZ6/trunk/libf/dynphy_lonlat/phylmd

Timestamp:

Oct 10, 2021, 9:18:17 AM (3 years ago)

Author:

oboucher

Message:

addition of flag_volc_surfstrat required for VOLMIP
This flag can select either surface or the atmospheric effects of volcanic aerosols to separate the effects.

File:

• LMDZ6/trunk/libf/dynphy_lonlat/phylmd/etat0phys_netcdf.F90 (modified) (2 diffs)

LMDZ6/trunk/libf/dynphy_lonlat/phylmd/etat0phys_netcdf.F90

@@ -119 +119 @@
   INTEGER :: flag_aerosol
   INTEGER :: flag_aerosol_strat
+  INTEGER :: flag_volc_surfstrat
   LOGICAL :: flag_aer_feedback
   LOGICAL :: flag_bc_internal_mixture
@@ -138 +139 @@
                    iflag_cldcon,                                        &
                    iflag_ratqs,ratqsbas,ratqshaut,tau_ratqs,            &
-                   ok_ade, ok_aie, ok_alw, ok_cdnc, ok_volcan,          &
-                   aerosol_couple,                                      &
-                   chemistry_couple, flag_aerosol, flag_aerosol_strat,  & 
-                   flag_aer_feedback,                                   &
-                   flag_bc_internal_mixture, bl95_b0, bl95_b1, &
+                   ok_ade, ok_aie, ok_alw, ok_cdnc, ok_volcan, flag_volc_surfstrat,     &
+                   aerosol_couple, chemistry_couple, flag_aerosol, flag_aerosol_strat,  & 
+                   flag_aer_feedback, flag_bc_internal_mixture, bl95_b0, bl95_b1,       &
                    read_climoz, alp_offset)
   CALL phys_state_var_init(read_climoz)