- Timestamp:
- 2020-10-19T10:48:19+02:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2020/dev_r13296_HPC-07_mocavero_mpi3/src/SWE/asminc.F90
r13571 r13630 423 423 & / e3t(ji,jj,jk,Kmm) 424 424 END_2D 425 #if defined key_mpi3 426 CALL lbc_lnk_nc_multi( 'asminc', zhdiv, 'T', 1. ) ! lateral boundary cond. (no sign change) 427 #else 425 428 CALL lbc_lnk( 'asminc', zhdiv, 'T', 1. ) ! lateral boundary cond. (no sign change) 429 #endif 426 430 ! 427 431 DO_2D( 0, 0, 0, 0 )
Note: See TracChangeset
for help on using the changeset viewer.