From 159aeab04e843a786b965e51e18f1f026002c79e Mon Sep 17 00:00:00 2001 From: Philippe WAUTELET <philippe.wautelet@aero.obs-mip.fr> Date: Mon, 25 Nov 2019 10:48:50 +0100 Subject: [PATCH] Philippe 25/11/2019: OpenACC: bugfix: rename ZWT_ACT_NUC -> XWT_ACT_NUC in acc directives (forgotten in previous merge) --- src/MNH/modeln.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/MNH/modeln.f90 b/src/MNH/modeln.f90 index 0dd550bac..5f4426526 100644 --- a/src/MNH/modeln.f90 +++ b/src/MNH/modeln.f90 @@ -1774,7 +1774,7 @@ IF (CCLOUD /= 'NONE' .AND. CELEC == 'NONE') THEN !$acc data present(XRHODJ) & !$acc & copyin (NRR, LSEDIC, CSUBG_AUCV, XTSTEP, KWARM, & !$acc & XZZ, XRHODREF, XEXNREF, ZPABST, XTHT, XSIGS, VSIGQSAT, XMFCONV, XTHM, XPABSM, & -!$acc & XRCM, ZWT_ACT_NUC, XDTHRAD, XCF_MF, XRC_MF, XRI_MF, & +!$acc & XRCM, XWT_ACT_NUC, XDTHRAD, XCF_MF, XRC_MF, XRI_MF, & !$acc & XSOLORG, XMI) & !$acc & copy (XSUPSAT, XNACT, XNPRO, XSSPRO, & !$acc & XRTHS, XRT, XRRS, XSVT, XRSVS, XCLDFR, XCIT, XINPRR3D, XEVAP3D, & -- GitLab