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 14098 for NEMO/branches/2020/dev_r13787_doc_latex_recovery/src/OCE/DIA/diawri.F90 – NEMO

Ignore:
Timestamp:
2020-12-04T15:36:00+01:00 (4 years ago)
Author:
nicolasmartin
Message:

#2414 Sync merge with trunk

Location:
NEMO/branches/2020/dev_r13787_doc_latex_recovery
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • NEMO/branches/2020/dev_r13787_doc_latex_recovery

    • Property svn:externals

      •  

        old new  
        66^/vendors/FCM@HEAD            ext/FCM 
        77^/vendors/IOIPSL@HEAD         ext/IOIPSL 
         8^/vendors/PPR@HEAD            ext/PPR 
        89 
        910# SETTE 

  • NEMO/branches/2020/dev_r13787_doc_latex_recovery/src/OCE/DIA/diawri.F90

    r14066 r14098  
    141141      CALL iom_put("e3f_0", e3f_0(:,:,:) ) 
    142142      ! 
     143      IF ( iom_use("tpt_dep") ) THEN 
     144         DO jk = 1, jpk 
     145            z3d(:,:,jk) = gdept(:,:,jk,Kmm) 
     146         END DO 
     147         CALL iom_put( "tpt_dep",     z3d(:,:,:) ) 
     148      ENDIF 
     149 
    143150      IF ( iom_use("e3t") .OR. iom_use("e3tdef") ) THEN  ! time-varying e3t 
    144151         DO jk = 1, jpk 
Note: See TracChangeset for help on using the changeset viewer.