HP-MPI User's Guide (11th Edition)

Example applications

multi_par.f

Appendix A 261

integer nrow,ncol

double precision array(nrow,ncol)

do j=1,ncol

do i=1,nrow

array(i,j)=(j-1.0)*ncol+i

enddo

end

multi_par.f output

The output from running the multi_par.f executable is shown below. The

application was run with -np1.

Initializing 1000 x 1000 array...

Start computation

Computation took 4.088211059570312E-02 seconds