Changeset 735 for LMDZ4/branches/V3_test/libf/phylmd/write_histhf3d.h

Timestamp:

Nov 10, 2006, 3:50:16 PM (18 years ago)

Author:

Laurent Fairhead

Message:

Modifications version parallele
YM/LF

File:

• LMDZ4/branches/V3_test/libf/phylmd/write_histhf3d.h (modified) (1 diff)

LMDZ4/branches/V3_test/libf/phylmd/write_histhf3d.h

@@ -23 +23 @@
       CALL histwrite_phy(nid_hf3d,"vitv",itau_w,v_seri)
       if (ok_sync) then
+c$OMP MASTER
         call histsync(nid_hf3d)
+c$OMP END MASTER      
       endif