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 3401 for branches/2012/dev_r3385_NOCS04_HAMF – NEMO

Ignore:
Timestamp:
2012-05-24T13:05:50+02:00 (12 years ago)
Author:
acc
Message:

Branch: dev_r3385_NOCS04_HAMF; #665. Stage 1a of 2012 development: correcting possible bug in sbccpl.F90 and reverting to use of instantaneous sst value in preference to the mean value (sst_m) in case coupling frequency differs from the nn_fsbc frequency.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2012/dev_r3385_NOCS04_HAMF/NEMOGCM/NEMO/OPA_SRC/SBC/sbccpl.F90

    r3396 r3401  
    11451145 
    11461146      zicefr(:,:) = 1.- p_frld(:,:) 
    1147       !zcptn(:,:) = rcp * tsn(:,:,1,jp_tem) 
    1148       zcptn(:,:) = rcp * sst_m(:,:) 
     1147      !! zcptn(:,:) = rcp * sst_m(:,:)                       !! safer to use instantaneous sst value in case coupling frequency does not match nn_fsbc frequency ?? 
     1148      zcptn(:,:) = rcp * tsn(:,:,1,jp_tem) 
    11491149      ! 
    11501150      !                                                      ! ========================= ! 
Note: See TracChangeset for help on using the changeset viewer.