Ignore:
Timestamp:
2019-05-22T22:44:28+02:00 (17 months ago)
Author:
rrenshaw
Message:

code fixes

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/UKMO/AMM15_v3_6_STABLE_package_reanalysis2/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90

    r10728 r11038  
    493493      IF(lwp) WRITE(numout,*) 'Euler time step switch is ', neuler 
    494494                            CALL dia_tmb_init  ! TMB outputs 
     495                            CALL dia_regmean_init  ! TMB outputs 
     496                            CALL dia_pea_init  ! TMB outputs 
    495497                            CALL dia_25h_init  ! 25h mean  outputs 
    496498                            CALL dia_diaopfoam_init  ! FOAM operational output 
     
    630632      IF( numdct_heat     /= -1 )   CLOSE( numdct_heat     )   ! heat transports 
    631633      IF( numdct_salt     /= -1 )   CLOSE( numdct_salt     )   ! salt transports 
     634      IF( numdct_NOOS     /= -1 )   CLOSE( numdct_NOOS     )   ! NOOS transports 
    632635 
    633636      ! 
Note: See TracChangeset for help on using the changeset viewer.