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 1498 – NEMO

Changeset 1498


Ignore:
Timestamp:
2009-07-20T16:48:21+02:00 (15 years ago)
Author:
ctlod
Message:

remove useless array av_tide_itf(:,:,:) due to the zdftmx.F90 optimization, see ticket: #457

Location:
trunk/NEMO/OPA_SRC
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk/NEMO/OPA_SRC/DIA/diawri.F90

    r1482 r1498  
    553553# if defined key_zdftmx  
    554554      CALL histwrite( nid_W, "votidavt", it, av_tide        , ndim_T, ndex_T )    ! vert. mix. related to internal tides 
    555       CALL histwrite( nid_W, "voitfavt", it, av_tide_itf    , ndim_T, ndex_T )    ! ITF vert. mix. related to internal tides 
    556555# endif 
    557556      CALL histwrite( nid_W, "votkeevd", it, avt_evd        , ndim_T, ndex_T )    ! T enhan. vert. eddy diff. coef. 

  • trunk/NEMO/OPA_SRC/ZDF/zdf_oce.F90

    r1492 r1498  
    3737#if defined key_zdftmx 
    3838   REAL(wp), PUBLIC, DIMENSION(jpi,jpj,jpk) ::   av_tide      !: Tidal mixing 
    39    REAL(wp), PUBLIC, DIMENSION(jpi,jpj,jpk) ::   av_tide_itf  !: Tidal mixing in the Indonesian Through Flow 
    4039#endif 
    4140  
Note: See TracChangeset for help on using the changeset viewer.