Changeset 2191


Ignore:
Timestamp:
2010-10-08T22:20:42+02:00 (11 years ago)
Author:
smasson
Message:

restart openning before its use in day, see ticket:732

Location:
trunk/NEMO/OPA_SRC
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/NEMO/OPA_SRC/DOM/daymod.F90

    r1730 r2191  
    239239      ENDIF 
    240240 
    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 
    242243      ! 
    243244   END SUBROUTINE day 
  • trunk/NEMO/OPA_SRC/step.F90

    r1793 r2191  
    178178      CALL iom_setkt( kstp )                          ! say to iom that we are at time step kstp 
    179179       
    180       CALL rst_opn( kstp )                            ! Open the restart file 
    181  
    182180      !>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> 
    183181      ! Update data, open boundaries, surface boundary condition (including sea-ice) 
Note: See TracChangeset for help on using the changeset viewer.