Array Arguments Example 1

Using descriptive distribution we can reconstruct original layout,

     SUBROUTINE Zubbie(x,y,z)    
!HPF$ TEMPLATE, DIMENSION(4,6)            :: T
!HPF$ PROCESSORS, DIMENSION(2,2)          :: P
      REAL, INTENT(INOUT), DIMENSION(:,:) :: x, y
      REAL, INTENT(INOUT), DIMENSION(:,:) :: z
!HPF$ ALIGN (:,:) WITH *T(:,::2)          :: x, z
!HPF$ ALIGN (:,:) WITH *T(3:,2::2)        :: y
!HPF$ DISTRIBUTE *(BLOCK,BLOCK) ONTO *P   :: T
      ...

asserts distribution of cited case but not for,

      CALL Zubbie(A(3:4,::2),B(1:2,2::2),Res)

For more information, click here