- Timestamp:
- Jan 19, 2009, 2:40:26 PM (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ4/branches/LMDZ4_V3_patches/libf/phylmd/surface_data.F90
r803 r1073 1 !2 ! $Header$3 1 ! 4 2 MODULE surface_data … … 15 13 !$OMP THREADPRIVATE(ocean) 16 14 15 ! if ocean=couple : version_ocean=opa8 ou nemo 16 CHARACTER(len=6), SAVE :: version_ocean 17 !$OMP THREADPRIVATE(version_ocean) 18 17 19 END MODULE surface_data
Note: See TracChangeset
for help on using the changeset viewer.