| 44 |  | * | 
| 45 |  | *  Created by Charles F. Vardeman II on 11 Dec 2006. | 
| 46 |  | *  @author  Charles F. Vardeman II | 
| 47 | < | *  @version $Id: ConvexHull.cpp,v 1.9 2008-10-07 17:12:48 chuckv Exp $ | 
| 47 | > | *  @version $Id: ConvexHull.cpp,v 1.11 2008-10-20 19:36:32 chuckv Exp $ | 
| 48 |  | * | 
| 49 |  | */ | 
| 50 |  |  | 
| 369 |  | #else | 
| 370 |  | #ifdef HAVE_QHULL | 
| 371 |  | /* Old options Qt Qu Qg QG0 FA */ | 
| 372 | < | ConvexHull::ConvexHull() : Hull(), dim_(3), options_("qhull Qt  Qci Tcv Pp"), Ns_(200) { | 
| 372 | > | /* More old opts Qc Qi Pp*/ | 
| 373 | > | ConvexHull::ConvexHull() : Hull(), dim_(3), options_("qhull Qt Pp"), Ns_(200), nTriangles_(0) { | 
| 374 |  | //If we are doing the mpi version, set up some vectors for data communication | 
| 375 |  | #ifdef IS_MPI | 
| 376 |  |  | 
| 446 |  | const_cast<char *>(options_.c_str()), NULL, stderr)) { | 
| 447 |  |  | 
| 448 |  | sprintf(painCave.errMsg, "ConvexHull: Qhull failed to compute convex hull"); | 
| 449 | < | painCave.isFatal = 0; | 
| 449 | > | painCave.isFatal = 1; | 
| 450 |  | simError(); | 
| 451 |  |  | 
| 452 |  | } //qh_new_qhull | 
| 454 |  |  | 
| 455 |  | #ifdef IS_MPI | 
| 456 |  | std::vector<double> localPts; | 
| 457 | + | std::vector<double> localVel; | 
| 458 |  | int localPtArraySize; | 
| 459 |  |  | 
| 460 |  |  | 
| 466 |  | if (!facet->simplicial){ | 
| 467 |  | // should never happen with Qt | 
| 468 |  | sprintf(painCave.errMsg, "ConvexHull: non-simplicaial facet detected"); | 
| 469 | < | painCave.isFatal = 0; | 
| 469 | > | painCave.isFatal = 1; | 
| 470 |  | simError(); | 
| 471 |  | } | 
| 472 |  |  | 
| 518 |  | localPts.push_back(ptArray[dim_ * idx]); | 
| 519 |  | localPts.push_back(ptArray[dim_ * idx + 1]); | 
| 520 |  | localPts.push_back(ptArray[dim_ * idx + 2]); | 
| 521 | + |  | 
| 522 | + | Vector3d vel = bodydoubles[idx]->getVel(); | 
| 523 | + | localVel.push_back(vel.x()); | 
| 524 | + | localVel.push_back(vel.y()); | 
| 525 | + | localVel.push_back(vel.z()); | 
| 526 | + |  | 
| 527 |  | localPtsMap.push_back(idx); | 
| 528 |  | } | 
| 529 |  |  | 
| 542 |  | int nglobalPts = int(Nsglobal_/3); | 
| 543 |  |  | 
| 544 |  |  | 
| 545 | < | std::vector<double> globalPts; | 
| 546 | < | globalPts.resize(Nsglobal_); | 
| 545 | > | std::vector<double> globalPts(Nsglobal_); | 
| 546 | > | std::vector<double> globalVel(Nsglobal_); | 
| 547 |  |  | 
| 548 |  | isSurfaceID.resize(nglobalPts); | 
| 549 |  |  | 
| 561 |  | /* gather the potential hull */ | 
| 562 |  |  | 
| 563 |  | MPI::COMM_WORLD.Allgatherv(&localPts[0],localPtArraySize,MPI::DOUBLE,&globalPts[0],&NstoProc_[0],&displs_[0],MPI::DOUBLE); | 
| 564 | + | MPI::COMM_WORLD.Allgatherv(&localVel[0],localPtArraySize,MPI::DOUBLE,&globalVel[0],&NstoProc_[0],&displs_[0],MPI::DOUBLE); | 
| 565 |  |  | 
| 566 |  | /* | 
| 567 |  | if (myrank_ == 0){ | 
| 611 |  | Triangle* face = new Triangle(); | 
| 612 |  | Vector3d  V3dNormal(facet->normal[0],facet->normal[1],facet->normal[2]); | 
| 613 |  | face->setNormal(V3dNormal); | 
| 614 | < | //face->setCentroid(V3dCentroid); | 
| 614 | > |  | 
| 615 | > |  | 
| 616 | > |  | 
| 617 |  | RealType faceArea = 0.5*V3dNormal.length(); | 
| 618 | < | //face->setArea(faceArea); | 
| 618 | > | face->setArea(faceArea); | 
| 619 |  |  | 
| 620 |  |  | 
| 621 |  | vertices = qh_facet3vertex(facet); | 
| 622 | + |  | 
| 623 | + | coordT *center = qh_getcenter(vertices); | 
| 624 | + | Vector3d V3dCentroid(center[0], center[1], center[2]); | 
| 625 | + | face->setCentroid(V3dCentroid); | 
| 626 | + | Vector3d faceVel = V3Zero; | 
| 627 |  | FOREACHvertex_(vertices){ | 
| 628 |  | id = qh_pointid(vertex->point); | 
| 629 |  | int localindex = id; | 
| 630 |  | #ifdef IS_MPI | 
| 631 | < |  | 
| 631 | > | Vector3d velVector(globalVel[dim_ * id],globalVel[dim_ * id + 1], globalVel[dim_ * id + 1]); | 
| 632 | > | faceVel = faceVel + velVector; | 
| 633 |  | if (id >= noffset/3 && id < (noffset + localPtArraySize)/3 ){ | 
| 634 |  | localindex = localPtsMap[id-noffset/3]; | 
| 635 | + | #else | 
| 636 | + | faceVel = faceVel + bodydoubles[localindex]->getVel(); | 
| 637 |  | #endif | 
| 638 |  | face->addVertex(bodydoubles[localindex]); | 
| 639 |  | if( !isSurfaceID[id] ){ | 
| 653 |  | } | 
| 654 |  | #endif | 
| 655 |  | } //Foreachvertex | 
| 656 | < |  | 
| 656 | > | /* | 
| 657 | > | if (!SETempty_(facet->coplanarset)){ | 
| 658 | > | FOREACHpoint_(facet->coplanarset){ | 
| 659 | > | id = qh_pointid(point); | 
| 660 | > | surfaceSDs_.push_back(bodydoubles[id]); | 
| 661 | > | } | 
| 662 | > | } | 
| 663 | > | */ | 
| 664 | > | face->setFacetVelocity(faceVel/3.0); | 
| 665 |  | Triangles_.push_back(face); | 
| 666 |  | qh_settempfree(&vertices); | 
| 667 | < |  | 
| 667 | > |  | 
| 668 |  | } //FORALLfacets | 
| 669 |  |  | 
| 670 | < |  | 
| 670 | > | /* | 
| 671 | > | std::cout << surfaceSDs_.size() << std::endl; | 
| 672 | > | for (SD = surfaceSDs_.begin(); SD != surfaceSDs_.end(); ++SD){ | 
| 673 | > | Vector3d thisatom = (*SD)->getPos(); | 
| 674 | > | std::cout << "Au " << thisatom.x() << "  " << thisatom.y() << " " << thisatom.z() << std::endl; | 
| 675 | > | } | 
| 676 | > | */ | 
| 677 |  |  | 
| 645 | – | Ns_ = surfaceSDs_.size(); | 
| 678 |  |  | 
| 679 |  |  | 
| 680 | < | qh_getarea(qh facet_list); | 
| 681 | < | volume_ = qh totvol; | 
| 682 | < | area_ = qh totarea; | 
| 683 | < |  | 
| 684 | < |  | 
| 685 | < |  | 
| 686 | < | qh_freeqhull(!qh_ALL); | 
| 687 | < | qh_memfreeshort(&curlong, &totlong); | 
| 688 | < | if (curlong || totlong) | 
| 689 | < | std::cerr << "qhull internal warning (main): did not free %d bytes of long memory (%d pieces) " | 
| 690 | < | << totlong << curlong << std::endl; | 
| 691 | < |  | 
| 692 | < |  | 
| 693 | < |  | 
| 680 | > | Ns_ = surfaceSDs_.size(); | 
| 681 | > | nTriangles_ = Triangles_.size(); | 
| 682 | > |  | 
| 683 | > | qh_getarea(qh facet_list); | 
| 684 | > | volume_ = qh totvol; | 
| 685 | > | area_ = qh totarea; | 
| 686 | > |  | 
| 687 | > |  | 
| 688 | > |  | 
| 689 | > | qh_freeqhull(!qh_ALL); | 
| 690 | > | qh_memfreeshort(&curlong, &totlong); | 
| 691 | > | if (curlong || totlong) | 
| 692 | > | std::cerr << "qhull internal warning (main): did not free %d bytes of long memory (%d pieces) " | 
| 693 | > | << totlong << curlong << std::endl; | 
| 694 | > |  | 
| 695 | > |  | 
| 696 | > |  | 
| 697 |  | } | 
| 698 |  |  | 
| 699 |  |  |