|
Last change
on this file since 3567 was
1520,
checked in by emillour, 9 years ago
|
|
Generic GCM:
- Some fixes/adjustments to run using OpenMP (in the physics, best practice is to always have "save" variables, this of course includes all module variables, as "threadprivate").
EM
|
|
File size:
205 bytes
|
| Line | |
|---|
| 1 | |
|---|
| 2 | module comdiurn_h |
|---|
| 3 | |
|---|
| 4 | implicit none |
|---|
| 5 | |
|---|
| 6 | real,allocatable,dimension(:),save :: sinlon, coslon, sinlat, coslat |
|---|
| 7 | !$OMP THREADPRIVATE(sinlon,coslon,sinlat,coslat) |
|---|
| 8 | |
|---|
| 9 | end module comdiurn_h |
|---|
| 10 | |
|---|
Note: See
TracBrowser
for help on using the repository browser.
