/usr/include/pgapack-serial/mpif.h is in libpgapack-serial1 1.1.1-3.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 | c These are the definitions to use our fake version of MPI in mpi_stub.c
c Guaranteed only to make PGAPack compile and link without MPI, but should
c work from user fortran program.
c
c Some are from mpich's mpif.h, others are custom.
c
c Author: Brian P. Walenz
c
integer MPI_BYTE, MPI_CHARACTER, MPI_COMPLEX
integer MPI_DOUBLE_PRECISION, MPI_INTEGER, MPI_REAL
integer MPI_LOGICAL, MPI_PACKED
parameter(MPI_BYTE=0, MPI_CHARACTER=0, MPI_COMPLEX=0)
parameter(MPI_DOUBLE_PRECISION=0, MPI_INTEGER=0, MPI_REAL=0)
parameter(MPI_LOGICAL=0, MPI_PACKED=0)
integer MPI_COMM_WORLD, MPI_COMM_SELF, MPI_BOTTOM
parameter (MPI_COMM_WORLD=0, MPI_COMM_SELF=0, MPI_BOTTOM=0)
integer MPI_PROC_NULL, MPI_ANY_SOURCE, MPI_ANY_TAG
parameter(MPI_PROC_NULL=0, MPI_ANY_SOURCE=(-2), MPI_ANY_TAG=(-1))
integer MPI_SOURCE, MPI_TAG, MPI_ERROR
parameter(MPI_SOURCE=2, MPI_TAG=3, MPI_ERROR=4)
integer MPI_STATUS_SIZE
parameter (MPI_STATUS_SIZE=4)
c Functions
external MPI_Address, MPI_Bcast, MPI_Comm_dup, MPI_Comm_free
external MPI_Comm_rank, MPI_Comm_size, MPI_Finalize, MPI_Init
external MPI_Initialized, MPI_Probe, MPI_Send, MPI_Recv
external MPI_Sendrecv, MPI_Type_commit, MPI_Type_free
external MPI_Type_struct
|