Skip to content
Snippets Groups Projects
Commit a08cd4bf authored by WAUTELET Philippe's avatar WAUTELET Philippe
Browse files

Philippe 26/01/2022: OpenACC: workaround CCE compiler problem: add list of...

Philippe 26/01/2022: OpenACC: workaround CCE compiler problem: add list of dimensions in array copies in a kernels region
parent d1698589
No related branches found
No related tags found
No related merge requests found
...@@ -1516,8 +1516,8 @@ IF (LLES_CALL) THEN ...@@ -1516,8 +1516,8 @@ IF (LLES_CALL) THEN
!$acc end kernels !$acc end kernels
CALL LES_MEAN_SUBGRID(ZTMP1_DEVICE,X_LES_SUBGRID_U2) CALL LES_MEAN_SUBGRID(ZTMP1_DEVICE,X_LES_SUBGRID_U2)
!$acc kernels !$acc kernels
X_LES_SUBGRID_V2 = X_LES_SUBGRID_U2 X_LES_SUBGRID_V2(:,:,:) = X_LES_SUBGRID_U2(:,:,:)
X_LES_SUBGRID_W2 = X_LES_SUBGRID_U2 X_LES_SUBGRID_W2(:,:,:) = X_LES_SUBGRID_U2(:,:,:)
!$acc end kernels !$acc end kernels
CALL GZ_M_W_DEVICE(KKA,KKU,KKL,PTHLT,PDZZ,ZTMP2_DEVICE) CALL GZ_M_W_DEVICE(KKA,KKU,KKL,PTHLT,PDZZ,ZTMP2_DEVICE)
CALL MZF_DEVICE( ZTMP2_DEVICE, ZTMP3_DEVICE ) CALL MZF_DEVICE( ZTMP2_DEVICE, ZTMP3_DEVICE )
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment