Changeset 1846 for branches/CMIP5_IPSL/NEMO/TOP_SRC
- Timestamp:
- 2010-04-21T14:26:53+02:00 (14 years ago)
- Location:
- branches/CMIP5_IPSL/NEMO/TOP_SRC
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/CMIP5_IPSL/NEMO/TOP_SRC/SED/sedwri.F90
r1334 r1846 34 34 INTEGER, INTENT(in) :: kt 35 35 36 CHARACTER(len = 60) :: clhstnam, clop36 CHARACTER(len = 72) :: clhstnam, clop 37 37 INTEGER , SAVE :: nised, nhorised, ndimt52, ndimt51, ndepsed 38 38 REAL(wp), SAVE :: zjulian -
branches/CMIP5_IPSL/NEMO/TOP_SRC/TRP/trdmld_trc.F90
r1685 r1846 43 43 PUBLIC trd_mld_trc_init 44 44 45 CHARACTER ( LEN=40) :: clhstnam ! name of the trends NetCDF file45 CHARACTER (len=72) :: clhstnam ! name of the trends NetCDF file 46 46 INTEGER :: nmoymltrd 47 47 INTEGER :: ndextrd1(jpi*jpj) -
branches/CMIP5_IPSL/NEMO/TOP_SRC/trcdia.F90
r1830 r1846 112 112 INTEGER :: jn 113 113 LOGICAL :: ll_print = .FALSE. 114 CHARACTER (len= 40) :: clhstnam, clop114 CHARACTER (len=72) :: clhstnam, clop 115 115 CHARACTER (len=20) :: cltra, cltrau 116 116 CHARACTER (len=80) :: cltral … … 246 246 !! 247 247 LOGICAL :: ll_print = .FALSE. 248 CHARACTER (len= 40) :: clhstnam, clop248 CHARACTER (len=72) :: clhstnam, clop 249 249 CHARACTER (len=20) :: cltra, cltrau 250 250 CHARACTER (len=80) :: cltral … … 479 479 !! 480 480 LOGICAL :: ll_print = .FALSE. 481 CHARACTER (len= 40) :: clhstnam, clop481 CHARACTER (len=72) :: clhstnam, clop 482 482 CHARACTER (len=20) :: cltra, cltrau 483 483 CHARACTER (len=80) :: cltral … … 629 629 !! 630 630 LOGICAL :: ll_print = .FALSE. 631 CHARACTER (len= 40) :: clhstnam, clop631 CHARACTER (len=72) :: clhstnam, clop 632 632 CHARACTER (len=20) :: cltra, cltrau 633 633 CHARACTER (len=80) :: cltral -
branches/CMIP5_IPSL/NEMO/TOP_SRC/trcwri.F90
r1830 r1846 67 67 CHARACTER (len=20) :: cltra, cltras 68 68 #if defined key_off_tra 69 CHARACTER (len= 40) :: clhstnam69 CHARACTER (len=72) :: clhstnam 70 70 INTEGER :: inum = 11 ! temporary logical unit 71 71 #endif
Note: See TracChangeset
for help on using the changeset viewer.