Changes in src/molecule_fragmentation.cpp [49e1ae:a67d19]
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
src/molecule_fragmentation.cpp
r49e1ae ra67d19 18 18 #include "molecule.hpp" 19 19 #include "periodentafel.hpp" 20 #include "World.hpp" 20 21 21 22 /************************************* Functions for class molecule *********************************/ … … 43 44 } 44 45 FragmentCount = NoNonHydrogen*(1 << (c*order)); 45 Log() << Verbose(1) << "Upper limit for this subgraph is " << FragmentCount << " for " << NoNonHydrogen << " non-H atoms with maximum bond degree of " << c << "." << endl;46 DoLog(1) && (Log() << Verbose(1) << "Upper limit for this subgraph is " << FragmentCount << " for " << NoNonHydrogen << " non-H atoms with maximum bond degree of " << c << "." << endl); 46 47 return FragmentCount; 47 48 }; … … 67 68 } // else it's "-1" or else and thus must not be added 68 69 } 69 Log() << Verbose(1) << "The scanned KeySet is ";70 DoLog(1) && (Log() << Verbose(1) << "The scanned KeySet is "); 70 71 for(KeySet::iterator runner = CurrentSet.begin(); runner != CurrentSet.end(); runner++) { 71 Log() << Verbose(0) << (*runner) << "\t";72 } 73 Log() << Verbose(0) << endl;72 DoLog(0) && (Log() << Verbose(0) << (*runner) << "\t"); 73 } 74 DoLog(0) && (Log() << Verbose(0) << endl); 74 75 return (status != 0); 75 76 }; … … 99 100 100 101 // 1st pass: open file and read 101 Log() << Verbose(1) << "Parsing the KeySet file ... " << endl;102 DoLog(1) && (Log() << Verbose(1) << "Parsing the KeySet file ... " << endl); 102 103 sprintf(filename, "%s/%s%s", path, FRAGMENTPREFIX, KEYSETFILE); 103 104 InputFile.open(filename); … … 112 113 testGraphInsert = FragmentList->insert(GraphPair (CurrentSet,pair<int,double>(NumberOfFragments++,1))); // store fragment number and current factor 113 114 if (!testGraphInsert.second) { 114 eLog() << Verbose(0) << "KeySet file must be corrupt as there are two equal key sets therein!" << endl;115 DoeLog(0) && (eLog()<< Verbose(0) << "KeySet file must be corrupt as there are two equal key sets therein!" << endl); 115 116 performCriticalExit(); 116 117 } … … 121 122 InputFile.clear(); 122 123 Free(&buffer); 123 Log() << Verbose(1) << "done." << endl;124 DoLog(1) && (Log() << Verbose(1) << "done." << endl); 124 125 } else { 125 Log() << Verbose(1) << "File " << filename << " not found." << endl;126 DoLog(1) && (Log() << Verbose(1) << "File " << filename << " not found." << endl); 126 127 status = false; 127 128 } … … 153 154 154 155 // 2nd pass: open TEFactors file and read 155 Log() << Verbose(1) << "Parsing the TEFactors file ... " << endl;156 DoLog(1) && (Log() << Verbose(1) << "Parsing the TEFactors file ... " << endl); 156 157 sprintf(filename, "%s/%s%s", path, FRAGMENTPREFIX, TEFACTORSFILE); 157 158 InputFile.open(filename); … … 163 164 InputFile >> TEFactor; 164 165 (*runner).second.second = TEFactor; 165 Log() << Verbose(2) << "Setting " << ++NumberOfFragments << " fragment's TEFactor to " << (*runner).second.second << "." << endl;166 DoLog(2) && (Log() << Verbose(2) << "Setting " << ++NumberOfFragments << " fragment's TEFactor to " << (*runner).second.second << "." << endl); 166 167 } else { 167 168 status = false; … … 171 172 // 4. Free and done 172 173 InputFile.close(); 173 Log() << Verbose(1) << "done." << endl;174 DoLog(1) && (Log() << Verbose(1) << "done." << endl); 174 175 } else { 175 Log() << Verbose(1) << "File " << filename << " not found." << endl;176 DoLog(1) && (Log() << Verbose(1) << "File " << filename << " not found." << endl); 176 177 status = false; 177 178 } … … 201 202 line += KEYSETFILE; 202 203 output.open(line.c_str(), ios::out); 203 Log() << Verbose(1) << "Saving key sets of the total graph ... ";204 DoLog(1) && (Log() << Verbose(1) << "Saving key sets of the total graph ... "); 204 205 if(output != NULL) { 205 206 for(Graph::iterator runner = KeySetList.begin(); runner != KeySetList.end(); runner++) { … … 211 212 output << endl; 212 213 } 213 Log() << Verbose(0) << "done." << endl;214 DoLog(0) && (Log() << Verbose(0) << "done." << endl); 214 215 } else { 215 eLog() << Verbose(0) << "Unable to open " << line << " for writing keysets!" << endl;216 DoeLog(0) && (eLog()<< Verbose(0) << "Unable to open " << line << " for writing keysets!" << endl); 216 217 performCriticalExit(); 217 218 status = false; … … 242 243 line += TEFACTORSFILE; 243 244 output.open(line.c_str(), ios::out); 244 Log() << Verbose(1) << "Saving TEFactors of the total graph ... ";245 DoLog(1) && (Log() << Verbose(1) << "Saving TEFactors of the total graph ... "); 245 246 if(output != NULL) { 246 247 for(Graph::iterator runner = KeySetList.begin(); runner != KeySetList.end(); runner++) 247 248 output << (*runner).second.second << endl; 248 Log() << Verbose(1) << "done." << endl;249 DoLog(1) && (Log() << Verbose(1) << "done." << endl); 249 250 } else { 250 Log() << Verbose(1) << "failed to open " << line << "." << endl;251 DoLog(1) && (Log() << Verbose(1) << "failed to open " << line << "." << endl); 251 252 status = false; 252 253 } … … 292 293 (*PresentItem).second.first = fabs(Value); 293 294 (*PresentItem).second.second = FragOrder; 294 Log() << Verbose(2) << "Updated element (" << (*PresentItem).first << ",[" << (*PresentItem).second.first << "," << (*PresentItem).second.second << "])." << endl;295 DoLog(2) && (Log() << Verbose(2) << "Updated element (" << (*PresentItem).first << ",[" << (*PresentItem).second.first << "," << (*PresentItem).second.second << "])." << endl); 295 296 } else { 296 Log() << Verbose(2) << "Did not update element " << (*PresentItem).first << " as " << FragOrder << " is less than or equal to " << (*PresentItem).second.second << "." << endl;297 DoLog(2) && (Log() << Verbose(2) << "Did not update element " << (*PresentItem).first << " as " << FragOrder << " is less than or equal to " << (*PresentItem).second.second << "." << endl); 297 298 } 298 299 } else { 299 Log() << Verbose(2) << "Inserted element (" << (*PresentItem).first << ",[" << (*PresentItem).second.first << "," << (*PresentItem).second.second << "])." << endl;300 DoLog(2) && (Log() << Verbose(2) << "Inserted element (" << (*PresentItem).first << ",[" << (*PresentItem).second.first << "," << (*PresentItem).second.second << "])." << endl); 300 301 } 301 302 } else { 302 Log() << Verbose(1) << "No Fragment under No. " << No << "found." << endl;303 DoLog(1) && (Log() << Verbose(1) << "No Fragment under No. " << No << "found." << endl); 303 304 } 304 305 }; … … 359 360 atom *Walker = mol->start; 360 361 map<double, pair<int,int> > *FinalRootCandidates = new map<double, pair<int,int> > ; 361 Log() << Verbose(1) << "Root candidate list is: " << endl;362 DoLog(1) && (Log() << Verbose(1) << "Root candidate list is: " << endl); 362 363 for(map<int, pair<double,int> >::iterator runner = AdaptiveCriteriaList->begin(); runner != AdaptiveCriteriaList->end(); runner++) { 363 364 Walker = mol->FindAtom((*runner).first); … … 365 366 //if ((*runner).second.second >= Walker->AdaptiveOrder) { // only insert if this is an "active" root site for the current order 366 367 if (!Walker->MaxOrder) { 367 Log() << Verbose(2) << "(" << (*runner).first << ",[" << (*runner).second.first << "," << (*runner).second.second << "])" << endl;368 DoLog(2) && (Log() << Verbose(2) << "(" << (*runner).first << ",[" << (*runner).second.first << "," << (*runner).second.second << "])" << endl); 368 369 FinalRootCandidates->insert( make_pair( (*runner).second.first, pair<int,int>((*runner).first, (*runner).second.second) ) ); 369 370 } else { 370 Log() << Verbose(2) << "Excluding (" << *Walker << ", " << (*runner).first << ",[" << (*runner).second.first << "," << (*runner).second.second << "]), as it has reached its maximum order." << endl;371 DoLog(2) && (Log() << Verbose(2) << "Excluding (" << *Walker << ", " << (*runner).first << ",[" << (*runner).second.first << "," << (*runner).second.second << "]), as it has reached its maximum order." << endl); 371 372 } 372 373 } else { 373 eLog() << Verbose(0) << "Atom No. " << (*runner).second.first << " was not found in this molecule." << endl;374 DoeLog(0) && (eLog()<< Verbose(0) << "Atom No. " << (*runner).second.first << " was not found in this molecule." << endl); 374 375 performCriticalExit(); 375 376 } … … 396 397 Walker = mol->FindAtom(No); 397 398 //if (Walker->AdaptiveOrder < MinimumRingSize[Walker->nr]) { 398 Log() << Verbose(2) << "Root " << No << " is still above threshold (10^{" << Order <<"}: " << runner->first << ", setting entry " << No << " of Atom mask to true." << endl;399 DoLog(2) && (Log() << Verbose(2) << "Root " << No << " is still above threshold (10^{" << Order <<"}: " << runner->first << ", setting entry " << No << " of Atom mask to true." << endl); 399 400 AtomMask[No] = true; 400 401 status = true; … … 412 413 void PrintAtomMask(bool *AtomMask, int AtomCount) 413 414 { 414 Log() << Verbose(2) << " ";415 DoLog(2) && (Log() << Verbose(2) << " "); 415 416 for(int i=0;i<AtomCount;i++) 416 Log() << Verbose(0) << (i % 10);417 Log() << Verbose(0) << endl;418 Log() << Verbose(2) << "Atom mask is: ";417 DoLog(0) && (Log() << Verbose(0) << (i % 10)); 418 DoLog(0) && (Log() << Verbose(0) << endl); 419 DoLog(2) && (Log() << Verbose(2) << "Atom mask is: "); 419 420 for(int i=0;i<AtomCount;i++) 420 Log() << Verbose(0) << (AtomMask[i] ? "t" : "f");421 Log() << Verbose(0) << endl;421 DoLog(0) && (Log() << Verbose(0) << (AtomMask[i] ? "t" : "f")); 422 DoLog(0) && (Log() << Verbose(0) << endl); 422 423 }; 423 424 … … 446 447 // transmorph graph keyset list into indexed KeySetList 447 448 if (GlobalKeySetList == NULL) { 448 eLog() << Verbose(1) << "Given global key set list (graph) is NULL!" << endl;449 DoeLog(1) && (eLog()<< Verbose(1) << "Given global key set list (graph) is NULL!" << endl); 449 450 return false; 450 451 } … … 454 455 map<int, pair<double,int> > *AdaptiveCriteriaList = ScanAdaptiveFileIntoMap(path, *IndexKeySetList); // (Root No., (Value, Order)) ! 455 456 if (AdaptiveCriteriaList->empty()) { 456 eLog() << Verbose(2) << "Unable to parse file, incrementing all." << endl;457 DoeLog(2) && (eLog()<< Verbose(2) << "Unable to parse file, incrementing all." << endl); 457 458 while (Walker->next != end) { 458 459 Walker = Walker->next; … … 492 493 if (!status) { 493 494 if (Order == 0) 494 Log() << Verbose(1) << "Single stepping done." << endl;495 DoLog(1) && (Log() << Verbose(1) << "Single stepping done." << endl); 495 496 else 496 Log() << Verbose(1) << "Order at every site is already equal or above desired order " << Order << "." << endl;497 DoLog(1) && (Log() << Verbose(1) << "Order at every site is already equal or above desired order " << Order << "." << endl); 497 498 } 498 499 } … … 511 512 { 512 513 if (SortIndex != NULL) { 513 Log() << Verbose(1) << "SortIndex is " << SortIndex << " and not NULL as expected." << endl;514 DoLog(1) && (Log() << Verbose(1) << "SortIndex is " << SortIndex << " and not NULL as expected." << endl); 514 515 return false; 515 516 } … … 562 563 bool *AtomMask = NULL; 563 564 564 Log() << Verbose(0) << endl;565 DoLog(0) && (Log() << Verbose(0) << endl); 565 566 #ifdef ADDHYDROGEN 566 Log() << Verbose(0) << "I will treat hydrogen special and saturate dangling bonds with it." << endl;567 DoLog(0) && (Log() << Verbose(0) << "I will treat hydrogen special and saturate dangling bonds with it." << endl); 567 568 #else 568 Log() << Verbose(0) << "Hydrogen is treated just like the rest of the lot." << endl;569 DoLog(0) && (Log() << Verbose(0) << "Hydrogen is treated just like the rest of the lot." << endl); 569 570 #endif 570 571 … … 592 593 // fill the bond structure of the individually stored subgraphs 593 594 MolecularWalker->FillBondStructureFromReference(this, FragmentCounter, ListOfLocalAtoms, false); // we want to keep the created ListOfLocalAtoms 594 Log() << Verbose(0) << "Analysing the cycles of subgraph " << MolecularWalker->Leaf << " with nr. " << FragmentCounter << "." << endl;595 DoLog(0) && (Log() << Verbose(0) << "Analysing the cycles of subgraph " << MolecularWalker->Leaf << " with nr. " << FragmentCounter << "." << endl); 595 596 LocalBackEdgeStack = new StackClass<bond *> (MolecularWalker->Leaf->BondCount); 596 597 // // check the list of local atoms for debugging … … 601 602 // else 602 603 // Log() << Verbose(0) << "\t" << ListOfLocalAtoms[FragmentCounter][i]->Name; 603 Log() << Verbose(0) << "Gathering local back edges for subgraph " << MolecularWalker->Leaf << " with nr. " << FragmentCounter << "." << endl;604 DoLog(0) && (Log() << Verbose(0) << "Gathering local back edges for subgraph " << MolecularWalker->Leaf << " with nr. " << FragmentCounter << "." << endl); 604 605 MolecularWalker->Leaf->PickLocalBackEdges(ListOfLocalAtoms[FragmentCounter++], BackEdgeStack, LocalBackEdgeStack); 605 Log() << Verbose(0) << "Analysing the cycles of subgraph " << MolecularWalker->Leaf << " with nr. " << FragmentCounter << "." << endl;606 DoLog(0) && (Log() << Verbose(0) << "Analysing the cycles of subgraph " << MolecularWalker->Leaf << " with nr. " << FragmentCounter << "." << endl); 606 607 MolecularWalker->Leaf->CyclicStructureAnalysis(LocalBackEdgeStack, MinimumRingSize); 607 Log() << Verbose(0) << "Done with Analysing the cycles of subgraph " << MolecularWalker->Leaf << " with nr. " << FragmentCounter << "." << endl;608 DoLog(0) && (Log() << Verbose(0) << "Done with Analysing the cycles of subgraph " << MolecularWalker->Leaf << " with nr. " << FragmentCounter << "." << endl); 608 609 delete(LocalBackEdgeStack); 609 610 } … … 636 637 while (MolecularWalker->next != NULL) { 637 638 MolecularWalker = MolecularWalker->next; 638 Log() << Verbose(1) << "Fragmenting subgraph " << MolecularWalker << "." << endl;639 DoLog(1) && (Log() << Verbose(1) << "Fragmenting subgraph " << MolecularWalker << "." << endl); 639 640 //MolecularWalker->Leaf->OutputListOfBonds(out); // output atom::ListOfBonds for debugging 640 641 if (MolecularWalker->Leaf->first->next != MolecularWalker->Leaf->last) { 641 642 // call BOSSANOVA method 642 Log() << Verbose(0) << endl << " ========== BOND ENERGY of subgraph " << FragmentCounter << " ========================= " << endl;643 DoLog(0) && (Log() << Verbose(0) << endl << " ========== BOND ENERGY of subgraph " << FragmentCounter << " ========================= " << endl); 643 644 MolecularWalker->Leaf->FragmentBOSSANOVA(FragmentList[FragmentCounter], RootStack[FragmentCounter], MinimumRingSize); 644 645 } else { 645 eLog() << Verbose(1) << "Subgraph " << MolecularWalker << " has no atoms!" << endl;646 DoeLog(1) && (eLog()<< Verbose(1) << "Subgraph " << MolecularWalker << " has no atoms!" << endl); 646 647 } 647 648 FragmentCounter++; // next fragment list 648 649 } 649 650 } 650 Log() << Verbose(2) << "CheckOrder is " << CheckOrder << "." << endl;651 DoLog(2) && (Log() << Verbose(2) << "CheckOrder is " << CheckOrder << "." << endl); 651 652 delete[](RootStack); 652 653 delete[](AtomMask); … … 679 680 for(Graph::iterator runner = TotalGraph.begin(); runner != TotalGraph.end(); runner++) { 680 681 KeySet test = (*runner).first; 681 Log() << Verbose(0) << "Fragment No." << (*runner).second.first << " with TEFactor " << (*runner).second.second << "." << endl;682 DoLog(0) && (Log() << Verbose(0) << "Fragment No." << (*runner).second.first << " with TEFactor " << (*runner).second.second << "." << endl); 682 683 BondFragments->insert(StoreFragmentFromKeySet(test, configuration)); 683 684 k++; 684 685 } 685 Log() << Verbose(0) << k << "/" << BondFragments->ListOfMolecules.size() << " fragments generated from the keysets." << endl;686 DoLog(0) && (Log() << Verbose(0) << k << "/" << BondFragments->ListOfMolecules.size() << " fragments generated from the keysets." << endl); 686 687 687 688 // ===== 9. Save fragments' configuration and keyset files et al to disk === … … 690 691 CreateMappingLabelsToConfigSequence(SortIndex); 691 692 692 Log() << Verbose(1) << "Writing " << BondFragments->ListOfMolecules.size() << " possible bond fragmentation configs" << endl;693 DoLog(1) && (Log() << Verbose(1) << "Writing " << BondFragments->ListOfMolecules.size() << " possible bond fragmentation configs" << endl); 693 694 if (BondFragments->OutputConfigForListOfFragments(configuration, SortIndex)) 694 Log() << Verbose(1) << "All configs written." << endl;695 DoLog(1) && (Log() << Verbose(1) << "All configs written." << endl); 695 696 else 696 Log() << Verbose(1) << "Some config writing failed." << endl;697 DoLog(1) && (Log() << Verbose(1) << "Some config writing failed." << endl); 697 698 698 699 // store force index reference file … … 703 704 704 705 // store Adjacency file 705 StoreAdjacencyToFile(configuration->configpath); 706 char *filename = Malloc<char> (MAXSTRINGSIZE, "molecule::FragmentMolecule - *filename"); 707 strcpy(filename, FRAGMENTPREFIX); 708 strcat(filename, ADJACENCYFILE); 709 StoreAdjacencyToFile(configuration->configpath, filename); 710 Free(&filename); 706 711 707 712 // store Hydrogen saturation correction file … … 715 720 716 721 // free memory for bond part 717 Log() << Verbose(1) << "Freeing bond memory" << endl;722 DoLog(1) && (Log() << Verbose(1) << "Freeing bond memory" << endl); 718 723 delete(FragmentList); // remove bond molecule from memory 719 724 Free(&SortIndex); 720 725 } else { 721 Log() << Verbose(1) << "FragmentList is zero on return, splitting failed." << endl;726 DoLog(1) && (Log() << Verbose(1) << "FragmentList is zero on return, splitting failed." << endl); 722 727 } 723 728 delete(BondFragments); 724 Log() << Verbose(0) << "End of bond fragmentation." << endl;729 DoLog(0) && (Log() << Verbose(0) << "End of bond fragmentation." << endl); 725 730 726 731 return ((int)(!FragmentationToDo)+1); // 1 - continue, 2 - stop (no fragmentation occured) … … 741 746 line << path << "/" << FRAGMENTPREFIX << ORDERATSITEFILE; 742 747 file.open(line.str().c_str()); 743 Log() << Verbose(1) << "Writing OrderAtSite " << ORDERATSITEFILE << " ... " << endl;748 DoLog(1) && (Log() << Verbose(1) << "Writing OrderAtSite " << ORDERATSITEFILE << " ... " << endl); 744 749 if (file != NULL) { 745 750 ActOnAllAtoms( &atom::OutputOrder, &file ); 746 751 file.close(); 747 Log() << Verbose(1) << "done." << endl;752 DoLog(1) && (Log() << Verbose(1) << "done." << endl); 748 753 return true; 749 754 } else { 750 Log() << Verbose(1) << "failed to open file " << line.str() << "." << endl;755 DoLog(1) && (Log() << Verbose(1) << "failed to open file " << line.str() << "." << endl); 751 756 return false; 752 757 } … … 769 774 ifstream file; 770 775 771 Log() << Verbose(1) << "Begin of ParseOrderAtSiteFromFile" << endl;776 DoLog(1) && (Log() << Verbose(1) << "Begin of ParseOrderAtSiteFromFile" << endl); 772 777 line << path << "/" << FRAGMENTPREFIX << ORDERATSITEFILE; 773 778 file.open(line.str().c_str()); … … 790 795 SetAtomValueToIndexedArray( MaxArray, &atom::nr, &atom::MaxOrder ); 791 796 792 Log() << Verbose(1) << "done." << endl;797 DoLog(1) && (Log() << Verbose(1) << "done." << endl); 793 798 status = true; 794 799 } else { 795 Log() << Verbose(1) << "failed to open file " << line.str() << "." << endl;800 DoLog(1) && (Log() << Verbose(1) << "failed to open file " << line.str() << "." << endl); 796 801 status = false; 797 802 } … … 799 804 Free(&MaxArray); 800 805 801 Log() << Verbose(1) << "End of ParseOrderAtSiteFromFile" << endl;806 DoLog(1) && (Log() << Verbose(1) << "End of ParseOrderAtSiteFromFile" << endl); 802 807 return status; 803 808 }; … … 816 821 int SP, Removal; 817 822 818 Log() << Verbose(2) << "Looking for removal candidate." << endl;823 DoLog(2) && (Log() << Verbose(2) << "Looking for removal candidate." << endl); 819 824 SP = -1; //0; // not -1, so that Root is never removed 820 825 Removal = -1; … … 843 848 844 849 Leaf->BondDistance = mol->BondDistance; 845 for(int i=NDIM*2;i--;)846 Leaf->cell_size[i] = mol->cell_size[i];847 850 848 851 // first create the minimal set of atoms from the KeySet … … 903 906 } 904 907 } else { 905 eLog() << Verbose(1) << "Son " << Runner->Name << " has father " << FatherOfRunner->Name << " but its entry in SonList is " << SonList[FatherOfRunner->nr] << "!" << endl;908 DoeLog(1) && (eLog()<< Verbose(1) << "Son " << Runner->Name << " has father " << FatherOfRunner->Name << " but its entry in SonList is " << SonList[FatherOfRunner->nr] << "!" << endl); 906 909 } 907 910 if ((LonelyFlag) && (Leaf->AtomCount > 1)) { 908 Log() << Verbose(0) << *Runner << "has got bonds only to hydrogens!" << endl;911 DoLog(0) && (Log() << Verbose(0) << *Runner << "has got bonds only to hydrogens!" << endl); 909 912 } 910 913 #ifdef ADDHYDROGEN … … 1053 1056 TouchedList[j] = -1; 1054 1057 } 1055 Log() << Verbose(2) << "Remaining local nr.s on snake stack are: ";1058 DoLog(2) && (Log() << Verbose(2) << "Remaining local nr.s on snake stack are: "); 1056 1059 for(KeySet::iterator runner = FragmentSet->begin(); runner != FragmentSet->end(); runner++) 1057 Log() << Verbose(0) << (*runner) << " ";1058 Log() << Verbose(0) << endl;1060 DoLog(0) && (Log() << Verbose(0) << (*runner) << " "); 1061 DoLog(0) && (Log() << Verbose(0) << endl); 1059 1062 TouchedIndex = 0; // set Index to 0 for list of atoms added on this level 1060 1063 }; … … 1133 1136 Log() << Verbose(1+verbosity) << "Enough items on stack for a fragment!" << endl; 1134 1137 // store fragment as a KeySet 1135 Log() << Verbose(2) << "Found a new fragment[" << FragmentSearch->FragmentCounter << "], local nr.s are: ";1138 DoLog(2) && (Log() << Verbose(2) << "Found a new fragment[" << FragmentSearch->FragmentCounter << "], local nr.s are: "); 1136 1139 for(KeySet::iterator runner = FragmentSearch->FragmentSet->begin(); runner != FragmentSearch->FragmentSet->end(); runner++) 1137 Log() << Verbose(0) << (*runner) << " ";1138 Log() << Verbose(0) << endl;1140 DoLog(0) && (Log() << Verbose(0) << (*runner) << " "); 1141 DoLog(0) && (Log() << Verbose(0) << endl); 1139 1142 //if (!CheckForConnectedSubgraph(FragmentSearch->FragmentSet)) 1140 // eLog() << Verbose(1) << "The found fragment is not a connected subgraph!" << endl;1143 //DoeLog(1) && (eLog()<< Verbose(1) << "The found fragment is not a connected subgraph!" << endl); 1141 1144 InsertFragmentIntoGraph(FragmentSearch); 1142 1145 } … … 1218 1221 { 1219 1222 bond *Binder = NULL; 1220 Log() << Verbose(0) << "Free'ing all found lists. and resetting index lists" << endl;1223 DoLog(0) && (Log() << Verbose(0) << "Free'ing all found lists. and resetting index lists" << endl); 1221 1224 for(int i=Order;i--;) { 1222 Log() << Verbose(1) << "Current SP level is " << i << ": ";1225 DoLog(1) && (Log() << Verbose(1) << "Current SP level is " << i << ": "); 1223 1226 Binder = FragmentSearch.BondsPerSPList[2*i]; 1224 1227 while (Binder->next != FragmentSearch.BondsPerSPList[2*i+1]) { … … 1231 1234 cleanup(FragmentSearch.BondsPerSPList[2*i], FragmentSearch.BondsPerSPList[2*i+1]); 1232 1235 // also start and end node 1233 Log() << Verbose(0) << "cleaned." << endl;1236 DoLog(0) && (Log() << Verbose(0) << "cleaned." << endl); 1234 1237 } 1235 1238 }; … … 1261 1264 int SP = -1; 1262 1265 1263 Log() << Verbose(0) << "Starting BFS analysis ..." << endl;1266 DoLog(0) && (Log() << Verbose(0) << "Starting BFS analysis ..." << endl); 1264 1267 for (SP = 0; SP < (Order-1); SP++) { 1265 Log() << Verbose(1) << "New SP level reached: " << SP << ", creating new SP list with " << FragmentSearch.BondsPerSPCount[SP] << " item(s)";1268 DoLog(1) && (Log() << Verbose(1) << "New SP level reached: " << SP << ", creating new SP list with " << FragmentSearch.BondsPerSPCount[SP] << " item(s)"); 1266 1269 if (SP > 0) { 1267 Log() << Verbose(0) << ", old level closed with " << FragmentSearch.BondsPerSPCount[SP-1] << " item(s)." << endl;1270 DoLog(0) && (Log() << Verbose(0) << ", old level closed with " << FragmentSearch.BondsPerSPCount[SP-1] << " item(s)." << endl); 1268 1271 FragmentSearch.BondsPerSPCount[SP] = 0; 1269 1272 } else 1270 Log() << Verbose(0) << "." << endl;1273 DoLog(0) && (Log() << Verbose(0) << "." << endl); 1271 1274 1272 1275 RemainingWalkers = FragmentSearch.BondsPerSPCount[SP]; … … 1278 1281 Predecessor = CurrentEdge->leftatom; // ... and leftatom is predecessor 1279 1282 AtomKeyNr = Walker->nr; 1280 Log() << Verbose(0) << "Current Walker is: " << *Walker << " with nr " << Walker->nr << " and SP of " << SP << ", with " << RemainingWalkers << " remaining walkers on this level." << endl;1283 DoLog(0) && (Log() << Verbose(0) << "Current Walker is: " << *Walker << " with nr " << Walker->nr << " and SP of " << SP << ", with " << RemainingWalkers << " remaining walkers on this level." << endl); 1281 1284 // check for new sp level 1282 1285 // go through all its bonds 1283 Log() << Verbose(1) << "Going through all bonds of Walker." << endl;1286 DoLog(1) && (Log() << Verbose(1) << "Going through all bonds of Walker." << endl); 1284 1287 for (BondList::const_iterator Runner = Walker->ListOfBonds.begin(); Runner != Walker->ListOfBonds.end(); (++Runner)) { 1285 1288 OtherWalker = (*Runner)->GetOtherAtom(Walker); … … 1289 1292 #endif 1290 1293 ) { // skip hydrogens and restrict to fragment 1291 Log() << Verbose(2) << "Current partner is " << *OtherWalker << " with nr " << OtherWalker->nr << " in bond " << *(*Runner) << "." << endl;1294 DoLog(2) && (Log() << Verbose(2) << "Current partner is " << *OtherWalker << " with nr " << OtherWalker->nr << " in bond " << *(*Runner) << "." << endl); 1292 1295 // set the label if not set (and push on root stack as well) 1293 1296 if ((OtherWalker != Predecessor) && (OtherWalker->GetTrueFather()->nr > RootKeyNr)) { // only pass through those with label bigger than Root's 1294 1297 FragmentSearch.ShortestPathList[OtherWalker->nr] = SP+1; 1295 Log() << Verbose(3) << "Set Shortest Path to " << FragmentSearch.ShortestPathList[OtherWalker->nr] << "." << endl;1298 DoLog(3) && (Log() << Verbose(3) << "Set Shortest Path to " << FragmentSearch.ShortestPathList[OtherWalker->nr] << "." << endl); 1296 1299 // add the bond in between to the SP list 1297 1300 Binder = new bond(Walker, OtherWalker); // create a new bond in such a manner, that bond::rightatom is always the one more distant 1298 1301 add(Binder, FragmentSearch.BondsPerSPList[2*(SP+1)+1]); 1299 1302 FragmentSearch.BondsPerSPCount[SP+1]++; 1300 Log() << Verbose(3) << "Added its bond to SP list, having now " << FragmentSearch.BondsPerSPCount[SP+1] << " item(s)." << endl;1303 DoLog(3) && (Log() << Verbose(3) << "Added its bond to SP list, having now " << FragmentSearch.BondsPerSPCount[SP+1] << " item(s)." << endl); 1301 1304 } else { 1302 1305 if (OtherWalker != Predecessor) 1303 Log() << Verbose(3) << "Not passing on, as index of " << *OtherWalker << " " << OtherWalker->GetTrueFather()->nr << " is smaller than that of Root " << RootKeyNr << "." << endl;1306 DoLog(3) && (Log() << Verbose(3) << "Not passing on, as index of " << *OtherWalker << " " << OtherWalker->GetTrueFather()->nr << " is smaller than that of Root " << RootKeyNr << "." << endl); 1304 1307 else 1305 Log() << Verbose(3) << "This is my predecessor " << *Predecessor << "." << endl;1308 DoLog(3) && (Log() << Verbose(3) << "This is my predecessor " << *Predecessor << "." << endl); 1306 1309 } 1307 1310 } else Log() << Verbose(2) << "Is not in the restricted keyset or skipping hydrogen " << *OtherWalker << "." << endl; … … 1319 1322 { 1320 1323 bond *Binder = NULL; 1321 Log() << Verbose(0) << "Printing all found lists." << endl;1324 DoLog(0) && (Log() << Verbose(0) << "Printing all found lists." << endl); 1322 1325 for(int i=1;i<Order;i++) { // skip the root edge in the printing 1323 1326 Binder = FragmentSearch.BondsPerSPList[2*i]; 1324 Log() << Verbose(1) << "Current SP level is " << i << "." << endl;1327 DoLog(1) && (Log() << Verbose(1) << "Current SP level is " << i << "." << endl); 1325 1328 while (Binder->next != FragmentSearch.BondsPerSPList[2*i+1]) { 1326 1329 Binder = Binder->next; 1327 Log() << Verbose(2) << *Binder << endl;1330 DoLog(2) && (Log() << Verbose(2) << *Binder << endl); 1328 1331 } 1329 1332 } … … 1369 1372 int Counter = FragmentSearch.FragmentCounter; // mark current value of counter 1370 1373 1371 Log() << Verbose(0) << endl;1372 Log() << Verbose(0) << "Begin of PowerSetGenerator with order " << Order << " at Root " << *FragmentSearch.Root << "." << endl;1374 DoLog(0) && (Log() << Verbose(0) << endl); 1375 DoLog(0) && (Log() << Verbose(0) << "Begin of PowerSetGenerator with order " << Order << " at Root " << *FragmentSearch.Root << "." << endl); 1373 1376 1374 1377 SetSPList(Order, FragmentSearch); … … 1382 1385 // creating fragments with the found edge sets (may be done in reverse order, faster) 1383 1386 int SP = CountNumbersInBondsList(Order, FragmentSearch); 1384 Log() << Verbose(0) << "Total number of edges is " << SP << "." << endl;1387 DoLog(0) && (Log() << Verbose(0) << "Total number of edges is " << SP << "." << endl); 1385 1388 if (SP >= (Order-1)) { 1386 1389 // start with root (push on fragment stack) 1387 Log() << Verbose(0) << "Starting fragment generation with " << *FragmentSearch.Root << ", local nr is " << FragmentSearch.Root->nr << "." << endl;1390 DoLog(0) && (Log() << Verbose(0) << "Starting fragment generation with " << *FragmentSearch.Root << ", local nr is " << FragmentSearch.Root->nr << "." << endl); 1388 1391 FragmentSearch.FragmentSet->clear(); 1389 Log() << Verbose(0) << "Preparing subset for this root and calling generator." << endl;1392 DoLog(0) && (Log() << Verbose(0) << "Preparing subset for this root and calling generator." << endl); 1390 1393 1391 1394 // prepare the subset and call the generator … … 1397 1400 Free(&BondsList); 1398 1401 } else { 1399 Log() << Verbose(0) << "Not enough total number of edges to build " << Order << "-body fragments." << endl;1402 DoLog(0) && (Log() << Verbose(0) << "Not enough total number of edges to build " << Order << "-body fragments." << endl); 1400 1403 } 1401 1404 1402 1405 // as FragmentSearch structure is used only once, we don't have to clean it anymore 1403 1406 // remove root from stack 1404 Log() << Verbose(0) << "Removing root again from stack." << endl;1407 DoLog(0) && (Log() << Verbose(0) << "Removing root again from stack." << endl); 1405 1408 FragmentSearch.FragmentSet->erase(FragmentSearch.Root->nr); 1406 1409 … … 1409 1412 1410 1413 // return list 1411 Log() << Verbose(0) << "End of PowerSetGenerator." << endl;1414 DoLog(0) && (Log() << Verbose(0) << "End of PowerSetGenerator." << endl); 1412 1415 return (FragmentSearch.FragmentCounter - Counter); 1413 1416 }; … … 1455 1458 atom *Walker = NULL; 1456 1459 1457 Log() << Verbose(0) << "Combining the lists of all orders per order and finally into a single one." << endl;1460 DoLog(0) && (Log() << Verbose(0) << "Combining the lists of all orders per order and finally into a single one." << endl); 1458 1461 if (FragmentList == NULL) { 1459 1462 FragmentList = new Graph; … … 1488 1491 void FreeAllOrdersList(Graph ***FragmentLowerOrdersList, KeyStack &RootStack, molecule *mol) 1489 1492 { 1490 Log() << Verbose(1) << "Free'ing the lists of all orders per order." << endl;1493 DoLog(1) && (Log() << Verbose(1) << "Free'ing the lists of all orders per order." << endl); 1491 1494 int RootNr = 0; 1492 1495 int RootKeyNr = 0; … … 1541 1544 struct UniqueFragments FragmentSearch; 1542 1545 1543 Log() << Verbose(0) << "Begin of FragmentBOSSANOVA." << endl;1546 DoLog(0) && (Log() << Verbose(0) << "Begin of FragmentBOSSANOVA." << endl); 1544 1547 1545 1548 // FragmentLowerOrdersList is a 2D-array of pointer to MoleculeListClass objects, one dimension represents the ANOVA expansion of a single order (i.e. 5) … … 1591 1594 1592 1595 // create top order where nothing is reduced 1593 Log() << Verbose(0) << "==============================================================================================================" << endl;1594 Log() << Verbose(0) << "Creating KeySets of Bond Order " << Order << " for " << *Walker << ", " << (RootStack.size()-RootNr) << " Roots remaining." << endl; // , NumLevels is " << NumLevels << "1596 DoLog(0) && (Log() << Verbose(0) << "==============================================================================================================" << endl); 1597 DoLog(0) && (Log() << Verbose(0) << "Creating KeySets of Bond Order " << Order << " for " << *Walker << ", " << (RootStack.size()-RootNr) << " Roots remaining." << endl); // , NumLevels is " << NumLevels << " 1595 1598 1596 1599 // Create list of Graphs of current Bond Order (i.e. F_{ij}) … … 1602 1605 1603 1606 // output resulting number 1604 Log() << Verbose(1) << "Number of resulting KeySets is: " << NumMoleculesOfOrder[RootNr] << "." << endl;1607 DoLog(1) && (Log() << Verbose(1) << "Number of resulting KeySets is: " << NumMoleculesOfOrder[RootNr] << "." << endl); 1605 1608 if (NumMoleculesOfOrder[RootNr] != 0) { 1606 1609 NumMolecules = 0; … … 1619 1622 } 1620 1623 } 1621 Log() << Verbose(0) << "==============================================================================================================" << endl;1622 Log() << Verbose(1) << "Total number of resulting molecules is: " << TotalNumMolecules << "." << endl;1623 Log() << Verbose(0) << "==============================================================================================================" << endl;1624 DoLog(0) && (Log() << Verbose(0) << "==============================================================================================================" << endl); 1625 DoLog(1) && (Log() << Verbose(1) << "Total number of resulting molecules is: " << TotalNumMolecules << "." << endl); 1626 DoLog(0) && (Log() << Verbose(0) << "==============================================================================================================" << endl); 1624 1627 1625 1628 // cleanup FragmentSearch structure … … 1639 1642 Free(&NumMoleculesOfOrder); 1640 1643 1641 Log() << Verbose(0) << "End of FragmentBOSSANOVA." << endl;1644 DoLog(0) && (Log() << Verbose(0) << "End of FragmentBOSSANOVA." << endl); 1642 1645 }; 1643 1646 … … 1654 1657 atom *Walker = NULL; 1655 1658 atom *OtherWalker = NULL; 1659 double * const cell_size = World::get()->cell_size; 1656 1660 double *matrix = ReturnFullMatrixforSymmetric(cell_size); 1657 1661 enum Shading *ColorList = NULL; … … 1662 1666 bool flag = true; 1663 1667 1664 Log() << Verbose(2) << "Begin of ScanForPeriodicCorrection." << endl;1668 DoLog(2) && (Log() << Verbose(2) << "Begin of ScanForPeriodicCorrection." << endl); 1665 1669 1666 1670 ColorList = Calloc<enum Shading>(AtomCount, "molecule::ScanForPeriodicCorrection: *ColorList"); … … 1680 1684 OtherBinder = Binder->next; // note down binding partner for later re-insertion 1681 1685 unlink(Binder); // unlink bond 1682 Log() << Verbose(2) << "Correcting at bond " << *Binder << "." << endl;1686 DoLog(2) && (Log() << Verbose(2) << "Correcting at bond " << *Binder << "." << endl); 1683 1687 flag = true; 1684 1688 break; … … 1696 1700 //Log() << Verbose(3) << "Translation vector is "; 1697 1701 Translationvector.Output(); 1698 Log() << Verbose(0) << endl;1702 DoLog(0) && (Log() << Verbose(0) << endl); 1699 1703 // apply to all atoms of first component via BFS 1700 1704 for (int i=AtomCount;i--;) … … 1718 1722 link(Binder, OtherBinder); 1719 1723 } else { 1720 Log() << Verbose(3) << "No corrections for this fragment." << endl;1724 DoLog(3) && (Log() << Verbose(3) << "No corrections for this fragment." << endl); 1721 1725 } 1722 1726 //delete(CompStack); … … 1727 1731 Free(&ColorList); 1728 1732 Free(&matrix); 1729 Log() << Verbose(2) << "End of ScanForPeriodicCorrection." << endl;1730 }; 1733 DoLog(2) && (Log() << Verbose(2) << "End of ScanForPeriodicCorrection." << endl); 1734 };
Note:
See TracChangeset
for help on using the changeset viewer.