Changeset 4926

Timestamp:

Apr 30, 2024, 9:58:04 AM (8 months ago)

Author:

Laurent Fairhead

Message:

Unitialised variable prevented running in debug mode

File:

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

LMDZ6/trunk/libf/phylmd/phys_local_var_mod.F90

@@ -670 +670 @@
       ALLOCATE(l_mixmin(klon,klev+1,nbsrf),l_mix(klon,klev+1,nbsrf),wprime(klon,klev+1,nbsrf))
       ALLOCATE(pbl_eps(klon,klev+1,nbsrf+1))
+      pbl_eps(:,:,:)=0.
       l_mix(:,:,:)=0.;l_mixmin(:,:,:)=0.;wprime(:,:,:)=0. ! doit etre initialse car pas toujours remplis
       ALLOCATE(rhcl(klon,klev))