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 7599 for branches/UKMO/dev_r5518_GO6_package_for_static_diagnostics/NEMOGCM/NEMO/OPA_SRC/DYN/dynldf.F90 – NEMO

Ignore:
Timestamp:
2017-01-23T16:12:59+01:00 (8 years ago)
Author:
timgraham
Message:

Fully working version

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/UKMO/dev_r5518_GO6_package_for_static_diagnostics/NEMOGCM/NEMO/OPA_SRC/DYN/dynldf.F90

    r7589 r7599  
    2929   USE lbclnk         ! ocean lateral boundary conditions (or mpp link) 
    3030   USE wrk_nemo        ! Memory Allocation 
     31   USE iom 
    3132   USE timing          ! Timing 
    3233 
    … …  
    9192                ENDDO 
    9293             ENDDO 
    93              CALL iom_put("ahmt_blb", ztmp) 
     94             CALL iom_put("ahmt_blp", ztmp) 
    9495             CALL wrk_dealloc(jpi, jpj, ztmp) 
    9596          ENDIF 
Note: See TracChangeset for help on using the changeset viewer.