source:
trunk/LMDZ.PLUTO/libf/phypluto/comdiurn_h.F90
@
3473
| Last change on this file since 3473 was 3184, checked in by , 2 years ago | |
|---|---|
| File size: 205 bytes | |
| Rev | Line | |
|---|---|---|
| [3184] | 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.
