Changeset 4725
- Timestamp:
- 2014-07-18T17:41:33+02:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2014/dev_r4650_UKMO12_CFL_diags_take2/NEMOGCM/NEMO/OPA_SRC/DIA/diacfl.F90
r4715 r4725 87 87 END DO 88 88 END DO 89 CALL lbc_lnk( zcu_cfl(:,:,:), 'U', 1. )90 CALL lbc_lnk( zcv_cfl(:,:,:), 'V', 1. )91 CALL lbc_lnk( zcw_cfl(:,:,:), 'W', 1. )92 89 93 90 ! calculate maximum values and locations
Note: See TracChangeset
for help on using the changeset viewer.