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

Timestamp:

Nov 28, 2019, 5:07:28 PM (5 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_state_var_mod.F90 (modified) (1 diff)

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

@@ -455 +455 @@
       ALLOCATE(ratqs(klon,klev))
       ALLOCATE(pbl_tke(klon,klev+1,nbsrf+1))
+      pbl_tke(:,:,:) = 0. 
 !nrlmd<
       ALLOCATE(delta_tsurf(klon,nbsrf))