Changeset 47548d for molecuilder/src/molecules.cpp

Timestamp:

Jul 23, 2009, 2:04:47 PM (16 years ago)

Author:

Frederik Heber <heber@…>

Children:

c3a303

Parents:

f39735 (diff), 1f6efb (diff)
Note: this is a merge changeset, the changes displayed below correspond to the merge itself.
Use the (diff) links above to see all the changes relative to each parent.

Message:

Merge branch 'AtomRemoval'

Conflicts:

molecuilder/src/builder.cpp
molecuilder/src/molecules.cpp

merges:

• builder.cpp: case 'R' in ParseCommandLineOptions from AtomRemoval, also bugfix in RemoveAtoms(), rest from HEAD
• molecules.cpp: Basically all from HEAD because of MultipleMolecules and ConstrainedMD

File:

• molecuilder/src/molecules.cpp (modified) (7 diffs)

molecuilder/src/molecules.cpp

@@ -1860 +1860 @@
 bool molecule::RemoveAtom(atom *pointer)
 {
-  if (ElementsInMolecule[pointer->type->Z] != 0)  // this would indicate an error
+  if (ElementsInMolecule[pointer->type->Z] != 0)  { // this would indicate an error
     ElementsInMolecule[pointer->type->Z]--;  // decrease number of atom of this element
-  else
+    AtomCount--;
+  } else
     cerr << "ERROR: Atom " << pointer->Name << " is of element " << pointer->type->Z << " but the entry in the table of the molecule is 0!" << endl;
   if (ElementsInMolecule[pointer->type->Z] == 0)  // was last atom of this element?
@@ -2845 +2846 @@
     ColorList[i] = white;
   }
-  
+
   *out << Verbose(1) << "Back edge list - ";
   BackEdgeStack->Output(out);
@@ -3852 +3853 @@
         OtherAtom = ListOfBondsPerAtom[Walker->nr][i]->GetOtherAtom(Walker);
         if (OtherAtom == ListOfLocalAtoms[Binder->rightatom->nr]) { // found the bond
-            LocalStack->Push(ListOfBondsPerAtom[Walker->nr][i]);
-                *out << Verbose(3) << "Found local edge " << *(ListOfBondsPerAtom[Walker->nr][i]) << "." << endl;
+          LocalStack->Push(ListOfBondsPerAtom[Walker->nr][i]);
+          *out << Verbose(3) << "Found local edge " << *(ListOfBondsPerAtom[Walker->nr][i]) << "." << endl;
           break;
         }
@@ -3861 +3862 @@
     ReferenceStack->Push(Binder);
   } while (FirstBond != Binder);
-  
+
   return status;
 };
@@ -4006 +4007 @@
   Walker = start;
   while (Walker->next != end) {
-    Walker = Walker->next; 
+    Walker = Walker->next;
     *out << Verbose(4) << "Atom " << Walker->Name << "/" << Walker->nr << " with " << NumberOfBondsPerAtom[Walker->nr] << " bonds: ";
     TotalDegree = 0;
@@ -4365 +4366 @@
 #ifdef ADDHYDROGEN
    && (Walker->type->Z == 1)
-#endif
-                        ) { // search for first non-hydrogen atom
-    *out << Verbose(4) << "Current Root candidate is " << Walker->Name << "." << endl;
-    Walker = Walker->next;
-  }
-  if (Walker != end)
-    RootStack->Push(Walker);
-  else
-    *out << Verbose(0) << "ERROR: Could not find an appropriate Root atom!" << endl;
-  *out << Verbose(3) << "Root " << Walker->Name << " is on AtomStack, beginning loop through all vertices ..." << endl;
-
-  ///// OUTER LOOP ////////////
-  while (!RootStack->IsEmpty()) {
-    // get new root vertex from atom stack
-    Root = RootStack->PopFirst();
-    ShortestPathList[Root->nr] = 0;
-    if (Labels[Root->nr] == -1)
-      Labels[Root->nr] = RunningIndex++; // prevent it from getting again on AtomStack
-    PredecessorList[Root->nr] = Root;
-    TouchedStack->Push(Root);
-    *out << Verbose(0) << "Root for this loop is: " << Root->Name << ".\n";
-
-    // clear snake stack
-    SnakeStack->ClearStack();
-    //SnakeStack->TestImplementation(out, start->next);
-
-    ///// INNER LOOP ////////////
-    // Problems:
-    // - what about cyclic bonds?
-    Walker = Root;
-    do {
-      *out << Verbose(1) << "Current Walker is: " << Walker->Name;
-      // initial setting of the new Walker: label, color, shortest path and put on stacks
-      if (Labels[Walker->nr] == -1)  {  // give atom a unique, monotonely increasing number
-        Labels[Walker->nr] = RunningIndex++;
-        RootStack->Push(Walker);
-      }
-      *out << ", has label " << Labels[Walker->nr];
-      if ((ColorVertexList[Walker->nr] == white) || ((Binder != NULL) && (ColorEdgeList[Binder->nr] == white))) {  // color it if newly discovered and push on stacks (and if within reach!)
-        if ((Binder != NULL) && (ColorEdgeList[Binder->nr] == white)) {
-          // Binder ought to be set still from last neighbour search
-          *out << ", coloring bond " << *Binder << " black";
-          ColorEdgeList[Binder->nr] = black; // mark this bond as used
-        }
-        if (ShortestPathList[Walker->nr] == -1) {
-          ShortestPathList[Walker->nr] = ShortestPathList[PredecessorList[Walker->nr]->nr]+1;
-          TouchedStack->Push(Walker); // mark every atom for lists cleanup later, whose shortest path has been changed
-        }
-        if ((ShortestPathList[Walker->nr] < Order) && (ColorVertexList[Walker->nr] != darkgray)) {  // if not already on snake stack
-          SnakeStack->Push(Walker);
-          ColorVertexList[Walker->nr] = darkgray; // mark as dark gray of on snake stack
         }
       }
@@ -4452 +4402 @@
             } else { // otherwise check its colour and element
               if (
-#ifdef ADDHYDROGEN
               (OtherAtom->type->Z != 1) &&
 #endif