- Timestamp:
- 2020-10-01T12:04:12+02:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2020/dev_r13383_HPC-02_Daley_Tiling/src/OCE/TRD/trdini.F90
r12377 r13551 11 11 !!---------------------------------------------------------------------- 12 12 USE dom_oce ! ocean domain 13 USE domain, ONLY : dom_tile 13 14 USE trd_oce ! trends: ocean variables 14 15 USE trdken ! trends: 3D kinetic energy … … 88 89 ! 89 90 ! IF( .NOT.ln_linssh .AND. ( l_trdtra .OR. l_trddyn ) ) CALL ctl_stop( 'trend diagnostics with variable volume not validated' ) 90 91 92 IF( ln_tile .AND. ( l_trdtra .OR. l_trddyn ) ) THEN 93 CALL ctl_warn('Tiling is not yet implemented for the trends diagnostics; ln_tile is forced to FALSE') 94 ln_tile = .FALSE. 95 CALL dom_tile( ntsi, ntsj, ntei, ntej ) 96 ENDIF 97 91 98 !!gm : Potential BUG : 3D output only for vector invariant form! add a ctl_stop or code the flux form case 92 99 !!gm : bug/pb for vertical advection of tracer in vvl case: add T.dt[eta] in the output...
Note: See TracChangeset
for help on using the changeset viewer.