! -*- f90 -*- ! ! Copyright (c) 2004-2005 The Trustees of Indiana University and Indiana ! University Research and Technology ! Corporation. All rights reserved. ! Copyright (c) 2004-2005 The University of Tennessee and The University ! of Tennessee Research Foundation. All rights ! reserved. ! Copyright (c) 2004-2005 High Performance Computing Center Stuttgart, ! University of Stuttgart. All rights reserved. ! Copyright (c) 2004-2005 The Regents of the University of California. ! All rights reserved. ! Copyright (c) 2006-2012 Cisco Systems, Inc. All rights reserved. ! Copyright (c) 2009-2012 Los Alamos National Security, LLC. ! All rights reserved. ! $COPYRIGHT$ ! ! Additional copyrights may follow ! ! $HEADER$ ! #include "ompi/mpi/fortran/configure-fortran-output.h" module mpi_f08 use mpi_f08_types use mpi_f08_interfaces ! this module contains the mpi_f08 interface declarations use pmpi_f08_interfaces ! this module contains the pmpi_f08 interface declarations use mpi_f08_sizeof ! this module from sizeof.F90 ! ! Declaration of the interfaces to the ompi impl files ! e.g., send_f.c ! #include "mpi-f-interfaces-bind.h" #include "pmpi-f-interfaces-bind.h" ! The MPI attribute callback functions need to be explictly called out ! so that they don't end up in the MPI namespace. See a longer ! explanation in attr_fn-f90-interfaces.h. ! ! include "ompi/mpi/fortran/use-mpi/attr_fn-f90-interfaces.h" ! Similarly, we need the MPI_CONVERSION_FN_NULL function ! ! include "ompi/mpi/fortran/use-mpi/conversion_fn_null-f90-interface.h" end module mpi_f08