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 5226 for branches/2015/dev_r5204_CNRS_PISCES_dcy/NEMOGCM/NEMO/OPA_SRC/SBC/sbcmod.F90 – NEMO

Ignore:
Timestamp:
2015-04-20T15:27:29+02:00 (9 years ago)
Author:
cetlod
Message:

NEMOGCM_dev_r5204_CNRS_PISCES_dcy : minor bugs correction

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2015/dev_r5204_CNRS_PISCES_dcy/NEMOGCM/NEMO/OPA_SRC/SBC/sbcmod.F90

    r5225 r5226  
    261261      IF( ln_ssr           )   CALL sbc_ssr_init               ! Sea-Surface Restoring initialisation 
    262262      ! 
     263      IF( ln_rnf           )   CALL sbc_rnf_init               ! Runof initialisation 
     264      ! 
    263265      IF( nn_ice == 3      )   CALL sbc_lim_init               ! LIM3 initialisation 
    264266 
     
    417419         CALL iom_put( "qns"   , qns        )                   ! solar heat flux 
    418420         CALL iom_put( "qsr"   ,       qsr  )                   ! solar heat flux 
     421         IF( l_trcdm2dc ) CALL iom_put( "qsr_mean" ,       qsr_mean  )                   ! daily mean solar heat flux 
    419422         IF( nn_ice > 0 )   CALL iom_put( "ice_cover", fr_i )   ! ice fraction  
    420423         CALL iom_put( "taum"  , taum       )                   ! wind stress module  
Note: See TracChangeset for help on using the changeset viewer.