New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 10998 for NEMO/branches/2019/dev_r10721_KERNEL-02_Storkey_Coward_IMMERSE_first_steps/src/OCE/nemogcm.F90 – NEMO

Ignore:
Timestamp:
2019-05-20T10:27:28+02:00 (5 years ago)
Author:
davestorkey
Message:

2019/dev_r10721_KERNEL-02_Storkey_Coward_IMMERSE_first_steps : ICE changes. Passess non-AGRIF sette tests apart from ORCA2_SAS_ICE which doesn't seem to work for me at the moment.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/branches/2019/dev_r10721_KERNEL-02_Storkey_Coward_IMMERSE_first_steps/src/OCE/nemogcm.F90

    r10978 r10998  
    429429      IF( ln_diurnal_only ) THEN                   ! diurnal only: a subset of the initialisation routines 
    430430         CALL  istate_init( Nbb, Nnn, Naa )           ! ocean initial state (Dynamics and tracers) 
    431          CALL     sbc_init( Nbb, Nnn )                ! Forcings : surface module 
     431         CALL     sbc_init( Nbb, Nnn, Naa )           ! Forcings : surface module 
    432432         CALL tra_qsr_init                            ! penetrative solar radiation qsr 
    433433         IF( ln_diaobs ) THEN                         ! Observation & model comparison 
     
    443443 
    444444      !                                      ! external forcing  
    445                            CALL    tide_init             ! tidal harmonics 
    446                            CALL     sbc_init( Nbb, Nnn ) ! surface boundary conditions (including sea-ice) 
    447                            CALL     bdy_init             ! Open boundaries initialisation 
     445                           CALL    tide_init                     ! tidal harmonics 
     446                           CALL     sbc_init( Nbb, Nnn, Naa )    ! surface boundary conditions (including sea-ice) 
     447                           CALL     bdy_init                     ! Open boundaries initialisation 
    448448 
    449449      !                                      ! Ocean physics 
Note: See TracChangeset for help on using the changeset viewer.