- Timestamp:
- 2022-04-08T12:40:22+02:00 (2 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/UKMO/NEMO_4.0.4_GC_couple_pkg/src/OCE/SBC/sbcice_cice.F90
r14075 r15772 243 243 ! Horizontal scale factor interpolations 244 244 ! -------------------------------------- 245 246 call lbc_lnk("cice_sbc_init", e3t_b, 'T', 1.0_wp) 247 call lbc_lnk("cice_sbc_init", e3t_n, 'T', 1.0_wp) 248 245 249 CALL dom_vvl_interpol( e3t_b(:,:,:), e3u_b(:,:,:), 'U' ) 246 250 CALL dom_vvl_interpol( e3t_b(:,:,:), e3v_b(:,:,:), 'V' )
Note: See TracChangeset
for help on using the changeset viewer.