fproto.h

fortran并行计算包

/* -*- Mode: C; c-basic-offset:4 ; -*- */
/*  
 *  (C) 2001 by Argonne National Laboratory.
 *      See COPYRIGHT in top-level directory.
 *
 * This file is automatically generated by buildiface 
 * DO NOT EDIT
 */
/* Prototypes for Fortran Interface Functions */

extern FORT_DLL_SPEC void FORT_CALL mpi_send_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_send_);
extern FORT_DLL_SPEC void FORT_CALL mpi_recv_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *v7, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_recv_);
extern FORT_DLL_SPEC void FORT_CALL mpi_get_count_ ( MPI_Fint *v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_get_count_);
extern FORT_DLL_SPEC void FORT_CALL mpi_bsend_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_bsend_);
extern FORT_DLL_SPEC void FORT_CALL mpi_ssend_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_ssend_);
extern FORT_DLL_SPEC void FORT_CALL mpi_rsend_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_rsend_);
extern FORT_DLL_SPEC void FORT_CALL mpi_buffer_attach_ ( void*v1, MPI_Fint *v2, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_buffer_attach_);
extern FORT_DLL_SPEC void FORT_CALL mpi_buffer_detach_ ( void*v1, MPI_Fint *v2, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_buffer_detach_);
extern FORT_DLL_SPEC void FORT_CALL mpi_isend_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *v7, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_isend_);
extern FORT_DLL_SPEC void FORT_CALL mpi_ibsend_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *v7, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_ibsend_);
extern FORT_DLL_SPEC void FORT_CALL mpi_issend_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *v7, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_issend_);
extern FORT_DLL_SPEC void FORT_CALL mpi_irsend_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *v7, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_irsend_);
extern FORT_DLL_SPEC void FORT_CALL mpi_irecv_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *v7, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_irecv_);
extern FORT_DLL_SPEC void FORT_CALL mpi_wait_ ( MPI_Fint *v1, MPI_Fint *v2, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_wait_);
extern FORT_DLL_SPEC void FORT_CALL mpi_test_ ( MPI_Fint *v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_test_);
extern FORT_DLL_SPEC void FORT_CALL mpi_request_free_ ( MPI_Fint *v1, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_request_free_);
extern FORT_DLL_SPEC void FORT_CALL mpi_waitany_ ( MPI_Fint *v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_waitany_);
extern FORT_DLL_SPEC void FORT_CALL mpi_testany_ ( MPI_Fint *v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_testany_);
extern FORT_DLL_SPEC void FORT_CALL mpi_waitall_ ( MPI_Fint *v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_waitall_);
extern FORT_DLL_SPEC void FORT_CALL mpi_testall_ ( MPI_Fint *v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_testall_);
extern FORT_DLL_SPEC void FORT_CALL mpi_waitsome_ ( MPI_Fint *v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_waitsome_);
extern FORT_DLL_SPEC void FORT_CALL mpi_testsome_ ( MPI_Fint *v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_testsome_);
extern FORT_DLL_SPEC void FORT_CALL mpi_iprobe_ ( MPI_Fint *v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_iprobe_);
extern FORT_DLL_SPEC void FORT_CALL mpi_probe_ ( MPI_Fint *v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_probe_);
extern FORT_DLL_SPEC void FORT_CALL mpi_cancel_ ( MPI_Fint *v1, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_cancel_);
extern FORT_DLL_SPEC void FORT_CALL mpi_test_cancelled_ ( MPI_Fint *v1, MPI_Fint *v2, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_test_cancelled_);
extern FORT_DLL_SPEC void FORT_CALL mpi_send_init_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *v7, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_send_init_);
extern FORT_DLL_SPEC void FORT_CALL mpi_bsend_init_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *v7, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_bsend_init_);
extern FORT_DLL_SPEC void FORT_CALL mpi_ssend_init_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *v7, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_ssend_init_);
extern FORT_DLL_SPEC void FORT_CALL mpi_rsend_init_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *v7, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_rsend_init_);
extern FORT_DLL_SPEC void FORT_CALL mpi_recv_init_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *v7, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_recv_init_);
extern FORT_DLL_SPEC void FORT_CALL mpi_start_ ( MPI_Fint *v1, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_start_);
extern FORT_DLL_SPEC void FORT_CALL mpi_startall_ ( MPI_Fint *v1, MPI_Fint *v2, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_startall_);
extern FORT_DLL_SPEC void FORT_CALL mpi_sendrecv_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, void*v6, MPI_Fint *v7, MPI_Fint *v8, MPI_Fint *v9, MPI_Fint *v10, MPI_Fint *v11, MPI_Fint *v12, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_sendrecv_);
extern FORT_DLL_SPEC void FORT_CALL mpi_sendrecv_replace_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *v7, MPI_Fint *v8, MPI_Fint *v9, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_sendrecv_replace_);
extern FORT_DLL_SPEC void FORT_CALL mpi_type_contiguous_ ( MPI_Fint *v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_type_contiguous_);
extern FORT_DLL_SPEC void FORT_CALL mpi_type_vector_ ( MPI_Fint *v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_type_vector_);
extern FORT_DLL_SPEC void FORT_CALL mpi_type_hvector_ ( MPI_Fint *v1, MPI_Fint *v2, MPI_Fint * v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_type_hvector_);
extern FORT_DLL_SPEC void FORT_CALL mpi_type_indexed_ ( MPI_Fint *v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_type_indexed_);
extern FORT_DLL_SPEC void FORT_CALL mpi_type_hindexed_ ( MPI_Fint *v1, MPI_Fint *v2, MPI_Fint * v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_type_hindexed_);
extern FORT_DLL_SPEC void FORT_CALL mpi_type_struct_ ( MPI_Fint *v1, MPI_Fint *v2, MPI_Fint * v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_type_struct_);
extern FORT_DLL_SPEC void FORT_CALL mpi_type_extent_ ( MPI_Fint *v1, MPI_Fint * v2, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_type_extent_);
extern FORT_DLL_SPEC void FORT_CALL mpi_type_size_ ( MPI_Fint *v1, MPI_Fint *v2, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_type_size_);
extern FORT_DLL_SPEC void FORT_CALL mpi_type_lb_ ( MPI_Fint *v1, MPI_Fint * v2, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_type_lb_);
extern FORT_DLL_SPEC void FORT_CALL mpi_type_ub_ ( MPI_Fint *v1, MPI_Fint * v2, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_type_ub_);
extern FORT_DLL_SPEC void FORT_CALL mpi_type_commit_ ( MPI_Fint *v1, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_type_commit_);
extern FORT_DLL_SPEC void FORT_CALL mpi_type_free_ ( MPI_Fint *v1, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_type_free_);
extern FORT_DLL_SPEC void FORT_CALL mpi_get_elements_ ( MPI_Fint *v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_get_elements_);
extern FORT_DLL_SPEC void FORT_CALL mpi_pack_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, void*v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *v7, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_pack_);
extern FORT_DLL_SPEC void FORT_CALL mpi_unpack_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, void*v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *v7, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_unpack_);
extern FORT_DLL_SPEC void FORT_CALL mpi_pack_size_ ( MPI_Fint *v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_pack_size_);
extern FORT_DLL_SPEC void FORT_CALL mpi_barrier_ ( MPI_Fint *v1, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_barrier_);
extern FORT_DLL_SPEC void FORT_CALL mpi_bcast_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_bcast_);
extern FORT_DLL_SPEC void FORT_CALL mpi_gather_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, void*v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *v7, MPI_Fint *v8, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_gather_);
extern FORT_DLL_SPEC void FORT_CALL mpi_gatherv_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, void*v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *v7, MPI_Fint *v8, MPI_Fint *v9, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_gatherv_);
extern FORT_DLL_SPEC void FORT_CALL mpi_scatter_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, void*v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *v7, MPI_Fint *v8, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_scatter_);
extern FORT_DLL_SPEC void FORT_CALL mpi_scatterv_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, void*v5, MPI_Fint *v6, MPI_Fint *v7, MPI_Fint *v8, MPI_Fint *v9, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_scatterv_);
extern FORT_DLL_SPEC void FORT_CALL mpi_allgather_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, void*v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *v7, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_allgather_);
extern FORT_DLL_SPEC void FORT_CALL mpi_allgatherv_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, void*v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *v7, MPI_Fint *v8, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_allgatherv_);
extern FORT_DLL_SPEC void FORT_CALL mpi_alltoall_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, void*v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *v7, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_alltoall_);
extern FORT_DLL_SPEC void FORT_CALL mpi_alltoallv_ ( void*v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *v4, void*v5, MPI_Fint *v6, MPI_Fint *v7, MPI_Fint *v8, MPI_Fint *v9, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_alltoallv_);
extern FORT_DLL_SPEC void FORT_CALL mpi_reduce_ ( void*v1, void*v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *v7, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_reduce_);
extern FORT_DLL_SPEC void FORT_CALL mpi_op_create_ ( MPI_User_function*v1, MPI_Fint *v2, MPI_Fint *v3, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_op_create_);
extern FORT_DLL_SPEC void FORT_CALL mpi_op_free_ ( MPI_Fint *v1, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_op_free_);
extern FORT_DLL_SPEC void FORT_CALL mpi_allreduce_ ( void*v1, void*v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_allreduce_);
extern FORT_DLL_SPEC void FORT_CALL mpi_reduce_scatter_ ( void*v1, void*v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_reduce_scatter_);
extern FORT_DLL_SPEC void FORT_CALL mpi_scan_ ( void*v1, void*v2, MPI_Fint *v3, MPI_Fint *v4, MPI_Fint *v5, MPI_Fint *v6, MPI_Fint *ierr ) FUNC_ATTRIBUTES(mpi_scan_);