|
Last change
on this file since 2616 was
2612,
checked in by romain.vande, 3 years ago
|
|
LMDZ_MARS RV : Open_MP;
Put all the "COMMON" of *.h file as "$OMP THREADPRIVATE"
|
|
File size:
315 bytes
|
| Line | |
|---|
| 1 | |
|---|
| 2 | integer npres ! Number of pressures in NIR correction |
|---|
| 3 | parameter (npres=42) ! table |
|---|
| 4 | |
|---|
| 5 | common /NIRdata/ pres1d,corgcm,oco21d,alfa,p1999 |
|---|
| 6 | !$OMP THREADPRIVATE(/NIRdata/) |
|---|
| 7 | real pres1d(npres) |
|---|
| 8 | real corgcm(npres) |
|---|
| 9 | real oco21d(npres),alfa(npres),p1999(npres) |
|---|
Note: See
TracBrowser
for help on using the repository browser.
