Changeset 2191
- Timestamp:
- 2010-10-08T22:20:42+02:00 (14 years ago)
- Location:
- trunk/NEMO/OPA_SRC
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/OPA_SRC/DOM/daymod.F90
r1730 r2191 239 239 ENDIF 240 240 241 IF( lrst_oce ) CALL day_rst( kt, 'WRITE' ) 241 CALL rst_opn( kt ) ! Open the restart file if needed and control lrst_oce 242 IF( lrst_oce ) CALL day_rst( kt, 'WRITE' ) ! write day restart information 242 243 ! 243 244 END SUBROUTINE day -
trunk/NEMO/OPA_SRC/step.F90
r1793 r2191 178 178 CALL iom_setkt( kstp ) ! say to iom that we are at time step kstp 179 179 180 CALL rst_opn( kstp ) ! Open the restart file181 182 180 !>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> 183 181 ! Update data, open boundaries, surface boundary condition (including sea-ice)
Note: See TracChangeset
for help on using the changeset viewer.