Changeset 13558 for NEMO/trunk/src/SAS
- Timestamp:
- 2020-10-02T17:30:22+02:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/SAS/nemogcm.F90
r13555 r13558 378 378 & CALL prt_ctl_init ! Print control 379 379 380 IF( ln_rstart ) CALL rst_read_open 380 381 CALL day_init ! model calendar (using both namelist and restart infos) 381 IF( ln_rstart ) CALL rst_read_open 382 383 ! ! external forcing 382 384 383 #if defined key_agrif 385 384 uu(:,:,:,:) = 0.0_wp ; vv(:,:,:,:) = 0.0_wp ; ts(:,:,:,:,:) = 0.0_wp ! needed for interp done at initialization phase 386 385 #endif 386 ! ! external forcing 387 387 CALL sbc_init( Nbb, Nnn, Naa ) ! Forcings : surface module 388 388
Note: See TracChangeset
for help on using the changeset viewer.