Changeset 3439 for LMDZ6/trunk/libf/phylmd/phys_local_var_mod.F90

Timestamp:

Jan 23, 2019, 1:25:24 PM (5 years ago)

Author:

Laurent Fairhead

Message:

Initialisations wrongly placed

File:

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

LMDZ6/trunk/libf/phylmd/phys_local_var_mod.F90

@@ -754 +754 @@
       ALLOCATE(sens(klon), flwp(klon), fiwp(klon))
       ALLOCATE(alp_bl_conv(klon), alp_bl_det(klon))
-      ale_bl_stat(:)=0 ; alp_bl_conv(:)=0 ;  alp_bl_det(:)=0
+      alp_bl_conv(:)=0 ;  alp_bl_det(:)=0
       ALLOCATE(alp_bl_fluct_m(klon), alp_bl_fluct_tke(klon))
       alp_bl_fluct_m(:)=0 ; alp_bl_fluct_tke(:)= 0.