Changeset 9395


Ignore:
Timestamp:
2018-03-14T09:40:56+01:00 (2 years ago)
Author:
andmirek
Message:

#2050 move sbc_init

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/UKMO/test_moci_test_suite_namelist_read/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90

    r9387 r9395  
    399399      IF( lk_c1d        )   CALL     c1d_init   ! 1D column configuration 
    400400                            CALL     dom_cfg    ! Domain configuration 
     401CALL     sbc_init   ! Forcings : surface module (restart read with XIOS) 
    401402                            CALL     dom_init   ! Domain 
    402403 
     
    408409 
    409410      IF( lk_tide       )   CALL    tide_init( nit000 )    ! Initialisation of the tidal harmonics 
    410                             CALL     sbc_init   ! Forcings : surface module (restart read with XIOS) 
     411!                           CALL     sbc_init   ! Forcings : surface module (restart read with XIOS) 
    411412      IF( lk_bdy        )   CALL     bdy_init   ! Open boundaries initialisation 
    412413      IF( lk_bdy        )   CALL bdy_dta_init   ! Open boundaries initialisation of external data arrays 
Note: See TracChangeset for help on using the changeset viewer.