From 45d8e0f53df7c9b3f57a7f273078b3eb7d9bc570 Mon Sep 17 00:00:00 2001 From: ESCOBAR Juan <escj@nuwa.aerologie.net> Date: Tue, 9 Apr 2013 18:05:58 +0200 Subject: [PATCH] Juan 9/04/2013: change comment --- MNH/advec_ppm_algo.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/MNH/advec_ppm_algo.f90 b/MNH/advec_ppm_algo.f90 index 6fdcfb87c..c5cadd211 100644 --- a/MNH/advec_ppm_algo.f90 +++ b/MNH/advec_ppm_algo.f90 @@ -93,7 +93,7 @@ REAL, DIMENSION(:,:,:), INTENT(OUT) :: PSRC ! source term after advection ! ------------ ! !$acc data pcopyin(PFIELDT,PRHODJ) pcopyout(PSRC) -! local (ZPPM) +! create/mirror (ZPPM) !$acc kernels PSRC = PFIELDT !$acc end kernels -- GitLab