MPI to Coarray Fortran: Experiences with a CFD Solver for Unstructured Meshes

Listing 9

Derived data type of iexboundhir and iexboundhis variables in the code.

type exchange_boundhi

 integer  :: procid, fast

 integer  :: howmany

 real, allocatable, dimension(:,:,:,:)  :: facesol, quadp,

   vert

 real, allocatable, dimension(:,:,:)  :: wquad, angles

 real, allocatable, dimension(:,:)  :: triap, normals

 real, allocatable, dimension(:,:,:,:)  :: facesolv

end type exchange_boundhi