- Timestamp:
- 2019-06-11T16:10:28+02:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_GO6_package/NEMOGCM/NEMO/OPA_SRC/DYN/dynspg.F90
r6486 r11101 231 231 WRITE(numout,*) ' Free surface with time splitting lk_dynspg_ts = ', lk_dynspg_ts 232 232 WRITE(numout,*) ' Filtered free surface cst volume lk_dynspg_flt = ', lk_dynspg_flt 233 IF(lflush) CALL flush(numout) 233 234 ENDIF 234 235 … … 266 267 IF( nspg == 1 ) WRITE(numout,*) ' free surface with time splitting scheme' 267 268 IF( nspg == 2 ) WRITE(numout,*) ' filtered free surface' 269 IF(lflush) CALL flush(numout) 268 270 ENDIF 269 271
Note: See TracChangeset
for help on using the changeset viewer.