Changeset d473c3 for molecuilder/src/molecules.cpp
- Timestamp:
- Sep 6, 2008, 3:08:32 PM (17 years ago)
- Children:
- b21e1f
- Parents:
- f9cd68
- File:
-
- 1 edited
-
molecuilder/src/molecules.cpp (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
molecuilder/src/molecules.cpp
rf9cd68 rd473c3 720 720 } 721 721 }; 722 723 /** Returns vector pointing to center of gravity. 724 * \param *out output stream for debugging 725 * \return pointer to center of gravity vector 726 */ 727 Vector * molecule::DetermineCenterOfAll(ofstream *out) 728 { 729 atom *ptr = start->next; // start at first in list 730 Vector *a = new Vector(); 731 Vector tmp; 732 double Num = 0; 733 734 a->Zero(); 735 736 if (ptr != end) { //list not empty? 737 while (ptr->next != end) { // continue with second if present 738 ptr = ptr->next; 739 Num += 1.; 740 tmp.CopyVector(&ptr->x); 741 a->AddVector(&tmp); 742 } 743 a->Scale(-1./Num); // divide through total mass (and sign for direction) 744 } 745 //cout << Verbose(1) << "Resulting center of gravity: "; 746 //a->Output(out); 747 //cout << endl; 748 return a; 749 }; 722 750 723 751 /** Returns vector pointing to center of gravity.
Note:
See TracChangeset
for help on using the changeset viewer.
