- Timestamp:
- 2009-10-02T11:26:40+02:00 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/OPA_SRC/step.F90
r1594 r1635 240 240 ! diagnostics and outputs (ua, va, ta, sa used as workspace) 241 241 !<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< 242 CALL dia_wri( kstp ) ! ocean model: outputs243 242 IF( lk_floats ) CALL flo_stp( kstp ) ! drifting Floats 244 243 IF( lk_diahth ) CALL dia_hth( kstp ) ! Thermocline depth (20 degres isotherm depth) … … 247 246 IF( lk_diafwb ) CALL dia_fwb( kstp ) ! Fresh water budget diagnostics 248 247 IF( ln_diaptr ) CALL dia_ptr( kstp ) ! Poleward TRansports diagnostics 248 CALL dia_wri( kstp ) ! ocean model: outputs 249 249 250 250 #if defined key_top
Note: See TracChangeset
for help on using the changeset viewer.