- Timestamp:
- 2013-04-09T18:34:38+02:00 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2013/dev_r3858_NOC_ZTC/NEMOGCM/NEMO/OPA_SRC/DOM/istate.F90
r3862 r3865 90 90 neuler = 1 ! Set time-step indicator at nit000 (leap-frog) 91 91 CALL rst_read ! Read the restart file 92 ! ! define e3u_b, e3v_b from e3t_b read in restart file93 CALL dom_vvl_2( nit000, fse3u_b(:,:,:), fse3v_b(:,:,:) )94 92 CALL day_init ! model calendar (using both namelist and restart infos) 95 93 ELSE … … 131 129 ENDDO 132 130 ENDIF 133 ! ! define e3u_b, e3v_b from e3t_b initialized in domzgr134 CALL dom_vvl_2( nit000, fse3u_b(:,:,:), fse3v_b(:,:,:) )135 131 ! 136 132 ENDIF
Note: See TracChangeset
for help on using the changeset viewer.