Changeset 3314

Timestamp:

Apr 12, 2018, 5:38:50 PM (6 years ago)

Author:

Laurent Fairhead

Message:

Solving reproductibility problem?

File:

• LMDZ6/branches/IPSLCM6.0.15/libf/phylmd/regr_pr_time_av_m.F90 (modified) (1 diff)

LMDZ6/branches/IPSLCM6.0.15/libf/phylmd/regr_pr_time_av_m.F90

@@ -249 +249 @@
   END IF
   !$OMP END MASTER
+  !$OMP BARRIER
   IF(lfirst) THEN
     lfirst=.FALSE.;       CALL bcast(lfirst)