/dports/net/mpich/mpich-3.4.3/test/mpi/pt2pt/ |
H A D | mprobe.c | 74 check(s1.MPI_SOURCE == 0); in main() 88 check(s2.MPI_SOURCE == 0); in main() 108 check(s1.MPI_SOURCE == 0); in main() 125 check(s2.MPI_SOURCE == 0); in main() 149 check(s1.MPI_SOURCE == 0); in main() 162 check(s2.MPI_SOURCE == 0); in main() 186 check(s1.MPI_SOURCE == 0); in main() 200 check(s2.MPI_SOURCE == 0); in main() 368 check(s1.MPI_SOURCE == 0); in main() 382 check(s2.MPI_SOURCE == 0); in main() [all …]
|
H A D | icprobe.c | 46 MPI_Recv(&buf, 1, MPI_INT, status.MPI_SOURCE, status.MPI_TAG, comm, &status); in main() 47 if (buf != status.MPI_SOURCE) { in main() 49 fprintf(stderr, "buf = %d, should be %d\n", buf, status.MPI_SOURCE); in main() 66 MPI_Recv(&buf, 1, MPI_INT, status.MPI_SOURCE, status.MPI_TAG, comm, &status); in main() 67 if (buf != status.MPI_SOURCE) { in main() 69 fprintf(stderr, "buf = %d, should be %d\n", buf, status.MPI_SOURCE); in main()
|
H A D | probe_unexp.c | 61 status.MPI_SOURCE, status.MPI_TAG, tag, msg_cnt); in main() 66 status.MPI_SOURCE, msg_size, msg_cnt); in main() 73 status.MPI_SOURCE, status.MPI_TAG, MPI_COMM_WORLD); in main() 97 if (status.MPI_SOURCE != 0 && errs++ < 10) { in main() 100 p_rank, status.MPI_SOURCE, msg_cnt); in main() 122 if (status.MPI_SOURCE != 0 && errs++ < 10) { in main() 125 p_rank, status.MPI_SOURCE, msg_cnt); in main()
|
H A D | rqstatus.c | 41 if ((status.MPI_SOURCE != MPI_ANY_SOURCE) || in main() 69 status.MPI_SOURCE = -1; in main() 77 if (status.MPI_SOURCE != source) { in main() 79 fprintf(stderr, "Source value %d should be %d\n", status.MPI_SOURCE, source); in main() 97 if (status2.MPI_SOURCE != source) { in main() 99 fprintf(stderr, "(wait)Source value %d should be %d\n", status2.MPI_SOURCE, source); in main()
|
H A D | inactivereq.c | 30 if (s->MPI_SOURCE != MPI_ANY_SOURCE) { in StatusEmpty() 56 s.MPI_SOURCE = 10; in test_recv_init() 70 s.MPI_SOURCE = 10; in test_recv_init() 106 s.MPI_SOURCE = 10; in main() 121 s.MPI_SOURCE = 10; in main() 146 s.MPI_SOURCE = 10; in main() 161 s.MPI_SOURCE = 10; in main()
|
H A D | probenull.c | 28 if (status.MPI_SOURCE != MPI_PROC_NULL) { in main() 29 printf("Status.MPI_SOURCE was %d, should be MPI_PROC_NULL\n", status.MPI_SOURCE); in main() 41 if (status.MPI_SOURCE != MPI_PROC_NULL) { in main() 42 printf("Status.MPI_SOURCE was %d, should be MPI_PROC_NULL\n", status.MPI_SOURCE); in main()
|
H A D | isendself.c | 30 if (status.MPI_SOURCE != rank || status.MPI_TAG != 0 || status.MPI_ERROR != 0 || count != 0) { in main() 32 printf("1 status = %d %d %d %d\n", status.MPI_SOURCE, status.MPI_TAG, in main() 41 if (status.MPI_SOURCE != rank || status.MPI_TAG != 0 || status.MPI_ERROR != 0 || count != 0) { in main() 43 printf("2 status = %d %d %d %d\n", status.MPI_SOURCE, status.MPI_TAG, in main()
|
H A D | bsend2.c | 35 status.MPI_SOURCE = -20; in main() 42 if (status.MPI_SOURCE != i) { in main() 44 printf("Wrong source = %d\n", status.MPI_SOURCE); in main()
|
H A D | bsend4.c | 36 status.MPI_SOURCE = -20; in main() 43 if (status.MPI_SOURCE != i) { in main() 45 printf("Wrong source = %d\n", status.MPI_SOURCE); in main()
|
H A D | bsend3.c | 39 status.MPI_SOURCE = -20; in main() 46 if (status.MPI_SOURCE != i) { in main() 48 printf("Wrong source = %d\n", status.MPI_SOURCE); in main()
|
/dports/net/mpich2/mpich2-1.5/test/mpi/pt2pt/ |
H A D | mprobe.c | 75 check(s1.MPI_SOURCE == 0); in main() 89 check(s2.MPI_SOURCE == 0); in main() 110 check(s1.MPI_SOURCE == 0); in main() 127 check(s2.MPI_SOURCE == 0); in main() 152 check(s1.MPI_SOURCE == 0); in main() 165 check(s2.MPI_SOURCE == 0); in main() 190 check(s1.MPI_SOURCE == 0); in main() 204 check(s2.MPI_SOURCE == 0); in main() 220 check(s1.MPI_SOURCE == MPI_PROC_NULL); in main() 236 check(s2.MPI_SOURCE == MPI_PROC_NULL); in main() [all …]
|
H A D | inactivereq.c | 30 if (s->MPI_SOURCE != MPI_ANY_SOURCE) { in StatusEmpty() 65 s.MPI_SOURCE = 10; in main() 81 s.MPI_SOURCE = 10; in main() 106 s.MPI_SOURCE = 10; in main() 122 s.MPI_SOURCE = 10; in main() 138 s.MPI_SOURCE = 10; in main() 154 s.MPI_SOURCE = 10; in main()
|
H A D | probe-unexp.c | 66 status.MPI_SOURCE, status.MPI_TAG, tag, msg_cnt); in main() 72 status.MPI_SOURCE, msg_size, msg_cnt); in main() 79 status.MPI_SOURCE, status.MPI_TAG, MPI_COMM_WORLD); in main() 110 if (status.MPI_SOURCE != 0 && errs++ < 10) in main() 113 p_rank, status.MPI_SOURCE, msg_cnt); in main() 138 if (status.MPI_SOURCE != 0 && errs++ < 10) in main() 141 p_rank, status.MPI_SOURCE, msg_cnt); in main()
|
H A D | rqstatus.c | 42 if ((status.MPI_SOURCE != MPI_ANY_SOURCE) || in main() 71 status.MPI_SOURCE = -1; in main() 79 if (status.MPI_SOURCE != source) { in main() 81 fprintf( stderr, "Source value %d should be %d\n", status.MPI_SOURCE, source ); in main() 100 if (status2.MPI_SOURCE != source) { in main() 102 fprintf( stderr, "(wait)Source value %d should be %d\n", status2.MPI_SOURCE, source ); in main()
|
H A D | probenull.c | 29 if (status.MPI_SOURCE != MPI_PROC_NULL) { in main() 31 status.MPI_SOURCE ); in main() 44 if (status.MPI_SOURCE != MPI_PROC_NULL) { in main() 46 status.MPI_SOURCE ); in main()
|
H A D | isendself.c | 30 if (status.MPI_SOURCE != rank || in main() 35 printf ("1 status = %d %d %d %d\n", status.MPI_SOURCE, status.MPI_TAG, in main() 45 if (status.MPI_SOURCE != rank || in main() 50 printf ("2 status = %d %d %d %d\n", status.MPI_SOURCE, status.MPI_TAG, in main()
|
H A D | bsend2.c | 35 status.MPI_SOURCE = -20; in main() 42 if (status.MPI_SOURCE != i) { in main() 44 printf( "Wrong source = %d\n", status.MPI_SOURCE ); in main()
|
/dports/net/mpich/mpich-3.4.3/test/mpi/f77/pt2pt/ |
H A D | mprobef.f | 54 if (s1(MPI_SOURCE) .ne. 0) then 89 if (s2(MPI_SOURCE) .ne. 0) then 124 if (s1(MPI_SOURCE) .ne. 0) then 165 if (s2(MPI_SOURCE) .ne. 0) then 208 if (s1(MPI_SOURCE) .ne. 0) then 239 if (s2(MPI_SOURCE) .ne. 0) then 282 if (s1(MPI_SOURCE) .ne. 0) then 319 if (s2(MPI_SOURCE) .ne. 0) then 350 if (s1(MPI_SOURCE) .ne. MPI_PROC_NULL) then 386 if (s2(MPI_SOURCE) .ne. MPI_PROC_NULL) then [all …]
|
/dports/net/mpich/mpich-3.4.3/test/mpi/f90/pt2pt/ |
H A D | mprobef90.f90 | 54 if (s1(MPI_SOURCE) .ne. 0) then 89 if (s2(MPI_SOURCE) .ne. 0) then 124 if (s1(MPI_SOURCE) .ne. 0) then 165 if (s2(MPI_SOURCE) .ne. 0) then 208 if (s1(MPI_SOURCE) .ne. 0) then 239 if (s2(MPI_SOURCE) .ne. 0) then 282 if (s1(MPI_SOURCE) .ne. 0) then 319 if (s2(MPI_SOURCE) .ne. 0) then 350 if (s1(MPI_SOURCE) .ne. MPI_PROC_NULL) then 386 if (s2(MPI_SOURCE) .ne. MPI_PROC_NULL) then [all …]
|
/dports/net/mpich/mpich-3.4.3/test/mpi/f08/pt2pt/ |
H A D | mprobef08.f90 | 52 if (s1%MPI_SOURCE .ne. 0) then 87 if (s2%MPI_SOURCE .ne. 0) then 118 if (s2%MPI_SOURCE .ne. 0) then 159 if (s2%MPI_SOURCE .ne. 0) then 198 if (s2%MPI_SOURCE .ne. 0) then 229 if (s2%MPI_SOURCE .ne. 0) then 268 if (s2%MPI_SOURCE .ne. 0) then 305 if (s2%MPI_SOURCE .ne. 0) then 332 if (s1%MPI_SOURCE .ne. MPI_PROC_NULL) then 368 if (s2%MPI_SOURCE .ne. MPI_PROC_NULL) then [all …]
|
/dports/net/mpich2/mpich2-1.5/test/mpi/f77/pt2pt/ |
H A D | mprobef.f | 52 if (s1(MPI_SOURCE) .ne. 0) then 87 if (s2(MPI_SOURCE) .ne. 0) then 122 if (s1(MPI_SOURCE) .ne. 0) then 163 if (s2(MPI_SOURCE) .ne. 0) then 206 if (s1(MPI_SOURCE) .ne. 0) then 237 if (s2(MPI_SOURCE) .ne. 0) then 280 if (s1(MPI_SOURCE) .ne. 0) then 317 if (s2(MPI_SOURCE) .ne. 0) then 348 if (s1(MPI_SOURCE) .ne. MPI_PROC_NULL) then 384 if (s2(MPI_SOURCE) .ne. MPI_PROC_NULL) then [all …]
|
/dports/net/mpich2/mpich2-1.5/test/mpi/f90/pt2pt/ |
H A D | mprobef90.f90 | 52 if (s1(MPI_SOURCE) .ne. 0) then 87 if (s2(MPI_SOURCE) .ne. 0) then 122 if (s1(MPI_SOURCE) .ne. 0) then 163 if (s2(MPI_SOURCE) .ne. 0) then 206 if (s1(MPI_SOURCE) .ne. 0) then 237 if (s2(MPI_SOURCE) .ne. 0) then 280 if (s1(MPI_SOURCE) .ne. 0) then 317 if (s2(MPI_SOURCE) .ne. 0) then 348 if (s1(MPI_SOURCE) .ne. MPI_PROC_NULL) then 384 if (s2(MPI_SOURCE) .ne. MPI_PROC_NULL) then [all …]
|
/dports/net/mpich/mpich-3.4.3/test/mpi/datatype/ |
H A D | dataalign.c | 78 if (s1[j].i != j + status.MPI_SOURCE) { in main() 80 fprintf(stderr, "Got s[%d].i = %d; expected %d\n", j, s1[j].i, j + status.MPI_SOURCE); in main() 82 if (s1[j].c != (char) ('a' + j + status.MPI_SOURCE)) { in main() 89 j, s1[j].c, j + status.MPI_SOURCE + 'a'); in main() 92 j, (int) s1[j].c, j + status.MPI_SOURCE + 'a'); in main()
|
/dports/mail/spamassassin-devel/spamassassin-1ea352210/build/pga/source/ |
H A D | mpi_stub.c | 196 status->MPI_SOURCE = source; in MPI_Probe() 211 status->MPI_SOURCE = source; in MPI_Recv() 222 status->MPI_SOURCE = source; in MPI_Sendrecv() 291 status->MPI_SOURCE = *source; in mpi_probe_() 305 status->MPI_SOURCE = *source; in mpi_recv_() 316 status->MPI_SOURCE = *source; in mpi_sendrecv_()
|
/dports/science/dakota/dakota-6.13.0-release-public.src-UI/packages/external/acro/packages/pebbl/src/comm/pebbl/ |
H A D | coTree.cpp | 115 << status->MPI_SOURCE << ", tag = " in run() 117 if (!(t->validChild(status->MPI_SOURCE))) in run() 120 " child " << status->MPI_SOURCE); in run() 158 << status->MPI_SOURCE << ", tag = " in run()
|