Elastodynamics on clustered vector multiprocessors

We present the parallelization of an elastodynamic code on a firmly coupled configuration consisting of two IBM 3090-600 VF, a total of 12 processors, joined with a connection facility. The programming environment used is Clustered FORTRAN which is a facility for writing and executing parallel programs on two coupled IBM 3090 vector multiprocessors (VMP). Clustered FORTRAN provides extensions to FORTRAN so that a single application program can execute across multiple 3090 systems as well as across the processors of a single 3090 system. To exploit parallelism on each VMP, we used the parallel DO LOOP construct and to exploit parallelism across VMP we used the SCHEDULE statement allowing concurrent execution of subprograms. It is shown that such a problem, characterized by sufficiently large amounts of arithmetic operations within the parallel tasks, can be efficiently parallelized obtaining average speed-ups of more than five on one 3090-600 VF and nearly ten on a two 3090-600 VF cluster with a small programming effort.