Changeset 3891


Ignore:
Timestamp:
Aug 13, 2025, 3:05:29 PM (26 hours ago)
Author:
emillour
Message:

Common Dynamics-Physics interface:
Fix a buggy (wrt OpenMP) initialization I introduced in r3825.
EM

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r3825 r3891  
    551551! debug mode sometimes spots illicit operations on these arrays
    552552! (in sections actually not used later on, so not really a bug)
     553c$OMP MASTER
    553554      zphi(:,:)=0
    554555      zphis(:)=0
     556c$OMP END MASTER
     557c$OMP BARRIER
    555558     
    556559      CALL gr_dyn_fi_p(llm,iip1,jjp1,klon,pphi,zphi)
Note: See TracChangeset for help on using the changeset viewer.