36 строки
1.2 KiB
Fortran
36 строки
1.2 KiB
Fortran
!
|
|
! 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 Cisco Systems, Inc. All rights reserved.
|
|
! $COPYRIGHT$
|
|
!
|
|
! Additional copyrights may follow
|
|
!
|
|
! $HEADER$
|
|
!
|
|
|
|
module mpi
|
|
|
|
include "mpif.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 "attr_fn-f90-interfaces.h"
|
|
|
|
! This file is generated, and is *huge*. Its size is directly related
|
|
! to the --with-f90-max-array-dim configure parameter.
|
|
|
|
include "mpi-f90-interfaces.h"
|
|
|
|
end module mpi
|