High-Performance Design Patterns for Modern Fortran

Abstract EN

This paper presents ideas for using coordinate-free numerics in modern Fortranto achieve code flexibility in the partial differential equation (PDE) domain.

Wealso show how Fortran, over the last few decades, has changed to become a languagewell-suited for state-of-the-art software development.

Fortran’s new coarraydistributed data structure, the language’s class mechanism, and its side-effect-free,pure procedure capability provide the scaffolding on which we implement HPCsoftware.

These features empower compilers to organize parallel computationswith efficient communication.

We present some programming patterns that supportasynchronous evaluation of expressions comprised of parallel operations ondistributed data.

We implemented these patterns using coarrays and the message passing interface (MPI).

We compared the codes’ complexity and performance.

The MPI code is much more complex and depends on external libraries.

The MPIcode on Cray hardware using the Cray compiler is 1.5–2 times faster than the coarraycode on the same hardware.

The Intel compiler implements coarrays atop Intel’s MPIlibrary with the result apparently being 2–2.5 times slower than manually codedMPI despite exhibiting nearly linear scaling efficiency.

As compilers mature andfurther improvements to coarrays comes in Fortran 2015, we expect this performancegap to narrow.