Changeset 14200 for NEMO/branches/2020/dev_r14116_HPC-04_mcastril_Mixed_Precision_implementation_final/src/OCE/LDF/ldfc1d_c2d.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/LDF/ldfc1d_c2d.F90
r14072 r14200 140 140 END_2D 141 141 CASE( 'TRA' ) ! U- and V-points 142 ! NOTE: [tiling-comms-merge] Change needed to preserve results with respect to the trunk143 142 DO_2D( nn_hls, nn_hls, nn_hls, nn_hls ) 144 143 pah1(ji,jj,1) = pUfac * MAX( e1u(ji,jj), e2u(ji,jj) )**knn
Note: See TracChangeset
for help on using the changeset viewer.