1 module mpiuni 2#include <petsc/mpiuni/mpif.h> 3 integer MPI_IN_PLACE 4#if defined(_WIN32) && defined(PETSC_USE_SHARED_LIBRARIES) 5!DEC$ ATTRIBUTES DLLEXPORT::MPI_IN_PLACE 6#endif 7 end module 8