Changeset 11066 for branches/UKMO/AMM15_v3_6_STABLE_package_reanalysis3/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90
- Timestamp:
- 2019-05-28T18:00:55+02:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/AMM15_v3_6_STABLE_package_reanalysis3/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90
r10728 r11066 87 87 USE stopts 88 88 USE diatmb ! Top,middle,bottom output 89 USE diaregmean ! regional means output 90 USE diapea ! potential energy anomaly output 89 91 USE dia25h ! 25h mean output 90 92 USE diaopfoam ! FOAM operational output … … 493 495 IF(lwp) WRITE(numout,*) 'Euler time step switch is ', neuler 494 496 CALL dia_tmb_init ! TMB outputs 497 CALL dia_regmean_init ! TMB outputs 498 CALL dia_pea_init ! TMB outputs 495 499 CALL dia_25h_init ! 25h mean outputs 496 500 CALL dia_diaopfoam_init ! FOAM operational output … … 630 634 IF( numdct_heat /= -1 ) CLOSE( numdct_heat ) ! heat transports 631 635 IF( numdct_salt /= -1 ) CLOSE( numdct_salt ) ! salt transports 636 IF( numdct_NOOS /= -1 ) CLOSE( numdct_NOOS ) ! NOOS transports 632 637 633 638 !
Note: See TracChangeset
for help on using the changeset viewer.