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 5137 for branches/2015/dev_r5020_CNRS_DIAPTR/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90 – NEMO

Ignore:
Timestamp:
2015-03-11T10:57:11+01:00 (9 years ago)
Author:
cetlod
Message:

dev_r5020_CNRS_DIAPTR: some improvments of poleward heat transport diagnostics before merging with the trunk

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2015/dev_r5020_CNRS_DIAPTR/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90

    r5023 r5137  
    6161   USE asminc          ! assimilation increments      
    6262   USE asmbkg          ! writing out state trajectory 
     63   USE diaptr          ! poleward transports           (dia_ptr_init routine) 
    6364   USE diadct          ! sections transports           (dia_dct_init routine) 
    6465   USE diaobs          ! Observation diagnostics       (dia_obs_init routine) 
     
    438439      IF( lk_floats     )   CALL     flo_init   ! drifting Floats 
    439440      IF( lk_diaar5     )   CALL dia_ar5_init   ! ar5 diag 
     441                            CALL dia_ptr_init   ! Poleward TRansports initialization 
    440442      IF( lk_diadct     )   CALL dia_dct_init   ! Sections tranports 
    441443                            CALL dia_hsb_init   ! heat content, salt content and volume budgets 
Note: See TracChangeset for help on using the changeset viewer.