Ignore:
Timestamp:
2019-04-02T15:32:40+02:00 (19 months ago)
Author:
clem
Message:

output cfl diagnostics (courant numbers) in netcdf ⇒ add cfl_cu, cfl_cv, cfl_cw

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/releases/release-4.0/src/OCE/DIA/diacfl.F90

    r10425 r10823  
    1717   USE lbclnk          ! ocean lateral boundary condition (or mpp link) 
    1818   USE in_out_manager  ! I/O manager 
     19   USE iom             !  
    1920   USE timing          ! Performance output 
    2021 
     
    7879      END DO 
    7980      ! 
     81      ! write outputs 
     82      IF( iom_use('cfl_cu') )   CALL iom_put( 'cfl_cu', MAXVAL( zCu_cfl, dim=3 ) ) 
     83      IF( iom_use('cfl_cv') )   CALL iom_put( 'cfl_cv', MAXVAL( zCv_cfl, dim=3 ) ) 
     84      IF( iom_use('cfl_cw') )   CALL iom_put( 'cfl_cw', MAXVAL( zCw_cfl, dim=3 ) ) 
     85 
    8086      !                    ! calculate maximum values and locations 
    8187      IF( lk_mpp ) THEN 
Note: See TracChangeset for help on using the changeset viewer.