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

Juan 26/09/2012: remove acc in shuman => use macro inside

parent 17ff1945
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
Showing
with 2 additions and 2 deletions
MNH/shuman.f90
+ 2
− 2
View file @ 13922abc
...@@ -662,10 +662,10 @@ IKU = SIZE(PA,3) ...@@ -662,10 +662,10 @@ IKU = SIZE(PA,3)
!!$END DO !!$END DO
!$acc region ! acc region
PMZM(:,:,2:IKU) = 0.5*( PA(:,:,2:IKU)+PA(:,:,1:IKU-1) ) PMZM(:,:,2:IKU) = 0.5*( PA(:,:,2:IKU)+PA(:,:,1:IKU-1) )
PMZM(:,:,1) = -999. PMZM(:,:,1) = -999.
!$acc end region ! acc end region
! !
!------------------------------------------------------------------------------- !-------------------------------------------------------------------------------
! !
......
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