Changeset 3357

Timestamp:

Jun 30, 2018, 10:59:02 PM (6 years ago)

Author:

oboucher

Message:

flag_aerosol_strat can be 1 without RRTM

File:

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

LMDZ6/trunk/libf/phylmd/conf_phys_m.F90

@@ -1031 +1031 @@
     ! - 1 = stratospheric aerosols scaled from 550 nm AOD 
     ! - 2 = stratospheric aerosol properties from CMIP6
+    !Option 2 is only available with RRTM, this is tested later on
     !Config Def  = 0
     !Config Help = Used in physiq.F
@@ -1036 +1037 @@
     !
     flag_aerosol_strat_omp = 0
-    IF (iflag_rrtm_omp==1) THEN
-      CALL getin('flag_aerosol_strat',flag_aerosol_strat_omp)
-    ENDIF
+    CALL getin('flag_aerosol_strat',flag_aerosol_strat_omp)
 
     !