Changeset 12879 for NEMO/branches/UKMO/dev_r12745_HPC-02_Daley_Tiling_trial_public/src/OCE/TRA/traldf.F90

Timestamp:

2020-05-06T14:38:01+02:00 (4 years ago)

Author:

hadcv

Message:

Changes following feedback

File:

• NEMO/branches/UKMO/dev_r12745_HPC-02_Daley_Tiling_trial_public/src/OCE/TRA/traldf.F90 (modified) (2 diffs)

NEMO/branches/UKMO/dev_r12745_HPC-02_Daley_Tiling_trial_public/src/OCE/TRA/traldf.F90

@@ -63 +63 @@
       ENDIF
       !
-      IF( ntile == jpnijtile )  THEN              ! Do only after all tiles finish
+      IF( ntile == nijtile )  THEN                ! Do only after all tiles finish
          IF( l_trdtra )   THEN                    !* Save ta and sa trends
             ! TODO: TO BE TILED
@@ -83 +83 @@
       END SELECT
       !
-      IF( ntile == jpnijtile )  THEN              ! Do only after all tiles finish
+      IF( ntile == nijtile )  THEN                ! Do only after all tiles finish
          IF( l_trdtra )   THEN                    !* save the horizontal diffusive trends for further diagnostics
             ! TODO: TO BE TILED