Changeset 5446 for LMDZ6/trunk/libf

Timestamp:

Dec 22, 2024, 10:09:33 AM (28 hours ago)

Author:

fhourdin

Message:

THREADPRIVATE bug fix

File:

• LMDZ6/trunk/libf/phylmd/lmdz_surf_wind_ini.f90 (modified) (1 diff)

LMDZ6/trunk/libf/phylmd/lmdz_surf_wind_ini.f90

@@ -9 +9 @@
    integer, protected :: lunout
    integer, protected :: iflag_surf_wind=0
-   !$OMP THREADPRIVATE(lunout,iflag_surf_wind,nsrfwnd)
+   !$OMP THREADPRIVATE(lunout,iflag_surf_wind)
 
 CONTAINS