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

Juan 19/09/2022:prandtl.f90, Bug , 2D array syntax must be outside 3D...

Juan 19/09/2022:prandtl.f90, Bug , 2D array syntax must be outside 3D mnh_expand_array <-> bit_reprod PB with Nvhpc
parent 696a24e6
No related branches found
No related tags found
No related merge requests found
......@@ -759,8 +759,8 @@ ELSE ! 3D case in a 3D model
+ BR_P2( XCTV*PBLL_O_E(:,:,:)*PETHETA(:,:,:) ) &
* ZTMP2_DEVICE(:,:,:)
#endif
PRED2TH3(:,:,IKB)=PRED2TH3(:,:,IKB+KKL)
!$mnh_end_expand_array()
PRED2TH3(:,:,IKB)=PRED2TH3(:,:,IKB+KKL)
!$acc end kernels
#endif
!
......
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