/dports/cad/scotch/scotch-6.0.4/src/libscotch/ |
H A D | bdgraph_check.c | 180 return ((int) reduglbtab[20]); in bdgraphCheck() 183 if ((reduglbtab[1] != - reduglbtab[0]) || in bdgraphCheck() 184 (reduglbtab[3] != - reduglbtab[2]) || in bdgraphCheck() 185 (reduglbtab[5] != - reduglbtab[4]) || in bdgraphCheck() 186 (reduglbtab[7] != - reduglbtab[6]) || in bdgraphCheck() 187 (reduglbtab[9] != - reduglbtab[8]) || in bdgraphCheck() 188 (reduglbtab[11] != - reduglbtab[10]) || in bdgraphCheck() 189 (reduglbtab[13] != - reduglbtab[12]) || in bdgraphCheck() 190 (reduglbtab[15] != - reduglbtab[14]) || in bdgraphCheck() 191 (reduglbtab[17] != - reduglbtab[16]) || in bdgraphCheck() [all …]
|
H A D | vdgraph_check.c | 85 Gnum reduglbtab[11]; in vdgraphCheck() local 181 if ((reduglbtab[1] != - reduglbtab[0]) || in vdgraphCheck() 182 (reduglbtab[3] != - reduglbtab[2]) || in vdgraphCheck() 183 (reduglbtab[5] != - reduglbtab[4]) || in vdgraphCheck() 184 (reduglbtab[7] != - reduglbtab[6]) || in vdgraphCheck() 185 (reduglbtab[9] != - reduglbtab[8])) { in vdgraphCheck() 253 if ((grafptr->compglbload[0] != reduglbtab[0]) || in vdgraphCheck() 254 (grafptr->compglbload[1] != reduglbtab[1]) || in vdgraphCheck() 255 (grafptr->compglbload[2] != reduglbtab[2])) { in vdgraphCheck() 259 if ((grafptr->compglbsize[0] != reduglbtab[3]) || in vdgraphCheck() [all …]
|
H A D | dgraph_io_load.c | 130 if ((reduglbtab[0] != - reduglbtab[1])) { in dgraphLoad() 134 if ((reduglbtab[2] != - reduglbtab[3])) { in dgraphLoad() 139 (reduglbtab[4] != - reduglbtab[5])) { in dgraphLoad() 233 if (reduglbtab[0] != 0) in dgraphLoadCent() 709 reduglbtab[0] = 2; in dgraphLoadDist() 714 if ((reduglbtab[2] != - reduglbtab[1]) || in dgraphLoadDist() 715 (reduglbtab[4] != - reduglbtab[3]) || in dgraphLoadDist() 716 (reduglbtab[6] != - reduglbtab[5]) || in dgraphLoadDist() 717 (reduglbtab[8] != - reduglbtab[7])) { in dgraphLoadDist() 729 if ((reduglbtab[10] != reduglbtab[3]) || in dgraphLoadDist() [all …]
|
H A D | dgraph_build.c | 317 if (reduglbtab[16] != 0) { in dgraphBuild3() 321 if ((reduglbtab[1] != - reduglbtab[0]) || in dgraphBuild3() 322 (reduglbtab[3] != - reduglbtab[2]) || in dgraphBuild3() 323 (reduglbtab[5] != - reduglbtab[4]) || in dgraphBuild3() 324 (reduglbtab[7] != - reduglbtab[6]) || in dgraphBuild3() 325 (reduglbtab[9] != - reduglbtab[8]) || in dgraphBuild3() 326 (reduglbtab[11] != - reduglbtab[10])) { in dgraphBuild3() 488 Gnum reduglbtab[7]; in dgraphBuild4() local 509 grafptr->vertglbnbr = reduglbtab[4]; in dgraphBuild4() 510 grafptr->veloglbsum = reduglbtab[5]; in dgraphBuild4() [all …]
|
H A D | dgraph_check.c | 254 if (reduglbtab[19] != 0) in dgraphCheck() 256 if ((reduglbtab[ 1] != - reduglbtab[ 0]) || /* Check if global graph data match */ in dgraphCheck() 257 (reduglbtab[ 3] != - reduglbtab[ 2]) || in dgraphCheck() 258 (reduglbtab[ 5] != - reduglbtab[ 4]) || in dgraphCheck() 261 (reduglbtab[10] != - reduglbtab[ 9]) || in dgraphCheck() 262 (reduglbtab[12] != - reduglbtab[11]) || in dgraphCheck() 281 if (reduglbtab[6] != 0) in dgraphCheck() 283 if (((reduglbtab[0] != 0) && (reduglbtab[0] != procglbnbr)) || in dgraphCheck() 284 ((reduglbtab[1] != 0) && (reduglbtab[1] != procglbnbr)) || in dgraphCheck() 285 ((reduglbtab[2] != 0) && (reduglbtab[2] != procglbnbr)) || in dgraphCheck() [all …]
|
H A D | dmapping_io.c | 113 if (reduglbtab[3] != 1) { in dmapSave() 117 if ((reduglbtab[5] != 0) && (reduglbtab[5] != grafptr->procglbnbr)) { in dmapSave() 121 if ((reduglbtab[1] < 0) && (reduglbtab[1] > grafptr->procglbnbr)) { in dmapSave() 126 vertglbnbr = reduglbtab[1]; in dmapSave() 127 fragglbnbr = reduglbtab[2]; in dmapSave() 156 reduglbtab[0] = 1; in dmapSave() 159 reduglbtab[0] = reduloctab[0]; in dmapSave() 161 if (reduglbtab[0] != 0) { in dmapSave() 288 reduglbtab[0] = 1; in dmapSave() 291 reduglbtab[0] = reduloctab[0]; in dmapSave() [all …]
|
H A D | dgraph_scatter.c | 153 Gnum reduglbtab[9]; in dgraphScatter() local 205 if (reduglbtab[0] != 1) { in dgraphScatter() 210 baseval = reduglbtab[2]; in dgraphScatter() 212 velolocnbr = (reduglbtab[6] != 0) ? vertlocnbr : 0; in dgraphScatter() 213 vlbllocnbr = (reduglbtab[7] != 0) ? vertlocnbr : 0; in dgraphScatter() 224 veloloctax = (reduglbtab[6] != 0) ? (veloloctax - baseval) : NULL; in dgraphScatter() 227 protnum = (int) reduglbtab[1]; in dgraphScatter() 308 edlolocnbr = (reduglbtab[8] != 0) ? edgelocnbr : 0; in dgraphScatter() 322 edloloctax = (reduglbtab[8] != 0) ? edloloctax - baseval : NULL; in dgraphScatter() 338 if (reduglbtab[8] != 0) { in dgraphScatter() [all …]
|
H A D | dorder_tree_dist.c | 130 Gnum reduglbtab[3]; in dorderTreeDist() local 182 reduglbtab[0] = /* Post-process error below */ in dorderTreeDist() 184 reduglbtab[2] = 1; in dorderTreeDist() 187 reduglbtab[0] = reduloctab[0]; in dorderTreeDist() 188 reduglbtab[1] = procglbnbr - 1 + reduloctab[1]; in dorderTreeDist() 189 reduglbtab[2] = procglbnbr - 1 + reduloctab[2]; in dorderTreeDist() 192 …if (reduglbtab[1] != reduglbtab[2]) { /* If not both arrays provided on each of the cand… in dorderTreeDist() 195 reduglbtab[0] = 1; in dorderTreeDist() 197 if (reduglbtab[2] != procglbnbr) { in dorderTreeDist() 199 reduglbtab[0] = 1; in dorderTreeDist() [all …]
|
H A D | library_dgraph_gather.c | 82 Gnum reduglbtab[3]; in SCOTCH_dgraphGather() local 114 …if (MPI_Allreduce (reduloctab, reduglbtab, 3, GNUM_MPI, MPI_SUM, srcdgrfptr->proccomm) != MPI_SUCC… in SCOTCH_dgraphGather() 118 if (reduglbtab[0] == 1) /* If only one single root */ in SCOTCH_dgraphGather() 119 return (dgraphGatherAll2 (srcdgrfptr, (Graph *) cgrfptr, reduglbtab[2], (int) reduglbtab[1])); in SCOTCH_dgraphGather() 120 else if (reduglbtab[0] == srcdgrfptr->procglbnbr) /* If all processes are roots */ in SCOTCH_dgraphGather() 121 return (dgraphGatherAll2 (srcdgrfptr, (Graph *) cgrfptr, reduglbtab[2], -1)); in SCOTCH_dgraphGather()
|
H A D | bdgraph_bipart_bd.c | 125 Gnum reduglbtab[7]; in bdgraphBipartBd() local 177 if (reduglbtab[0] != 0) { in bdgraphBipartBd() 182 (reduglbtab[2] == 0)) { in bdgraphBipartBd() 187 bndvertglbancadj = reduglbtab[4]; in bdgraphBipartBd() 197 bndgrafdat.compglbsize0 = reduglbtab[3]; in bdgraphBipartBd() 246 …if (((reduglbtab[0] + reduglbtab[1]) != orggrafptr->s.procglbnbr) || /* If not all anchors… in bdgraphBipartBd() 247 ((reduglbtab[0] != 0) && (reduglbtab[0] != orggrafptr->s.procglbnbr)) || in bdgraphBipartBd() 248 (reduglbtab[3] != 0)) { in bdgraphBipartBd() 438 orggrafptr->fronglbnbr = reduglbtab[3]; in bdgraphBipartBd() 439 orggrafptr->commglbload = (reduglbtab[0] / 2) * orggrafptr->domndist + reduglbtab[1]; in bdgraphBipartBd() [all …]
|
H A D | dgraph_build_hcub.c | 102 Gnum reduglbtab[7]; in dgraphBuildHcub() local 140 …if (MPI_Allreduce (reduloctab, reduglbtab, 7, GNUM_MPI, MPI_MAX, grafptr->proccomm) != MPI_SUCCESS… in dgraphBuildHcub() 144 if (reduglbtab[6] != 0) { in dgraphBuildHcub() 152 if ((reduglbtab[1] != - reduglbtab[0]) || in dgraphBuildHcub() 153 (reduglbtab[3] != - reduglbtab[2]) || in dgraphBuildHcub() 154 (reduglbtab[5] != - reduglbtab[4])) { in dgraphBuildHcub()
|
H A D | dgraph_band_grow.c | 113 Gnum reduglbtab[3]; in DGRAPHBANDGROWNAMECOLL() local 139 reduglbtab[0] = 1; in DGRAPHBANDGROWNAMECOLL() 142 reduloctab[0] = reduglbtab[0]; in DGRAPHBANDGROWNAMECOLL() 149 if (reduglbtab[1] != - reduglbtab[2]) { in DGRAPHBANDGROWNAMECOLL() 151 reduglbtab[0] = 1; in DGRAPHBANDGROWNAMECOLL() 154 if (reduglbtab[0] != 0) { in DGRAPHBANDGROWNAMECOLL() 378 reduglbtab[0] = 1; in DGRAPHBANDGROWNAMEPTOP() 381 reduloctab[0] = reduglbtab[0]; in DGRAPHBANDGROWNAMEPTOP() 388 if (reduglbtab[1] != - reduglbtab[2]) { in DGRAPHBANDGROWNAMEPTOP() 390 reduglbtab[0] = 1; in DGRAPHBANDGROWNAMEPTOP() [all …]
|
H A D | vdgraph_separate_bd.c | 98 Gnum reduglbtab[3]; in vdgraphSeparateBd() local 126 …if (MPI_Allreduce (&reduloctab[0], &reduglbtab[0], 3, GNUM_MPI, MPI_SUM, grafptr->s.proccomm) != M… in vdgraphSeparateBd() 130 bandvertglbancadj = reduglbtab[2]; in vdgraphSeparateBd() 138 bandgrafdat.compglbsize[0] = reduglbtab[0]; in vdgraphSeparateBd() 139 bandgrafdat.compglbsize[1] = reduglbtab[1]; in vdgraphSeparateBd() 162 …if (MPI_Allreduce (&reduloctab[0], &reduglbtab[0], 3, GNUM_MPI, MPI_SUM, grafptr->s.proccomm) != M… in vdgraphSeparateBd() 166 if (reduglbtab[0] != 0) { /* If at least one anchor changed of part */ in vdgraphSeparateBd() 175 grafptr->compglbsize[0] = reduglbtab[1]; in vdgraphSeparateBd() 176 grafptr->compglbsize[1] = reduglbtab[2]; in vdgraphSeparateBd()
|
H A D | dorder_io_tree.c | 85 int reduglbtab[3]; in dorderSaveTree2() local 98 …if (MPI_Allreduce (reduloctab, reduglbtab, 3, MPI_INT, MPI_SUM, ordeptr->proccomm) != MPI_SUCCESS)… in dorderSaveTree2() 102 if (reduglbtab[0] != 1) { in dorderSaveTree2() 107 if ((reduglbtab[2] != 0) && (reduglbtab[2] != procglbnbr)) { in dorderSaveTree2() 111 protnum = (int) reduglbtab[1]; /* Get rank of root process */ in dorderSaveTree2() 115 if (reduglbtab[2] != 0) { in dorderSaveTree2()
|
H A D | bdgraph_bipart_df.c | 100 Gnum reduglbtab[6]; in bdgraphBipartDf() local 138 …if (MPI_Allreduce (reduloctab, reduglbtab, 4, GNUM_MPI, MPI_SUM, grafptr->s.proccomm) != MPI_SUCCE… in bdgraphBipartDf() 143 if (reduglbtab[0] < 0) { in bdgraphBipartDf() 149 (reduglbtab[1] == 0)) { in bdgraphBipartDf() 202 ielsloctax[vanclocnnd] = 1.0F / (float) reduglbtab[0]; in bdgraphBipartDf() 203 ielsloctax[vanclocnnd + 1] = 1.0F / (float) reduglbtab[1]; in bdgraphBipartDf() 383 grafptr->fronglbnbr = reduglbtab[0]; in bdgraphBipartDf() 384 grafptr->compglbload0 = reduglbtab[1]; in bdgraphBipartDf() 386 grafptr->compglbsize0 = reduglbtab[2]; in bdgraphBipartDf() 387 grafptr->commglbload = (reduglbtab[3] / 2) * grafptr->domndist + reduglbtab[4]; in bdgraphBipartDf() [all …]
|
H A D | dgraph_gather.c | 90 Gnum reduglbtab[3]; in dgraphGather() local 119 …if (MPI_Allreduce (reduloctab, reduglbtab, 3, GNUM_MPI, MPI_SUM, dgrfptr->proccomm) != MPI_SUCCESS… in dgraphGather() 123 if (reduglbtab[0] != 1) { in dgraphGather() 128 return (dgraphGatherAll2 (dgrfptr, cgrfptr, reduglbtab[2], (int) reduglbtab[1])); in dgraphGather()
|
H A D | bdgraph_bipart_ml.c | 260 Gnum reduglbtab[6]; in bdgraphBipartMlUncoarsen() local 299 reduglbtab[5] = reduloctab[5]; in bdgraphBipartMlUncoarsen() 301 if (reduglbtab[5] != 0) in bdgraphBipartMlUncoarsen() 376 reduglbtab[5] = reduloctab[5]; in bdgraphBipartMlUncoarsen() 378 if (reduglbtab[5] != 0) { in bdgraphBipartMlUncoarsen() 515 reduglbtab[5] = reduloctab[5]; in bdgraphBipartMlUncoarsen() 517 if (reduglbtab[5] != 0) { in bdgraphBipartMlUncoarsen() 723 finegrafptr->compglbload0 = reduglbtab[0]; in bdgraphBipartMlUncoarsen() 725 finegrafptr->compglbsize0 = reduglbtab[1]; in bdgraphBipartMlUncoarsen() 726 finegrafptr->fronglbnbr = reduglbtab[2]; in bdgraphBipartMlUncoarsen() [all …]
|
H A D | dgraph_ghst.c | 110 Gnum reduglbtab[3]; in dgraphGhst2() local 153 if (dgraphAllreduceMaxSum (reduloctab, reduglbtab, 2, 1, grafptr->proccomm) != 0) { in dgraphGhst2() 180 if (dgraphAllreduceMaxSum (reduloctab, reduglbtab, 2, 1, grafptr->proccomm) != 0) in dgraphGhst2() 246 if (dgraphAllreduceMaxSum (reduloctab, reduglbtab, 2, 1, grafptr->proccomm) != 0) in dgraphGhst2() 256 if (dgraphAllreduceMaxSum (reduloctab, reduglbtab, 2, 1, grafptr->proccomm) != 0) in dgraphGhst2() 290 if (dgraphAllreduceMaxSum (reduloctab, reduglbtab, 2, 1, grafptr->proccomm) != 0) { in dgraphGhst2() 294 …if (reduglbtab[0] != 0) /* If error, propagated by some previous reduction… in dgraphGhst2() 297 grafptr->procngbmax = reduglbtab[1]; in dgraphGhst2() 301 …if (((float) reduglbtab[2]) <= ((float) grafptr->procglbnbr * (float) (grafptr->procglbnbr - 1) * … in dgraphGhst2()
|
H A D | vdgraph_separate_ml.c | 359 Gnum reduglbtab[6]; in vdgraphSeparateMlUncoarsen() local 387 reduglbtab[5] = reduloctab[5]; in vdgraphSeparateMlUncoarsen() 389 if (reduglbtab[5] != 0) in vdgraphSeparateMlUncoarsen() 447 if (reduglbtab[0] == 1) { /* If all possible partitions are invalid */ in vdgraphSeparateMlUncoarsen() 723 finegrafptr->compglbload[0] = reduglbtab[0]; in vdgraphSeparateMlUncoarsen() 724 finegrafptr->compglbload[1] = reduglbtab[1]; in vdgraphSeparateMlUncoarsen() 725 finegrafptr->compglbload[2] = reduglbtab[2]; in vdgraphSeparateMlUncoarsen() 726 finegrafptr->compglbsize[0] = reduglbtab[3]; in vdgraphSeparateMlUncoarsen() 727 finegrafptr->compglbsize[1] = reduglbtab[4]; in vdgraphSeparateMlUncoarsen() 728 finegrafptr->compglbsize[2] = reduglbtab[5]; in vdgraphSeparateMlUncoarsen() [all …]
|
H A D | dorder_perm.c | 94 Gnum reduglbtab[2]; in dorderPerm() local 124 …if (MPI_Allreduce (reduloctab, reduglbtab, 2, GNUM_MPI, MPI_SUM, ordeptr->proccomm) != MPI_SUCCESS… in dorderPerm() 126 reduglbtab[1] = 1; in dorderPerm() 128 if (reduglbtab[1] != 0) { in dorderPerm() 134 if (reduglbtab[0] == 0) { /* If ordering structure is empty */ in dorderPerm() 145 if (reduglbtab[0] != grafptr->vertglbnbr) { in dorderPerm()
|
H A D | dorder_io.c | 87 int reduglbtab[3]; in dorderSave() local 99 …if (MPI_Allreduce (reduloctab, reduglbtab, 3, MPI_INT, MPI_SUM, ordeptr->proccomm) != MPI_SUCCESS)… in dorderSave() 103 if (reduglbtab[0] != 1) { in dorderSave() 108 if ((reduglbtab[2] != 0) && (reduglbtab[2] != procglbnbr)) { in dorderSave() 112 protnum = (int) reduglbtab[1]; /* Get rank of root process */ in dorderSave()
|
H A D | dmapping.c | 177 Gnum reduglbtab[2]; in dmapTerm() local 192 …if (MPI_Allreduce (reduloctab, reduglbtab, 2, GNUM_MPI, MPI_SUM, grafptr->proccomm) != MPI_SUCCESS… in dmapTerm() 194 reduglbtab[1] = 1; in dmapTerm() 196 if (reduglbtab[1] != 0) { in dmapTerm() 202 …if (reduglbtab[0] == 0) { /* If mapping structure is empty, create an empty … in dmapTerm() 207 if (reduglbtab[0] != grafptr->vertglbnbr) { in dmapTerm()
|
H A D | vdgraph_separate_df.c | 101 Gnum reduglbtab[4]; in vdgraphSeparateDf() local 136 …if (MPI_Allreduce (reduloctab, reduglbtab, 4, GNUM_MPI, MPI_SUM, grafptr->s.proccomm) != MPI_SUCCE… in vdgraphSeparateDf() 141 if (reduglbtab[0] < 0) { /* If memory error */ in vdgraphSeparateDf() 145 …if ((reduglbtab[0] == 0) || /* If graph is too small to have any usable anchor… in vdgraphSeparateDf() 146 (reduglbtab[1] == 0)) { in vdgraphSeparateDf() 159 …valolocval[0] = (float) reduglbtab[2]; /* Compute values to remove from anchor vertices */ in vdgraphSeparateDf() 160 valolocval[1] = (float) reduglbtab[3]; in vdgraphSeparateDf() 180 ielsloctax[vanclocnnd] = 1.0F / (float) reduglbtab[0]; in vdgraphSeparateDf() 181 ielsloctax[vanclocnnd + 1] = 1.0F / (float) reduglbtab[1]; in vdgraphSeparateDf()
|
/dports/cad/scotch/scotch-6.0.4/src/scotch/ |
H A D | dgord.c | 123 double reduglbtab[12]; in main() local 371 MPI_Allreduce (&reduloctab[0], &reduglbtab[0], 3, redutype, reduop, MPI_COMM_WORLD); in main() 378 MPI_Allreduce (&reduloctab[9], &reduglbtab[9], 1, redutype, reduop, MPI_COMM_WORLD); in main() 393 reduglbtab[0], reduglbtab[1], reduglbtab[2] / (double) procglbnbr, in main() 394 reduglbtab[3], reduglbtab[4], reduglbtab[5] / (double) procglbnbr, in main() 395 reduglbtab[6], reduglbtab[7], reduglbtab[8] / (double) procglbnbr); in main() 400 reduglbtab[9], reduglbtab[10], reduglbtab[11] / (double) procglbnbr); in main()
|
H A D | dgmap.c | 133 double reduglbtab[12]; in main() local 433 MPI_Allreduce (&reduloctab[0], &reduglbtab[0], 3, redutype, reduop, MPI_COMM_WORLD); in main() 440 MPI_Allreduce (&reduloctab[9], &reduglbtab[9], 1, redutype, reduop, MPI_COMM_WORLD); in main() 455 reduglbtab[0], reduglbtab[1], reduglbtab[2] / (double) procglbnbr, in main() 456 reduglbtab[3], reduglbtab[4], reduglbtab[5] / (double) procglbnbr, in main() 457 reduglbtab[6], reduglbtab[7], reduglbtab[8] / (double) procglbnbr); in main() 462 reduglbtab[9], reduglbtab[10], reduglbtab[11] / (double) procglbnbr); in main()
|