Changeset 4627 for LMDZ6/trunk/libf/phylmd/physiq_mod.F90

Timestamp:

Jul 13, 2023, 3:31:36 PM (15 months ago)

Author:

acozic

Message:

add a test on aerosol_couple before reading aerosol files in init_aero_fromfile. If we are using inca aerosols, we don't need to read these files

File:

• LMDZ6/trunk/libf/phylmd/physiq_mod.F90 (modified) (1 diff)

LMDZ6/trunk/libf/phylmd/physiq_mod.F90

@@ -1729 +1729 @@
 
 !       CALL create_climoz(read_climoz)
-      IF (.NOT. create_etat0_limit) CALL init_aero_fromfile(flag_aerosol)  !! initialise aero from file for XIOS interpolation (unstructured_grid)
+      IF (.NOT. create_etat0_limit) CALL init_aero_fromfile(flag_aerosol, aerosol_couple)  !! initialise aero from file for XIOS interpolation (unstructured_grid)
       IF (.NOT. create_etat0_limit) CALL init_readaerosolstrato(flag_aerosol_strat)  !! initialise aero strato from file for XIOS interpolation (unstructured_grid)