|
| #define | MPIUNI_INTPTR long |
| |
| #define | MPI_COMM_WORLD 1 |
| |
| #define | MPI_COMM_SELF MPI_COMM_WORLD |
| |
| #define | MPI_COMM_NULL 0 |
| |
| #define | MPI_SUCCESS 0 |
| |
| #define | MPI_IDENT 0 |
| |
| #define | MPI_CONGRUENT 1 |
| |
| #define | MPI_SIMILAR 2 |
| |
| #define | MPI_UNEQUAL 3 |
| |
| #define | MPI_ANY_SOURCE (-2) |
| |
| #define | MPI_KEYVAL_INVALID 0 |
| |
| #define | MPI_ERR_UNKNOWN 18 |
| |
| #define | MPI_ERR_INTERN 21 |
| |
| #define | MPI_ERR_OTHER 1 |
| |
| #define | MPI_TAG_UB 0 |
| |
| #define | MPI_ERRORS_RETURN 0 |
| |
| #define | MPI_UNDEFINED (-32766) |
| |
| #define | MPI_Datatype int |
| |
| #define | MPI_FLOAT sizeof(float) |
| |
| #define | MPI_DOUBLE sizeof(double) |
| |
| #define | MPI_LONG_DOUBLE sizeof(long double) |
| |
| #define | MPI_CHAR sizeof(char) |
| |
| #define | MPI_BYTE sizeof(char) |
| |
| #define | MPI_INT sizeof(int) |
| |
| #define | MPI_LONG sizeof(long) |
| |
| #define | MPI_LONG_LONG_INT sizeof(long long) |
| |
| #define | MPI_SHORT sizeof(short) |
| |
| #define | MPI_UNSIGNED_SHORT sizeof(unsigned short) |
| |
| #define | MPI_UNSIGNED sizeof(unsigned) |
| |
| #define | MPI_UNSIGNED_CHAR sizeof(unsigned char) |
| |
| #define | MPI_UNSIGNED_LONG sizeof(unsigned long) |
| |
| #define | MPI_COMPLEX 2*sizeof(float) |
| |
| #define | MPI_C_COMPLEX 2*sizeof(float) |
| |
| #define | MPI_C_DOUBLE_COMPLEX 2*sizeof(double) |
| |
| #define | MPI_FLOAT_INT (sizeof(float) + sizeof(int)) |
| |
| #define | MPI_DOUBLE_INT (sizeof(double) + sizeof(int)) |
| |
| #define | MPI_LONG_INT (sizeof(long) + sizeof(int)) |
| |
| #define | MPI_SHORT_INT (sizeof(short) + sizeof(int)) |
| |
| #define | MPI_2INT (2* sizeof(int)) |
| |
| #define | MPI_sizeof(datatype) (datatype) |
| |
| #define | MPI_REQUEST_NULL ((MPI_Request)0) |
| |
| #define | MPI_GROUP_NULL ((MPI_Group)0) |
| |
| #define | MPI_INFO_NULL ((MPI_Info)0) |
| |
| #define | MPI_BOTTOM (void *)0 |
| |
| #define | MPI_MODE_RDONLY 0 |
| |
| #define | MPI_MODE_WRONLY 0 |
| |
| #define | MPI_MODE_CREATE 0 |
| |
| #define | MPI_SUM 0 |
| |
| #define | MPI_MAX 0 |
| |
| #define | MPI_MIN 0 |
| |
| #define | MPI_ANY_TAG (-1) |
| |
| #define | MPI_DATATYPE_NULL 0 |
| |
| #define | MPI_PACKED 0 |
| |
| #define | MPI_MAX_ERROR_STRING 2056 |
| |
| #define | MPI_STATUS_IGNORE (MPI_Status *)1 |
| |
| #define | MPI_ORDER_FORTRAN 57 |
| |
| #define | MPI_IN_PLACE (void *) -1 |
| |
| #define | MPI_Abort Petsc_MPI_Abort |
| |
| #define | MPI_Attr_get Petsc_MPI_Attr_get |
| |
| #define | MPI_Keyval_free Petsc_MPI_Keyval_free |
| |
| #define | MPI_Attr_put Petsc_MPI_Attr_put |
| |
| #define | MPI_Attr_delete Petsc_MPI_Attr_delete |
| |
| #define | MPI_Keyval_create Petsc_MPI_Keyval_create |
| |
| #define | MPI_Comm_free Petsc_MPI_Comm_free |
| |
| #define | MPI_Comm_dup Petsc_MPI_Comm_dup |
| |
| #define | MPI_Comm_create Petsc_MPI_Comm_create |
| |
| #define | MPI_Init Petsc_MPI_Init |
| |
| #define | MPI_Finalize Petsc_MPI_Finalize |
| |
| #define | MPI_Initialized Petsc_MPI_Initialized |
| |
| #define | MPI_Finalized Petsc_MPI_Finalized |
| |
| #define | MPI_Comm_size Petsc_MPI_Comm_size |
| |
| #define | MPI_Comm_rank Petsc_MPI_Comm_rank |
| |
| #define | MPI_Aint MPIUNI_INTPTR |
| |
| #define | MPI_Comm_f2c(comm) (MPI_Comm)(comm) |
| |
| #define | MPI_Comm_c2f(comm) (MPI_Fint)(comm) |
| |
| #define | MPI_Send(buf, count, datatype, dest, tag, comm) |
| |
| #define | MPI_Recv(buf, count, datatype, source, tag, comm, status) |
| |
| #define | MPI_Get_count(status, datatype, count) |
| |
| #define | MPI_Bsend(buf, count, datatype, dest, tag, comm) |
| |
| #define | MPI_Ssend(buf, count, datatype, dest, tag, comm) |
| |
| #define | MPI_Rsend(buf, count, datatype, dest, tag, comm) |
| |
| #define | MPI_Buffer_attach(buffer, size) |
| |
| #define | MPI_Buffer_detach(buffer, size) |
| |
| #define | MPI_Ibsend(buf, count, datatype, dest, tag, comm, request) |
| |
| #define | MPI_Issend(buf, count, datatype, dest, tag, comm, request) |
| |
| #define | MPI_Irsend(buf, count, datatype, dest, tag, comm, request) |
| |
| #define | MPI_Irecv(buf, count, datatype, source, tag, comm, request) |
| |
| #define | MPI_Isend(buf, count, datatype, dest, tag, comm, request) |
| |
| #define | MPI_Wait(request, status) |
| |
| #define | MPI_Test(request, flag, status) |
| |
| #define | MPI_Request_free(request) |
| |
| #define | MPI_Waitany(a, b, c, d) |
| |
| #define | MPI_Testany(a, b, c, d, e) |
| |
| #define | MPI_Waitall(count, array_of_requests, array_of_statuses) |
| |
| #define | MPI_Testall(count, array_of_requests, flag, array_of_statuses) |
| |
| #define | MPI_Waitsome(incount, array_of_requests, outcount, array_of_indices, array_of_statuses) |
| |
| #define | MPI_Comm_group(comm, group) |
| |
| #define | MPI_Group_incl(group, n, ranks, newgroup) |
| |
| #define | MPI_Testsome(incount, array_of_requests, outcount, array_of_indices, array_of_statuses) MPI_SUCCESS |
| |
| #define | MPI_Iprobe(source, tag, comm, flag, status) (*(flag)=0, MPI_SUCCESS) |
| |
| #define | MPI_Probe(source, tag, comm, status) MPI_SUCCESS |
| |
| #define | MPI_Cancel(request) (MPIUNI_TMP = (void*)(MPIUNI_INTPTR) (request),MPI_SUCCESS) |
| |
| #define | MPI_Test_cancelled(status, flag) (*(flag)=0,MPI_SUCCESS) |
| |
| #define | MPI_Send_init(buf, count, datatype, dest, tag, comm, request) |
| |
| #define | MPI_Bsend_init(buf, count, datatype, dest, tag, comm, request) |
| |
| #define | MPI_Ssend_init(buf, count, datatype, dest, tag, comm, request) |
| |
| #define | MPI_Bsend_init(buf, count, datatype, dest, tag, comm, request) |
| |
| #define | MPI_Rsend_init(buf, count, datatype, dest, tag, comm, request) |
| |
| #define | MPI_Recv_init(buf, count, datatype, source, tag, comm, request) |
| |
| #define | MPI_Start(request) (MPIUNI_TMP = (void*)(MPIUNI_INTPTR) (request),MPI_SUCCESS) |
| |
| #define | MPI_Startall(count, array_of_requests) |
| |
| #define | MPI_Op_create(function, commute, op) |
| |
| #define | MPI_Op_free(op) |
| |
| #define | MPI_Sendrecv(sendbuf, sendcount, sendtype, dest, sendtag, recvbuf, recvcount, recvtype, source, recvtag, comm, status) MPIUNI_Memcpy(recvbuf,sendbuf,(sendcount) * MPI_sizeof(sendtype)) |
| |
| #define | MPI_Sendrecv_replace(buf, count, datatype, dest, sendtag, source, recvtag, comm, status) MPI_SUCCESS |
| |
| #define | MPI_Type_contiguous(count, oldtype, newtype) (*(newtype) = (count)*(oldtype),MPI_SUCCESS) |
| |
| #define | MPI_Type_vector(count, blocklength, stride, oldtype, newtype) MPI_SUCCESS |
| |
| #define | MPI_Type_hvector(count, blocklength, stride, oldtype, newtype) MPI_SUCCESS |
| |
| #define | MPI_Type_indexed(count, array_of_blocklengths, array_of_displacements, oldtype, newtype) MPI_SUCCESS |
| |
| #define | MPI_Type_hindexed(count, array_of_blocklengths, array_of_displacements, oldtype, newtype) MPI_SUCCESS |
| |
| #define | MPI_Type_struct(count, array_of_blocklengths, array_of_displacements, array_of_types, newtype) MPI_SUCCESS |
| |
| #define | MPI_Address(location, address) (*(address) = (MPIUNI_INTPTR)(char *)(location),MPI_SUCCESS) |
| |
| #define | MPI_Type_extent(datatype, extent) *(extent) = datatype |
| |
| #define | MPI_Type_size(datatype, size) *(size) = datatype |
| |
| #define | MPI_Type_lb(datatype, displacement) MPI_Abort(MPI_COMM_WORLD,0) |
| |
| #define | MPI_Type_ub(datatype, displacement) MPI_Abort(MPI_COMM_WORLD,0) |
| |
| #define | MPI_Type_commit(datatype) |
| |
| #define | MPI_Type_free(datatype) MPI_SUCCESS |
| |
| #define | MPI_Get_elements(status, datatype, count) MPI_Abort(MPI_COMM_WORLD,0) |
| |
| #define | MPI_Pack(inbuf, incount, datatype, outbuf, outsize, position, comm) MPI_Abort(MPI_COMM_WORLD,0) |
| |
| #define | MPI_Unpack(inbuf, insize, position, outbuf, outcount, datatype, comm) MPI_Abort(MPI_COMM_WORLD,0) |
| |
| #define | MPI_Pack_size(incount, datatype, comm, size) MPI_Abort(MPI_COMM_WORLD,0) |
| |
| #define | MPI_Barrier(comm) |
| |
| #define | MPI_Bcast(buffer, count, datatype, root, comm) |
| |
| #define | MPI_Gather(sendbuf, sendcount, sendtype, recvbuf, recvcount, recvtype, root, comm) |
| |
| #define | MPI_Gatherv(sendbuf, sendcount, sendtype, recvbuf, recvcounts, displs, recvtype, root, comm) |
| |
| #define | MPI_Scatter(sendbuf, sendcount, sendtype, recvbuf, recvcount, recvtype, root, comm) |
| |
| #define | MPI_Scatterv(sendbuf, sendcounts, displs, sendtype, recvbuf, recvcount, recvtype, root, comm) |
| |
| #define | MPI_Allgather(sendbuf, sendcount, sendtype, recvbuf, recvcount, recvtype, comm) |
| |
| #define | MPI_Allgatherv(sendbuf, sendcount, sendtype, recvbuf, recvcounts, displs, recvtype, comm) |
| |
| #define | MPI_Alltoall(sendbuf, sendcount, sendtype, recvbuf, recvcount, recvtype, comm) |
| |
| #define | MPI_Alltoallv(sendbuf, sendcounts, sdispls, sendtype, recvbuf, recvcounts, rdispls, recvtype, comm) MPI_Abort(MPI_COMM_WORLD,0) |
| |
| #define | MPI_Alltoallw(sendbuf, sendcounts, sdispls, sendtypes, recvbuf, recvcounts, rdispls, recvtypes, comm) MPI_Abort(MPI_COMM_WORLD,0) |
| |
| #define | MPI_Reduce(sendbuf, recvbuf, count, datatype, op, root, comm) |
| |
| #define | MPI_Allreduce(sendbuf, recvbuf, count, datatype, op, comm) |
| |
| #define | MPI_Scan(sendbuf, recvbuf, count, datatype, op, comm) |
| |
| #define | MPI_Exscan(sendbuf, recvbuf, count, datatype, op, comm) MPI_SUCCESS |
| |
| #define | MPI_Reduce_scatter(sendbuf, recvbuf, recvcounts, datatype, op, comm) MPI_Abort(MPI_COMM_WORLD,0) |
| |
| #define | MPI_Group_size(group, size) (*(size)=1,MPI_SUCCESS) |
| |
| #define | MPI_Group_rank(group, rank) (*(rank)=0,MPI_SUCCESS) |
| |
| #define | MPI_Group_translate_ranks |
| |
| #define | MPI_Group_compare(group1, group2, result) (*(result)=1,MPI_SUCCESS) |
| |
| #define | MPI_Group_union(group1, group2, newgroup) MPI_SUCCESS |
| |
| #define | MPI_Group_intersection(group1, group2, newgroup) MPI_SUCCESS |
| |
| #define | MPI_Group_difference(group1, group2, newgroup) MPI_SUCCESS |
| |
| #define | MPI_Group_excl(group, n, ranks, newgroup) MPI_SUCCESS |
| |
| #define | MPI_Group_range_incl(group, n, ranges, newgroup) MPI_SUCCESS |
| |
| #define | MPI_Group_range_excl(group, n, ranges, newgroup) MPI_SUCCESS |
| |
| #define | MPI_Group_free(group) |
| |
| #define | MPI_Comm_compare(comm1, comm2, result) |
| |
| #define | MPI_Comm_split(comm, color, key, newcomm) MPI_Comm_dup(comm,newcomm) |
| |
| #define | MPI_Comm_test_inter(comm, flag) (*(flag)=1,MPI_SUCCESS) |
| |
| #define | MPI_Comm_remote_size(comm, size) (*(size)=1,MPI_SUCCESS) |
| |
| #define | MPI_Comm_remote_group(comm, group) MPI_SUCCESS |
| |
| #define | MPI_Intercomm_create(local_comm, local_leader, peer_comm, remote_leader, tag, newintercomm) MPI_SUCCESS |
| |
| #define | MPI_Intercomm_merge(intercomm, high, newintracomm) MPI_SUCCESS |
| |
| #define | MPI_Topo_test(comm, status) MPI_SUCCESS |
| |
| #define | MPI_Cart_create(comm_old, ndims, dims, periods, reorder, comm_cart) MPI_SUCCESS |
| |
| #define | MPI_Dims_create(nnodes, ndims, dims) MPI_Abort(MPI_COMM_WORLD,0) |
| |
| #define | MPI_Graph_create(comm, a, b, c, d, e) MPI_SUCCESS |
| |
| #define | MPI_Graphdims_Get(comm, nnodes, nedges) MPI_Abort(MPI_COMM_WORLD,0) |
| |
| #define | MPI_Graph_get(comm, a, b, c, d) MPI_Abort(MPI_COMM_WORLD,0) |
| |
| #define | MPI_Cartdim_get(comm, ndims) MPI_Abort(MPI_COMM_WORLD,0) |
| |
| #define | MPI_Cart_get(comm, maxdims, dims, periods, coords) MPI_Abort(MPI_COMM_WORLD,0) |
| |
| #define | MPI_Cart_rank(comm, coords, rank) MPI_Abort(MPI_COMM_WORLD,0) |
| |
| #define | MPI_Cart_coords(comm, rank, maxdims, coords) MPI_Abort(MPI_COMM_WORLD,0) |
| |
| #define | MPI_Graph_neighbors_count(comm, rank, nneighbors) MPI_Abort(MPI_COMM_WORLD,0) |
| |
| #define | MPI_Graph_neighbors(comm, rank, maxneighbors, neighbors) MPI_Abort(MPI_COMM_WORLD,0) |
| |
| #define | MPI_Cart_shift(comm, direction, disp, rank_source, rank_dest) MPI_Abort(MPI_COMM_WORLD,0) |
| |
| #define | MPI_Cart_sub(comm, remain_dims, newcomm) MPI_Abort(MPI_COMM_WORLD,0) |
| |
| #define | MPI_Cart_map(comm, ndims, dims, periods, newrank) MPI_Abort(MPI_COMM_WORLD,0) |
| |
| #define | MPI_Graph_map(comm, a, b, c, d) MPI_Abort(MPI_COMM_WORLD,0) |
| |
| #define | MPI_Get_processor_name(name, result_len) (MPIUNI_Memcpy(name,"localhost",9*sizeof(char)),name[10] = 0,*(result_len) = 10) |
| |
| #define | MPI_Errhandler_create(function, errhandler) (*(errhandler) = (MPI_Errhandler) 0, MPI_SUCCESS) |
| |
| #define | MPI_Errhandler_set(comm, errhandler) |
| |
| #define | MPI_Errhandler_get(comm, errhandler) MPI_SUCCESS |
| |
| #define | MPI_Errhandler_free(errhandler) MPI_SUCCESS |
| |
| #define | MPI_Error_string(errorcode, string, result_len) MPI_SUCCESS |
| |
| #define | MPI_Error_class(errorcode, errorclass) MPI_SUCCESS |
| |
| #define | MPI_Wtick() 1.0 |
| |
| #define | MPI_Wtime() 0.0 |
| |
| #define | MPI_Pcontrol(level) MPI_SUCCESS |
| |
| #define | MPI_NULL_COPY_FN 0 |
| |
| #define | MPI_NULL_DELETE_FN 0 |
| |
| #define | MPI_File_open(comm, filename, amode, info, mpi_fh) |
| |
| #define | MPI_File_close(mpi_fh) |
| |
| #define | MPI_File_set_view(mpi_fh, disp, etype, filetype, datarep, info) |
| |
| #define | MPI_Type_get_extent(datatype, lb, extent) |
| |
| #define | MPI_File_write_all(mpi_fh, buf, count, datatype, status) |
| |
| #define | MPI_File_read_all(mpi_fh, buf, count, datatype, status) |
| |
| #define | MPI_Register_datarep(name, read_conv_fn, write_conv_fn, extent_fn, state) |
| |
| #define | MPI_Type_create_subarray(ndims, array_of_sizes, array_of_subsizes, array_of_starts, order, oldtype, newtype) |
| |