Changeset 1119 for trunk/NEMO/OFF_SRC/dtadyn.F90
- Timestamp:
- 2008-06-20T17:17:41+02:00 (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/OFF_SRC/dtadyn.F90
r1032 r1119 147 147 148 148 149 NAMELIST/nam _offdyn/ ndtadyn, ndtatot, nsptint, &149 NAMELIST/namdyn/ ndtadyn, ndtatot, nsptint, & 150 150 & nficdyn, lperdyn 151 151 !!---------------------------------------------------------------------- … … 154 154 ! ====================================== 155 155 156 ! Read Namelist nam _offdyn : Lateral physics on tracers156 ! Read Namelist namdyn : Lateral physics on tracers 157 157 REWIND( numnam ) 158 READ ( numnam, nam _offdyn )158 READ ( numnam, namdyn ) 159 159 160 160 IF(lwp) THEN 161 161 WRITE(numout,*) 162 WRITE(numout,*) 'nam _offdyn : offline dynamical selection'162 WRITE(numout,*) 'namdyn : offline dynamical selection' 163 163 WRITE(numout,*) '~~~~~~~' 164 WRITE(numout,*) ' Namelist nam _offdyn : set parameters for the lecture of the dynamical fields'164 WRITE(numout,*) ' Namelist namdyn : set parameters for the lecture of the dynamical fields' 165 165 WRITE(numout,*) 166 166 WRITE(numout,*) ' number of elements in the FILE for a year ndtadyn = ' , ndtadyn
Note: See TracChangeset
for help on using the changeset viewer.