Philippe 13/06/2023: OpenACC: DEL_HALO2_ll: workaround problem with CCE 15.0.1

src/MNH/get_halo.f90

@@ -2744,7 +2744,6 @@ END SUBROUTINE GET_HALO2_D
 !*       0.2   Declarations of local variables :
 !
   TYPE(HALO2LIST_ll), POINTER :: TZHALO2LIST
-  REAL , POINTER , CONTIGUOUS , DIMENSION(:,:) :: ZWEST,ZEAST,ZSOUTH,ZNORTH
 !
 !-------------------------------------------------------------------------------
 !
@@ -2754,12 +2753,8 @@ END SUBROUTINE GET_HALO2_D
 !
   DO WHILE(ASSOCIATED(TZHALO2LIST))
 !
-   ZWEST => TZHALO2LIST%HALO2%WEST
-   ZEAST => TZHALO2LIST%HALO2%EAST
-   ZSOUTH => TZHALO2LIST%HALO2%SOUTH
-   ZNORTH => TZHALO2LIST%HALO2%NORTH
-    !Remark: OpenACC data create done in INIT_HALO2_ll
-   !$acc exit data delete(ZWEST,ZEAST,ZSOUTH,ZNORTH)
+   !Remark: OpenACC data create done in INIT_HALO2_ll
+   !$acc exit data delete( TZHALO2LIST%HALO2%WEST, TZHALO2LIST%HALO2%EAST, TZHALO2LIST%HALO2%SOUTH, TZHALO2LIST%HALO2%NORTH )
 
    TPHALO2LIST => TZHALO2LIST%NEXT
     DEALLOCATE(TZHALO2LIST%HALO2%WEST)