Ignore:
Timestamp:
2020-10-02T17:30:22+02:00 (7 months ago)
Author:
smasson
Message:

trunk: pass sette tests with debugging option -init=arrays,snan,huge, see #2535

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/trunk/src/SAS/nemogcm.F90

    r13555 r13558  
    378378         &                 CALL prt_ctl_init        ! Print control 
    379379       
     380      IF( ln_rstart )      CALL rst_read_open 
    380381                           CALL day_init        ! model calendar (using both namelist and restart infos) 
    381       IF( ln_rstart )      CALL rst_read_open 
    382  
    383       !                                      ! external forcing  
     382 
    384383#if defined key_agrif 
    385384      uu(:,:,:,:) = 0.0_wp   ;   vv(:,:,:,:) = 0.0_wp   ;   ts(:,:,:,:,:) = 0.0_wp   ! needed for interp done at initialization phase 
    386385#endif  
     386      !                                      ! external forcing  
    387387                           CALL sbc_init( Nbb, Nnn, Naa )  ! Forcings : surface module  
    388388 
Note: See TracChangeset for help on using the changeset viewer.