Changeset 2612 for trunk/LMDZ.MARS/libf/phymars/nirdata.h

Timestamp:

Jan 18, 2022, 3:37:15 PM (3 years ago)

Author:

romain.vande

Message:

LMDZ_MARS RV : Open_MP;
Put all the "COMMON" of *.h file as "$OMP THREADPRIVATE"

File:

• trunk/LMDZ.MARS/libf/phymars/nirdata.h (modified) (1 diff)

trunk/LMDZ.MARS/libf/phymars/nirdata.h

@@ -4 +4 @@
 
       common /NIRdata/ pres1d,corgcm,oco21d,alfa,p1999
+!$OMP THREADPRIVATE(/NIRdata/)
       real    pres1d(npres)
       real    corgcm(npres)