Changeset 15592 for NEMO/branches/2021
- Timestamp:
- 2021-12-13T11:30:55+01:00 (2 years ago)
- Location:
- NEMO/branches/2021/dev_r14318_RK3_stage1/src/OCE
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2021/dev_r14318_RK3_stage1/src/OCE/DYN/dynspg_ts.F90
r15574 r15592 803 803 # endif 804 804 ! 805 CALL lbc_lnk _multi( 'dynspg_ts', puu_b, 'U', -1._wp, pvv_b, 'V', -1._wp ) ! Boundary conditions805 CALL lbc_lnk( 'dynspg_ts', puu_b, 'U', -1._wp, pvv_b, 'V', -1._wp ) ! Boundary conditions 806 806 ! 807 807 ENDIF -
NEMO/branches/2021/dev_r14318_RK3_stage1/src/OCE/stprk3_stg.F90
r15561 r15592 409 409 # endif 410 410 ! !* local domain boundaries (T-point, unchanged sign) 411 CALL lbc_lnk _multi( 'stp_RK3_stg', uu(:,:,:, Kaa), 'U', -1., vv(:,:,: ,Kaa), 'V', -1. &412 & 411 CALL lbc_lnk( 'stp_RK3_stg', uu(:,:,:, Kaa), 'U', -1., vv(:,:,: ,Kaa), 'V', -1. & 412 & , ts(:,:,:,jp_tem,Kaa), 'T', 1., ts(:,:,:,jp_sal,Kaa), 'T', 1. ) 413 413 ! 414 414 ! !* BDY open boundaries
Note: See TracChangeset
for help on using the changeset viewer.