Changeset 14200 for NEMO/branches/2020/dev_r14116_HPC-04_mcastril_Mixed_Precision_implementation_final/src/OCE/TRA/traadv.F90
- Timestamp:
- 2020-12-17T15:36:44+01:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2020/dev_r14116_HPC-04_mcastril_Mixed_Precision_implementation_final/src/OCE/TRA/traadv.F90
r14090 r14200 175 175 ENDIF 176 176 ! 177 ! NOTE: [tiling-comms-merge] These lbc_lnk calls are still needed (pts in the zco case because zps_hde is not called in step, zuu/zvv/zww in all cases, I think because DO loop bounds need to be updated in DYN as done in TRA)178 177 SELECT CASE ( nadv ) !== compute advection trend and add it to general trend ==! 179 178 ! … … 194 193 END IF 195 194 CASE ( np_MUS ) ! MUSCL 196 ! NOTE: [tiling-comms-merge] I added this lbc_lnk as it did not validate against the trunk when using ln_zco197 195 IF (nn_hls.EQ.2) THEN 198 196 CALL lbc_lnk( 'traadv', pts(:,:,:,:,Kbb), 'T', 1.)
Note: See TracChangeset
for help on using the changeset viewer.