Changeset 2073 for LMDZ5/branches/testing/libf/phylmd/dimphy.F90
- Timestamp:
- Jun 25, 2014, 5:43:19 PM (10 years ago)
- Location:
- LMDZ5/branches/testing
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/branches/testing
- Property svn:mergeinfo changed
/LMDZ5/trunk merged: 2057-2059,2062,2064-2070
- Property svn:mergeinfo changed
-
LMDZ5/branches/testing/libf/phylmd/dimphy.F90
r1910 r2073 9 9 INTEGER,SAVE :: klevm1 10 10 INTEGER,SAVE :: kflev 11 INTEGER,SAVE :: nslay 11 12 12 !$OMP THREADPRIVATE(klon,kfdia,kidia,kdlon )13 !$OMP THREADPRIVATE(klon,kfdia,kidia,kdlon,nslay) 13 14 REAL,save,allocatable,dimension(:) :: zmasq 14 15 !$OMP THREADPRIVATE(zmasq) … … 23 24 24 25 klon=klon0 25 26 nslay=1 ! Slab, provisoire (F. Codron) 26 27 kdlon=klon 27 28 kidia=1
Note: See TracChangeset
for help on using the changeset viewer.