Changeset 11224 for NEMO/branches/2019/dev_r10984_HPC-13_IRRMANN_BDY_optimization/src/OCE/BDY/bdydta.F90

Timestamp:

2019-07-08T11:19:12+02:00 (5 years ago)

Author:

smasson

Message:

dev_r10984_HPC-13 : bugfix to work will all configurations, see #2285

File:

• NEMO/branches/2019/dev_r10984_HPC-13_IRRMANN_BDY_optimization/src/OCE/BDY/bdydta.F90 (modified) (1 diff)

NEMO/branches/2019/dev_r10984_HPC-13_IRRMANN_BDY_optimization/src/OCE/BDY/bdydta.F90

@@ -54 +54 @@
    INTEGER , PARAMETER ::   jp_bdyh_i = 9     ! 
    INTEGER , PARAMETER ::   jp_bdyh_S = 10    ! 
-                                                              ! =F => baroclinic velocities in 3D boundary conditions
+#if ! defined key_si3
+   INTEGER , PARAMETER ::   jpl = 1
+#endif
+                                                             ! =F => baroclinic velocities in 3D boundary conditions
 !$AGRIF_DO_NOT_TREAT
    TYPE(FLD), PUBLIC, ALLOCATABLE, DIMENSION(:,:), TARGET ::   bf   ! structure of input fields (file informations, fields read)