Changeset 1581 for trunk/NEMO/LIM_SRC_3/iceini.F90
- Timestamp:
- 2009-08-05T16:53:12+02:00 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/LIM_SRC_3/iceini.F90
r1471 r1581 58 58 59 59 ! Open the namelist file 60 CALL ctl opn(numnam_ice,'namelist_ice','OLD', 'FORMATTED', 'SEQUENTIAL', 1,numout,.FALSE.,1)60 CALL ctl_opn( numnam_ice, 'namelist_ice', 'OLD', 'FORMATTED', 'SEQUENTIAL', -1, numout, lwp ) 61 61 62 62 CALL ice_run ! read in namelist some run parameters
Note: See TracChangeset
for help on using the changeset viewer.