From be6ddb21b73dec8f0b7828ca4214fe426f5de4dd Mon Sep 17 00:00:00 2001 From: Anand Radhakrishnan Date: Mon, 1 Apr 2024 13:22:18 -0400 Subject: [PATCH] bug --- src/simulation/m_fftw.fpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/simulation/m_fftw.fpp b/src/simulation/m_fftw.fpp index b0567cb633..848579a17e 100644 --- a/src/simulation/m_fftw.fpp +++ b/src/simulation/m_fftw.fpp @@ -172,8 +172,8 @@ contains ierr = cufftExecD2Z(fwd_plan_gpu, data_real_gpu, data_cmplx_gpu) #else ierr = hipfftExecD2Z(fwd_plan_gpu, c_loc(data_real_gpu), c_loc(data_cmplx_gpu)) -#endif call hipCheck(hipDeviceSynchronize()) +#endif !$acc end host_data Nfq = 3 !$acc update device(Nfq)