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 1061 for trunk/NEMO – NEMO

Changeset 1061 for trunk/NEMO


Ignore:
Timestamp:
2008-06-05T13:03:42+02:00 (16 years ago)
Author:
ctlod
Message:

trunk: make the CALL sbc_rnf() before the CALL sbc_ssr() since rnfmsk(:,:) array is used in sbcssr.F90, so it must be filled, see ticket: #189

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/NEMO/OPA_SRC/SBC/sbcmod.F90

    r1037 r1061  
    237237      END SELECT                                               
    238238 
    239       IF( ln_ssr       )   CALL sbc_ssr( kt )                   ! add SST/SSS damping term 
    240  
    241239      IF( ln_rnf       )   CALL sbc_rnf( kt )                   ! add runoffs to fresh water fluxes 
    242240  
     241      IF( ln_ssr       )   CALL sbc_ssr( kt )                   ! add SST/SSS damping term 
     242 
    243243      IF( nn_fwb  /= 0 )   CALL sbc_fwb( kt, nn_fwb, nn_fsbc )  ! control the freshwater budget 
    244244 
Note: See TracChangeset for help on using the changeset viewer.