Changeset 3606 for LMDZ5/branches/IPSLCM5A2.1/libf/phylmd/phys_output_write_mod.F90

Timestamp:

Nov 28, 2019, 5:07:28 PM (4 years ago)

Author:

acozic

Message:

several commit for branche IPSLCM5A2

• comment a lot of write on infotrac
• add initialization for variable pbl_tke (it's use before to be calculed)
• comment condition to call aerosol_meteo_calc because this routine is now call by all inca version
• add a condition on output write of od550aer, o865aer, ...loaddust (there are calculed by lmdz only when we work in new physic)

File:

• LMDZ5/branches/IPSLCM5A2.1/libf/phylmd/phys_output_write_mod.F90 (modified) (1 diff)

LMDZ5/branches/IPSLCM5A2.1/libf/phylmd/phys_output_write_mod.F90

@@ -1009 +1009 @@
 !--OLIVIER
 !This is warranted by treating INCA aerosols as offline aerosols
-!       IF (new_aod .and. (.not. aerosol_couple)) THEN
-       IF (new_aod) THEN
+       IF (new_aod .and. (.not. aerosol_couple)) THEN
+!       IF (new_aod) THEN
           IF (flag_aerosol.GT.0) THEN
              CALL histwrite_phy(o_od550aer, od550aer)