Changeset 14596

Timestamp:

2021-03-08T09:17:56+01:00 (3 years ago)

Author:

clem

Message:

just cosmetics

File:

• NEMO/releases/r4.0/r4.0-HEAD/src/OCE/DYN/dynvor.F90 (modified) (1 diff)

NEMO/releases/r4.0/r4.0-HEAD/src/OCE/DYN/dynvor.F90

@@ -350 +350 @@
       INTEGER  ::   ji, jj, jk           ! dummy loop indices
       REAL(wp) ::   zx1, zy1, zx2, zy2   ! local scalars
-      REAL(wp), DIMENSION(jpi,jpj) ::   zwx, zwy, zwz   ! 1D workspace
+      REAL(wp), DIMENSION(jpi,jpj) ::   zwx, zwy, zwz   ! 2D workspace
       !!----------------------------------------------------------------------
       !