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
endif
ifeq ($(GENASIS_MACHINE), POWER_XL)
ifeq ($(MACHINE), POWER_XL)
FC=xlf2008_r -qsmp=omp -qoffload
endif
......
......@@ -49,7 +49,7 @@ contains
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 private ( iF, iaVP, iaVM, fM, fC, fP, fI, fO ) &
!$OMP private ( xAM, xAC, xAP, x2AM, x2AC, x2AP, xI, xO, xE ) &
......@@ -229,7 +229,7 @@ contains
end do !-- jV
end do !-- kV
end do !-- iS
!$OMP end target teams distribute parallel do
!$OMP end target teams distribute parallel do simd
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