Without using INHERIT, this is very complex. Consider
REAL, DIMENSION(4,6) :: A, B
REAL, DIMENSION(2,3) :: Res
!HPF$ PROCESSORS, DIMENSION(2,2) :: P
!HPF$ ALIGN B(:,:) WITH A(:,:)
!HPF$ ALIGN Res(:,:) WITH A(::2,::2)
!HPF$ DISTRIBUTE (BLOCK,BLOCK) ONTO P :: A, B, Res
...
CALL Zubbie(A(1:2,1::2),B(3:4,2::2),Res)
For descriptive distributions what should interface look like?
For more information, click here