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 8289 for branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO – NEMO

Ignore:
Timestamp:
2017-07-06T10:17:02+02:00 (7 years ago)
Author:
clem
Message:

correct outputs

Location:
branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/limrhg.F90

    r8239 r8289  
    727727      CALL lbc_lnk_multi(   diag_utau_oi, 'U', -1., diag_vtau_oi, 'V', -1.    ) 
    728728 
     729      CALL lbc_lnk_multi(   diag_xmtrp_ice, 'U', -1., diag_xmtrp_snw, 'U', -1., & 
     730                 &          diag_xatrp    , 'U', -1., diag_ymtrp_ice, 'V', -1., & 
     731                 &          diag_ymtrp_snw, 'V', -1., diag_yatrp    , 'V', -1.  ) 
     732 
    729733      ! 
    730734      !------------------------------------------------------------------------------! 

  • branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/limwri.F90

    r8272 r8289  
    9898      END DO 
    9999 
    100       zmiss_val     = -1.0e20 
     100      zmiss_val     = 1.0e20 
    101101      zmiss(:,:)    = zmiss_val * ( 1. - zswi(:,:) ) 
    102102      zmiss2(:,:,:) = zmiss_val * ( 1. - zswi2(:,:,:) ) 
Note: See TracChangeset for help on using the changeset viewer.