Changeset 3825 for trunk/LMDZ.COMMON

Timestamp:

Jul 3, 2025, 9:42:41 AM (6 days ago)

Author:

emillour

Message:

Common Dynamics-Physics interface:
Add a clean initialization of zphi and zphis arrays.
Not really necessary but otherwise debug mode with OpenMP
sometimes spots illicit operations on these arrays
(in sections actually not used later on, so not really a bug).
EM

File:

• trunk/LMDZ.COMMON/libf/dynphy_lonlat/calfis_p.F (modified) (1 diff)

trunk/LMDZ.COMMON/libf/dynphy_lonlat/calfis_p.F

@@ -548 +548 @@
 c   Geopotentiel calcule par rapport a la surface locale:
 c   -----------------------------------------------------
-
+! Initialize zphi,zphis to 0 , not really necessary but otherwise
+! debug mode sometimes spots illicit operations on these arrays
+! (in sections actually not used later on, so not really a bug) 
+      zphi(:,:)=0
+      zphis(:)=0
+      
       CALL gr_dyn_fi_p(llm,iip1,jjp1,klon,pphi,zphi)