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 3954 for branches/2013/dev_r3853_CNRS9_ConfSetting/NEMOGCM/NEMO/OPA_SRC/SBC/sbcmod.F90 – NEMO

Ignore:
Timestamp:
2013-07-03T16:20:05+02:00 (11 years ago)
Author:
clevy
Message:

Configuration setting/Step2, additions, see ticket:#1074

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2013/dev_r3853_CNRS9_ConfSetting/NEMOGCM/NEMO/OPA_SRC/SBC/sbcmod.F90

    r3875 r3954  
    115115          nn_ice      =   0 
    116116      ENDIF 
    117        
     117      
    118118      IF(lwp) THEN               ! Control print 
    119119         WRITE(numout,*) '        Namelist namsbc (partly overwritten with CPP key setting)' 
     
    225225         IF( nsbc ==  6 )   WRITE(numout,*) '              MFS Bulk formulation' 
    226226      ENDIF 
     227 
    227228      ! 
    228229      IF( ln_ssr      )   CALL sbc_ssr_init               ! Sea-Surface Restoring initialisation 
     
    230231      IF( nn_ice == 4 )   CALL cice_sbc_init( nsbc )      ! CICE initialisation 
    231232      ! 
     233 
    232234   END SUBROUTINE sbc_init 
    233235 
Note: See TracChangeset for help on using the changeset viewer.