Changeset 12555 for branches/UKMO/dev_r5518_GO6_starthour_obsoper/NEMOGCM/NEMO/OPA_SRC/DYN/dynzdf_imp.F90
- Timestamp:
- 2020-03-13T17:33:02+01:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_GO6_starthour_obsoper/NEMOGCM/NEMO/OPA_SRC/DYN/dynzdf_imp.F90
r6795 r12555 81 81 IF(lwp) WRITE(numout,*) 'dyn_zdf_imp : vertical momentum diffusion implicit operator' 82 82 IF(lwp) WRITE(numout,*) '~~~~~~~~~~~ ' 83 IF(lwp .AND. lflush) CALL flush(numout) 83 84 ! 84 85 IF( lk_vvl ) THEN ; r_vvl = 1._wp ! Variable volume indicator
Note: See TracChangeset
for help on using the changeset viewer.