Changeset 1084 for LMDZ4/trunk/libf/phylmd
- Timestamp:
- Jan 29, 2009, 11:37:41 AM (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ4/trunk/libf/phylmd/climb_hq_mod.F90
r1067 r1084 57 57 !**************************************************************************************** 58 58 LOGICAL, SAVE :: first=.TRUE. 59 !$OMP THREADPRIVATE(first) 59 60 REAL, DIMENSION(klon,klev) :: local_H 60 61 REAL, DIMENSION(klon) :: psref
Note: See TracChangeset
for help on using the changeset viewer.