From 02d1a54054d6586099d643e3adaf55ea24120e60 Mon Sep 17 00:00:00 2001
From: Philippe WAUTELET <philippe.wautelet@aero.obs-mip.fr>
Date: Mon, 20 Jun 2022 15:02:41 +0200
Subject: [PATCH] Philippe 20/06/2022: OpenACC: fix problmes with Cray compiler
 (introduced in previous commit)

---
 src/MNH/rain_ice_red.f90 | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

diff --git a/src/MNH/rain_ice_red.f90 b/src/MNH/rain_ice_red.f90
index 2492f0808..9253680da 100644
--- a/src/MNH/rain_ice_red.f90
+++ b/src/MNH/rain_ice_red.f90
@@ -1375,14 +1375,14 @@ GTEST=.false.
 IF(HSUBG_AUCV_RC=='PDF ' .AND. CSUBG_PR_PDF=='SIGM') GTEST=.true.
 #ifdef MNH_COMPILER_CCE
 !$acc kernels present( ZSIGMA_RC, ZRHT, ZEXT_RH,                                                           &
-!acc &                 ZTOT_RVHENI,  ZTOT_RCHONI,  ZTOT_RRHONG,  ZTOT_RVDEPS,  ZTOT_RIAGGS,  ZTOT_RIAUTS,  &
-!acc &                 ZTOT_RVDEPG,  ZTOT_RCAUTR,  ZTOT_RCACCR,  ZTOT_RREVAV,  ZTOT_RCRIMSS, ZTOT_RCRIMSG, &
-!acc &                 ZTOT_RSRIMCG, ZTOT_RIMLTC,  ZTOT_RCBERI,  ZTOT_RHMLTR,  ZTOT_RSMLTG,  ZTOT_RCMLTSR, &
-!acc &                 ZTOT_RRACCSS, ZTOT_RRACCSG, ZTOT_RSACCRG, ZTOT_RICFRRG, ZTOT_RRCFRIG,               &
-!acc &                 ZTOT_RICFRR,  ZTOT_RCWETG,  ZTOT_RIWETG,  ZTOT_RRWETG,  ZTOT_RSWETG,  ZTOT_RCDRYG,  &
-!acc &                 ZTOT_RIDRYG,  ZTOT_RRDRYG,  ZTOT_RSDRYG,  ZTOT_RWETGH,  ZTOT_RGMLTR,  ZTOT_RCWETH,  &
-!acc &                 ZTOT_RIWETH,  ZTOT_RSWETH,  ZTOT_RGWETH,  ZTOT_RRWETH,  ZTOT_RCDRYH,  ZTOT_RIDRYH,  &
-!acc &                 ZTOT_RSDRYH,  ZTOT_RRDRYH,  ZTOT_RGDRYH,  ZTOT_RDRYHG                               )
+!$acc &                ZTOT_RVHENI,  ZTOT_RCHONI,  ZTOT_RRHONG,  ZTOT_RVDEPS,  ZTOT_RIAGGS,  ZTOT_RIAUTS,  &
+!$acc &                ZTOT_RVDEPG,  ZTOT_RCAUTR,  ZTOT_RCACCR,  ZTOT_RREVAV,  ZTOT_RCRIMSS, ZTOT_RCRIMSG, &
+!$acc &                ZTOT_RSRIMCG, ZTOT_RIMLTC,  ZTOT_RCBERI,  ZTOT_RHMLTR,  ZTOT_RSMLTG,  ZTOT_RCMLTSR, &
+!$acc &                ZTOT_RRACCSS, ZTOT_RRACCSG, ZTOT_RSACCRG, ZTOT_RICFRRG, ZTOT_RRCFRIG,               &
+!$acc &                ZTOT_RICFRR,  ZTOT_RCWETG,  ZTOT_RIWETG,  ZTOT_RRWETG,  ZTOT_RSWETG,  ZTOT_RCDRYG,  &
+!$acc &                ZTOT_RIDRYG,  ZTOT_RRDRYG,  ZTOT_RSDRYG,  ZTOT_RWETGH,  ZTOT_RGMLTR,  ZTOT_RCWETH,  &
+!$acc &                ZTOT_RIWETH,  ZTOT_RSWETH,  ZTOT_RGWETH,  ZTOT_RRWETH,  ZTOT_RCDRYH,  ZTOT_RIDRYH,  &
+!$acc &                ZTOT_RSDRYH,  ZTOT_RRDRYH,  ZTOT_RGDRYH,  ZTOT_RDRYHG                               )
 #else
 !$acc kernels
 #endif
-- 
GitLab