Jeff Hammond

it is no longer relevant to me.

BLAS_SIZE=4 requires a Perl script transformation of every source file that contains a BLAS call. It takes forever. Use BLAS_SIZE=8 and a compatible library to compile faster.

`MPI_Error_string` is fixed

``` ! The constants that cannot be used in initialization expressions or assignments in Fortran are as follows: ! Buffer address sentinels integer :: MPI_BOTTOM = 0 integer :: MPI_IN_PLACE...

``` ! thread levels integer, parameter :: MPI_THREAD_SINGLE = 0 integer, parameter :: MPI_THREAD_FUNNELED = 1 integer, parameter :: MPI_THREAD_SERIALIZED = 2 integer, parameter :: MPI_THREAD_MULTIPLE = 3 ! comparisons...

``` ! useful handles type(MPI_Comm), parameter :: MPI_COMM_WORLD = MPI_Comm(MPI_VAL = -1000000) type(MPI_Comm), parameter :: MPI_COMM_SELF = MPI_Comm(MPI_VAL = -1) ``` DONE

``` ! NULL handles type(MPI_Comm), parameter :: MPI_COMM_NULL = MPI_Comm(MPI_VAL = -911) type(MPI_Datatype), parameter :: MPI_DATATYPE_NULL = MPI_Datatype(MPI_VAL = -911) type(MPI_File), parameter :: MPI_FILE_NULL = MPI_File(MPI_VAL = -911) type(MPI_Group), parameter...

``` ! IGNORE sentinels type(MPI_Status) :: MPI_STATUS_IGNORE type(MPI_Status) :: MPI_STATUSES_IGNORE ```

``` ! use a ridiculously large value that will always be larger than ! what any implementation uses, to avoid having to query the ! underlying implementation integer, parameter ::...

```f ! built-in ops type(MPI_Op), parameter :: MPI_MAX = MPI_Op(MPI_VAL = -10001) type(MPI_Op), parameter :: MPI_MIN = MPI_Op(MPI_VAL = -10002) type(MPI_Op), parameter :: MPI_SUM = MPI_Op(MPI_VAL = -10003) type(MPI_Op), parameter...