- Timestamp:
- 2017-09-22T17:45:41+02:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/AMM15_v3_6_STABLE_package/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90
r8059 r8561 87 87 USE diatmb ! Top,middle,bottom output 88 88 USE dia25h ! 25h mean output 89 USE diaopfoam ! FOAM operational output 90 USE diurnal_bulk ! diurnal bulk SST 89 91 90 92 IMPLICIT NONE … … 405 407 CALL istate_init ! ocean initial state (Dynamics and tracers) 406 408 409 CALL diurnal_sst_bulk_init ! diurnal sst 410 IF ( ln_diurnal ) CALL diurnal_sst_coolskin_init ! cool skin 411 407 412 IF( lk_tide ) CALL tide_init( nit000 ) ! Initialisation of the tidal harmonics 408 413 … … 479 484 CALL dia_tmb_init ! TMB outputs 480 485 CALL dia_25h_init ! 25h mean outputs 486 CALL dia_diaopfoam_init ! FOAM operational output 481 487 ! 482 488 END SUBROUTINE nemo_init
Note: See TracChangeset
for help on using the changeset viewer.