00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029
00030
00031
00032
00033
00034
00035
00036
00037
00038
00039 #include <MyRCM.h>
00040 #include <Graph.h>
00041 #include <Vertex.h>
00042 #include <VertexIter.h>
00043 #include <ID.h>
00044 #include <Channel.h>
00045 #include <FEM_ObjectBroker.h>
00046
00047
00048 MyRCM::MyRCM(int startVertex, bool minDegreeFlag)
00049 :GraphNumberer(GraphNUMBERER_TAG_MyRCM),
00050 numVertex(-1), theRefResult(0), startVertexTag(startVertex),
00051 minDegree(minDegreeFlag)
00052 {
00053
00054 }
00055
00056
00057 MyRCM::~MyRCM()
00058 {
00059 if (theRefResult != 0)
00060 delete theRefResult;
00061 }
00062
00063 void
00064 MyRCM::setStartVertex(int startVertex)
00065 {
00066 startVertexTag = startVertex;
00067 }
00068
00069 void
00070 MyRCM::setMinDegreeFlag(bool flag)
00071 {
00072 minDegree = flag;
00073 }
00074
00075
00076
00077
00078
00079
00080
00081
00082
00083
00084
00085
00086
00087
00088 const ID &
00089 MyRCM::number(Graph &theGraph, int startVertex)
00090 {
00091
00092
00093 if (numVertex != theGraph.getNumVertex()) {
00094
00095
00096 if (theRefResult != 0)
00097 delete theRefResult;
00098
00099 numVertex = theGraph.getNumVertex();
00100 theRefResult = new ID(numVertex);
00101
00102 if (theRefResult == 0) {
00103 opserr << "ERROR: MyRCM::number - Out of Memory\n";
00104 theRefResult = new ID(0);
00105 numVertex = 0;
00106 return *theRefResult;
00107 }
00108 }
00109
00110
00111
00112 if (numVertex == 0)
00113 return *theRefResult;
00114
00115
00116
00117
00118
00119 Vertex *vertexPtr;
00120 VertexIter &vertexIter = theGraph.getVertices();
00121
00122 while ((vertexPtr = vertexIter()) != 0)
00123 vertexPtr->setTmp(-1);
00124
00125
00126 if (startVertex != -1)
00127 startVertexTag = startVertex;
00128
00129 if (startVertexTag != -1) {
00130 vertexPtr = theGraph.getVertexPtr(startVertexTag);
00131 if (vertexPtr == 0) {
00132 opserr << "WARNING: MyRCM::number - No vertex with tag ";
00133 opserr << startVertexTag << "Exists - using first come from iter\n";
00134 startVertexTag = -1;
00135 }
00136 }
00137
00138
00139
00140 VertexIter &vertexIter2 = theGraph.getVertices();
00141 if (startVertexTag == -1)
00142 vertexPtr = vertexIter2();
00143
00144 int currentMark = numVertex-1;
00145 int nextMark = currentMark -1;
00146 (*theRefResult)(currentMark) = vertexPtr->getTag();
00147 vertexPtr->setTmp(currentMark);
00148
00149
00150
00151 while (nextMark >= 0) {
00152
00153
00154
00155 vertexPtr = theGraph.getVertexPtr((*theRefResult)(currentMark));
00156 const ID &adjacency = vertexPtr->getAdjacency();
00157
00158
00159
00160
00161 int size = adjacency.Size();
00162 for (int i=0; i<size; i++) {
00163
00164 int vertexTag = adjacency(i);
00165 vertexPtr = theGraph.getVertexPtr(vertexTag);
00166 if ((vertexPtr->getTmp()) == -1) {
00167 vertexPtr->setTmp(nextMark);
00168 (*theRefResult)(nextMark--) = vertexTag;
00169 }
00170 }
00171
00172
00173
00174
00175 currentMark--;
00176
00177
00178
00179 if ((currentMark == nextMark) && (currentMark >= 0)) {
00180 opserr << "WARNING: MyRCM::number - Disconnected graph\n";
00181
00182
00183
00184 while (((vertexPtr = vertexIter2()) != 0) &&
00185 (vertexPtr->getTmp() != -1))
00186 ;
00187
00188 nextMark--;
00189 vertexPtr->setTmp(currentMark);
00190 (*theRefResult)(currentMark) = vertexPtr->getTag();
00191 }
00192
00193 }
00194
00195
00196
00197
00198 for (int i=0; i<numVertex; i++) {
00199 int vertexTag = (*theRefResult)(i);
00200 vertexPtr = theGraph.getVertexPtr(vertexTag);
00201 vertexPtr->setTmp(i+1);
00202 (*theRefResult)(i) = vertexPtr->getTag();
00203 }
00204
00205 theGraph.Print(opserr, 3);
00206 opserr << *theRefResult;
00207 return *theRefResult;
00208 }
00209
00210
00211
00212 int
00213 MyRCM::sendSelf(int tag, Channel &theChannel)
00214 {
00215 return 0;
00216 }
00217
00218 int
00219 MyRCM::recvSelf(int tag, Channel &theChannel, FEM_ObjectBroker &theBroker)
00220 {
00221 return 0;
00222 }
00223
00224
00225
00226
00227
00228
00229
00230 const ID &
00231 MyRCM::number(Graph &theGraph, const ID &startVertices)
00232 {
00233
00234
00235 if (numVertex != theGraph.getNumVertex()) {
00236
00237
00238 if (theRefResult != 0)
00239 delete theRefResult;
00240
00241 numVertex = theGraph.getNumVertex();
00242 theRefResult = new ID(numVertex);
00243
00244 if (theRefResult == 0) {
00245 opserr << "ERROR: MyRCM::number - Out of Memory\n";
00246 theRefResult = new ID(0);
00247 numVertex = 0;
00248 return *theRefResult;
00249 }
00250 }
00251
00252
00253
00254 if (numVertex == 0)
00255 return *theRefResult;
00256
00257 ID copyStart(startVertices);
00258
00259
00260 int minStartVertexTag =0;
00261 int minAvgProfile = 0;
00262 int startVerticesSize = startVertices.Size();
00263
00264 for (int j=0; j<startVerticesSize; j++) {
00265
00266
00267
00268 Vertex *vertexPtr;
00269 VertexIter &vertexIter = theGraph.getVertices();
00270
00271 while ((vertexPtr = vertexIter()) != 0)
00272 vertexPtr->setTmp(-1);
00273
00274
00275 VertexIter &vertexIter2 = theGraph.getVertices();
00276 int currentMark = numVertex-1;
00277 int nextMark = currentMark-1;
00278
00279 for (int k=0; k<startVerticesSize; k++)
00280 if (k != j)
00281 copyStart(k) = 0;
00282 else
00283 copyStart(k) = 1;
00284
00285 vertexPtr = theGraph.getVertexPtr(startVertices(j));
00286 (*theRefResult)(currentMark) = vertexPtr->getTag();
00287 vertexPtr->setTmp(currentMark);
00288
00289 int numFromStart = 1;
00290 int avgProfile = 1;
00291 while (numFromStart < startVerticesSize) {
00292
00293
00294 vertexPtr = theGraph.getVertexPtr((*theRefResult)(currentMark));
00295 const ID &adjacency = vertexPtr->getAdjacency();
00296
00297
00298
00299
00300 int size = adjacency.Size();
00301 for (int i=0; i<size; i++) {
00302 int vertexTag = adjacency(i);
00303 int loc =startVertices.getLocation(vertexTag);
00304 if (loc >= 0) {
00305 vertexPtr = theGraph.getVertexPtr(vertexTag);
00306 if ((vertexPtr->getTmp()) == -1) {
00307 vertexPtr->setTmp(nextMark);
00308 copyStart(loc) = 1;
00309 numFromStart++;
00310 avgProfile += currentMark - nextMark;
00311 (*theRefResult)(nextMark--) = vertexTag;
00312 }
00313 }
00314 }
00315
00316
00317
00318
00319 currentMark--;
00320
00321
00322
00323 if (currentMark == nextMark && numFromStart < startVerticesSize) {
00324
00325
00326 for (int l=0; l<startVerticesSize; l++)
00327 if (copyStart(l) == 0) {
00328 int vertexTag = startVertices(l);
00329 vertexPtr = theGraph.getVertexPtr(vertexTag);
00330 nextMark--;
00331 copyStart(l) = 1;
00332 vertexPtr->setTmp(currentMark);
00333 numFromStart++;
00334 (*theRefResult)(currentMark) = vertexPtr->getTag();
00335 l =startVerticesSize;
00336 }
00337 }
00338 }
00339
00340 currentMark = numVertex-1;
00341 nextMark = numVertex - startVerticesSize -1;
00342
00343
00344
00345 while (nextMark >= 0) {
00346
00347
00348 vertexPtr = theGraph.getVertexPtr((*theRefResult)(currentMark));
00349 const ID &adjacency = vertexPtr->getAdjacency();
00350
00351
00352
00353
00354 int size = adjacency.Size();
00355 for (int i=0; i<size; i++) {
00356
00357 int vertexTag = adjacency(i);
00358 vertexPtr = theGraph.getVertexPtr(vertexTag);
00359 if ((vertexPtr->getTmp()) == -1) {
00360 vertexPtr->setTmp(nextMark);
00361 avgProfile += currentMark - nextMark;
00362
00363 (*theRefResult)(nextMark--) = vertexTag;
00364 }
00365 }
00366
00367
00368
00369 currentMark--;
00370
00371
00372
00373 if ((currentMark == nextMark) && (currentMark >= 0)) {
00374
00375
00376
00377 while (((vertexPtr = vertexIter2()) != 0) &&
00378 (vertexPtr->getTmp() != -1))
00379 ;
00380
00381 nextMark--;
00382 vertexPtr->setTmp(currentMark);
00383 (*theRefResult)(currentMark) = vertexPtr->getTag();
00384 }
00385 }
00386
00387 if (j == 0 || minAvgProfile > avgProfile) {
00388 minStartVertexTag = startVertices(j);
00389 minAvgProfile = avgProfile;
00390 }
00391
00392 }
00393
00394
00395
00396
00397
00398
00399
00400 Vertex *vertexPtr;
00401 VertexIter &vertexIter = theGraph.getVertices();
00402
00403 while ((vertexPtr = vertexIter()) != 0)
00404 vertexPtr->setTmp(-1);
00405
00406
00407 VertexIter &vertexIter2 = theGraph.getVertices();
00408 int currentMark = numVertex-1;
00409 int nextMark = currentMark-1;
00410
00411 vertexPtr = theGraph.getVertexPtr(minStartVertexTag);
00412 (*theRefResult)(currentMark) = vertexPtr->getTag();
00413 vertexPtr->setTmp(currentMark);
00414 currentMark--;
00415
00416 int loc = startVertices.getLocation(minStartVertexTag);
00417 for (int k=0; k<startVerticesSize; k++)
00418 if (k != loc)
00419 copyStart(k) = 0;
00420
00421
00422 int numFromStart = 1;
00423 while (numFromStart < startVerticesSize) {
00424
00425
00426 vertexPtr = theGraph.getVertexPtr((*theRefResult)(currentMark));
00427 const ID &adjacency = vertexPtr->getAdjacency();
00428
00429
00430
00431
00432 int size = adjacency.Size();
00433 for (int i=0; i<size; i++) {
00434 int vertexTag = adjacency(i);
00435 int loc =startVertices.getLocation(vertexTag);
00436 if (loc >= 0) {
00437 vertexPtr = theGraph.getVertexPtr(vertexTag);
00438 if ((vertexPtr->getTmp()) == -1) {
00439 vertexPtr->setTmp(nextMark);
00440 copyStart(loc) = 1;
00441 numFromStart++;
00442 (*theRefResult)(nextMark--) = vertexTag;
00443 }
00444 }
00445 }
00446
00447
00448
00449
00450 currentMark--;
00451
00452
00453
00454 if (currentMark == nextMark && numFromStart < startVerticesSize) {
00455
00456
00457 for (int l=0; l<startVerticesSize; l++)
00458 if (copyStart(l) == 0) {
00459 int vertexTag = startVertices(l);
00460 vertexPtr = theGraph.getVertexPtr(vertexTag);
00461 nextMark--;
00462 copyStart(l) = 1;
00463 vertexPtr->setTmp(currentMark);
00464 numFromStart++;
00465 (*theRefResult)(currentMark) = vertexPtr->getTag();
00466 l =startVerticesSize;
00467 }
00468 }
00469 }
00470
00471 currentMark = numVertex-1;
00472 nextMark = numVertex - startVerticesSize -1;
00473
00474
00475 currentMark = numVertex-1;
00476
00477
00478 while (nextMark >= 0) {
00479
00480
00481
00482 vertexPtr = theGraph.getVertexPtr((*theRefResult)(currentMark));
00483 const ID &adjacency = vertexPtr->getAdjacency();
00484
00485
00486
00487
00488 int size = adjacency.Size();
00489 for (int i=0; i<size; i++) {
00490
00491 int vertexTag = adjacency(i);
00492 vertexPtr = theGraph.getVertexPtr(vertexTag);
00493 if ((vertexPtr->getTmp()) == -1) {
00494 vertexPtr->setTmp(nextMark);
00495 (*theRefResult)(nextMark--) = vertexTag;
00496 }
00497 }
00498
00499
00500
00501
00502 currentMark--;
00503
00504
00505
00506 if ((currentMark == nextMark) && (currentMark >= 0)) {
00507 opserr << "WARNING: MyRCM::number - Disconnected graph ";
00508
00509
00510
00511 while (((vertexPtr = vertexIter2()) != 0) &&
00512 (vertexPtr->getTmp() != -1))
00513 ;
00514
00515 nextMark--;
00516 vertexPtr->setTmp(currentMark);
00517 (*theRefResult)(currentMark) = vertexPtr->getTag();
00518 }
00519
00520 }
00521
00522
00523
00524
00525 for (int m=0; m<numVertex; m++) {
00526 int vertexTag = (*theRefResult)(m);
00527 vertexPtr = theGraph.getVertexPtr(vertexTag);
00528 vertexPtr->setTmp(m+1);
00529 (*theRefResult)(m) = vertexPtr->getTag();
00530 }
00531
00532 return *theRefResult;
00533 }
00534
00535
00536