Changeset 7560 for branches/UKMO/dev_r5518_GO6_package/NEMOGCM
- Timestamp:
- 2017-01-16T10:59:36+01:00 (7 years ago)
- Location:
- branches/UKMO/dev_r5518_GO6_package/NEMOGCM/NEMO/OPA_SRC
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_GO6_package/NEMOGCM/NEMO/OPA_SRC/TRA/traadv_tvd.F90
r7179 r7560 100 100 IF(lwp) WRITE(numout,*) '~~~~~~~~~~~' 101 101 ! 102 l_trd = .FALSE.103 l_trans = .FALSE.104 IF( ( cdtype == 'TRA' .AND. l_trdtra ) .OR. ( cdtype == 'TRC' .AND. l_trdtrc ) ) l_trd = .TRUE.105 IF( cdtype == 'TRA' .AND. (iom_use("uadv_heattr") .OR. iom_use("vadv_heattr") ) ) l_trans = .TRUE.106 102 ENDIF 103 l_trd = .FALSE. 104 l_trans = .FALSE. 105 IF( ( cdtype == 'TRA' .AND. l_trdtra ) .OR. ( cdtype == 'TRC' .AND. l_trdtrc ) ) l_trd = .TRUE. 106 IF( cdtype == 'TRA' .AND. (iom_use("uadv_heattr") .OR. iom_use("vadv_heattr") ) ) l_trans = .TRUE. 107 107 ! 108 108 IF( l_trd .OR. l_trans ) THEN -
branches/UKMO/dev_r5518_GO6_package/NEMOGCM/NEMO/OPA_SRC/ZDF/zdfmxl.F90
r7179 r7560 480 480 mld_diags(5) = sn_mld5 481 481 482 IF( nn_mld_diag > 0) THEN482 IF( lwp .AND. (nn_mld_diag > 0) ) THEN 483 483 WRITE(numout,*) '=============== Vertically-interpolated mixed layer ================' 484 484 WRITE(numout,*) '(Diagnostic number, nn_mld_type, rn_zref, rn_dT_crit, rn_iso_frac)'
Note: See TracChangeset
for help on using the changeset viewer.