Skip to content
Snippets Groups Projects
Commit bd98b8df authored by ESCOBAR Juan's avatar ESCOBAR Juan
Browse files

Juan 23/11/2013: replace local/create

parent cd9a494e
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
Showing
with 1 addition and 1 deletion
MNH/contrav.f90
+ 1
− 1
View file @ bd98b8df
...@@ -305,7 +305,7 @@ IJE=SIZE(PDXX,2)-1 ...@@ -305,7 +305,7 @@ IJE=SIZE(PDXX,2)-1
IKB=1+JPVEXT IKB=1+JPVEXT
IKE=SIZE(PDXX,3) - JPVEXT IKE=SIZE(PDXX,3) - JPVEXT
! !
!$acc data local (z1,z2 ) !$acc data create (z1,z2 )
!$acc kernels !$acc kernels
! !
PRUCT(:,:,:) = PRUT(:,:,:) / PDXX(:,:,:) PRUCT(:,:,:) = PRUT(:,:,:) / PDXX(:,:,:)
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment

Documentation | Mentions légales | CGU | Accessibilité : non conforme