Changeset 10965 for NEMO/branches/2019/dev_r10721_KERNEL-02_Storkey_Coward_IMMERSE_first_steps/src/OCE/C1D/step_c1d.F90
- Timestamp:
- 2019-05-10T18:02:51+02:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2019/dev_r10721_KERNEL-02_Storkey_Coward_IMMERSE_first_steps/src/OCE/C1D/step_c1d.F90
r10068 r10965 14 14 !!---------------------------------------------------------------------- 15 15 USE step_oce ! time stepping definition modules 16 USE step, ONLY : Nbb, Nnn, Naa, Nrhs ! time level indices 16 17 #if defined key_top 17 18 USE trcstp ! passive tracer time-stepping (trc_stp routine) … … 85 86 ! diagnostics and outputs (ua, va, ta, sa used as workspace) 86 87 !<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< 87 CALL dia_wri( kstp )! ocean model: outputs88 IF( lk_diahth ) CALL dia_hth( kstp )! Thermocline depth (20°C)88 CALL dia_wri( kstp, Nnn ) ! ocean model: outputs 89 IF( lk_diahth ) CALL dia_hth( kstp, Nnn ) ! Thermocline depth (20°C) 89 90 90 91
Note: See TracChangeset
for help on using the changeset viewer.