Changeset 911 for trunk/NEMO/OPA_SRC/IOM/iom_def.F90
- Timestamp:
- 2008-04-28T11:31:32+02:00 (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/OPA_SRC/IOM/iom_def.F90
r839 r911 5 5 !!==================================================================== 6 6 !! History : 9.0 ! 06 09 (S. Masson) Original code 7 !! " ! 07 07 (D. Storkey) Add uldname 7 8 !!-------------------------------------------------------------------- 8 9 !!--------------------------------------------------------------------------------- … … 57 58 INTEGER :: iduld !: id of the unlimited dimension 58 59 INTEGER :: irec !: writing record position 60 CHARACTER(LEN=32) :: uldname !: name of the unlimited dimension 59 61 CHARACTER(LEN=32), DIMENSION(jpmax_vars) :: cn_var !: names of the variables 60 62 INTEGER, DIMENSION(jpmax_vars) :: nvid !: id of the variables
Note: See TracChangeset
for help on using the changeset viewer.