- Timestamp:
- 2015-08-18T18:21:29+02:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/smagorinsky_diagnostics/NEMOGCM/NEMO/OPA_SRC/LDF/ldftra_smag.F90
r5699 r5702 174 174 CALL lbc_lnk( ahtu, 'U', 1. ) ! Lateral boundary conditions 175 175 CALL lbc_lnk( ahtv, 'V', 1. ) 176 CALL iom_put( 'ahtu_lap_smag', aht1(:,:,:) ) 177 CALL iom_put( 'ahtv_lap_smag', aht2(:,:,:) ) 176 178 177 179 IF( kt == nit000 ) THEN
Note: See TracChangeset
for help on using the changeset viewer.