Commit 487d41bf authored by Budiardja, Reuben's avatar Budiardja, Reuben
Browse files

Tweakes to reproducer.

parent b382ba2f
ifeq ($(GENASIS_MACHINE), Cray_CCE) ifeq ($(MACHINE), Cray_CCE)
FC=ftn -fopenmp FC=ftn -fopenmp
endif endif
ifeq ($(GENASIS_MACHINE), POWER_XL) ifeq ($(MACHINE), POWER_XL)
FC=xlf2008_r -qsmp=omp -qoffload FC=xlf2008_r -qsmp=omp -qoffload
endif endif
......
...@@ -49,7 +49,7 @@ contains ...@@ -49,7 +49,7 @@ contains
if ( UseDevice ) then if ( UseDevice ) then
!$OMP target teams distribute parallel do collapse ( 4 ) & !$OMP target teams distribute parallel do simd collapse ( 4 ) &
!$OMP schedule ( static, 1 ) & !$OMP schedule ( static, 1 ) &
!$OMP private ( iF, iaVP, iaVM, fM, fC, fP, fI, fO ) & !$OMP private ( iF, iaVP, iaVM, fM, fC, fP, fI, fO ) &
!$OMP private ( xAM, xAC, xAP, x2AM, x2AC, x2AP, xI, xO, xE ) & !$OMP private ( xAM, xAC, xAP, x2AM, x2AC, x2AP, xI, xO, xE ) &
...@@ -229,7 +229,7 @@ contains ...@@ -229,7 +229,7 @@ contains
end do !-- jV end do !-- jV
end do !-- kV end do !-- kV
end do !-- iS end do !-- iS
!$OMP end target teams distribute parallel do !$OMP end target teams distribute parallel do simd
else !-- use host else !-- use host
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment