Changeset 4933 for LMDZ6/trunk/libf/phylmd/phys_state_var_mod.F90

Timestamp:

May 4, 2024, 1:03:50 PM (7 months ago)

Author:

Laurent Fairhead

Message:

Putting the initialisation in a more judicious place

File:

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

LMDZ6/trunk/libf/phylmd/phys_state_var_mod.F90

@@ -772 +772 @@
       ALLOCATE(ale_bl_trig(klon))
       ALLOCATE(ratqs_inter_(klon,klev))
-      ratqs_inter_(:,:)=0.
       IF (ok_gwd_rando) THEN
         ALLOCATE(du_gwd_rando(klon, klev))