[96c961] | 1 | /*
|
---|
| 2 | * analysis_bonds.cpp
|
---|
| 3 | *
|
---|
| 4 | * Created on: Nov 7, 2009
|
---|
| 5 | * Author: heber
|
---|
| 6 | */
|
---|
| 7 |
|
---|
[220cf37] | 8 | #include "analysis_bonds.hpp"
|
---|
| 9 | #include "atom.hpp"
|
---|
| 10 | #include "bond.hpp"
|
---|
| 11 | #include "log.hpp"
|
---|
| 12 | #include "molecule.hpp"
|
---|
| 13 |
|
---|
| 14 | /** Calculates the min, mean and maximum bond counts for the given molecule.
|
---|
| 15 | * \param *mol molecule with atoms and atom::ListOfBonds
|
---|
| 16 | * \param &Min minimum count on return
|
---|
| 17 | * \param &Mean mean count on return
|
---|
| 18 | * \param &Max maximum count on return
|
---|
| 19 | */
|
---|
| 20 | void GetMaxMinMeanBondCount(const molecule * const mol, double &Min, double &Mean, double &Max)
|
---|
| 21 | {
|
---|
| 22 | Min = 2e+6;
|
---|
| 23 | Max = -2e+5;
|
---|
| 24 | Mean = 0.;
|
---|
| 25 |
|
---|
| 26 | int AtomCount = 0;
|
---|
[9879f6] | 27 | for (molecule::const_iterator iter = mol->begin(); iter != mol->end(); ++iter) {
|
---|
| 28 | const int count = (*iter)->ListOfBonds.size();
|
---|
[220cf37] | 29 | if (Max < count)
|
---|
| 30 | Max = count;
|
---|
| 31 | if (Min > count)
|
---|
| 32 | Min = count;
|
---|
| 33 | Mean += count;
|
---|
| 34 | AtomCount++;
|
---|
| 35 | }
|
---|
| 36 | if (((int)Mean % 2) != 0)
|
---|
| 37 | eLog() << Verbose(1) << "Something is wrong with the bond structure, the number of bonds is not even!" << endl;
|
---|
| 38 | Mean /= (double)AtomCount;
|
---|
| 39 | };
|
---|
| 40 |
|
---|
| 41 | /** Calculates the min and max bond distance of all atoms of two given elements.
|
---|
| 42 | * \param *mol molecule with atoms
|
---|
| 43 | * \param *type1 one element
|
---|
| 44 | * \param *type2 other element
|
---|
| 45 | * \param &Min minimum distance on return, 0 if no bond between the two elements
|
---|
| 46 | * \param &Mean mean distance (i.e. sum of distance for matching element pairs, divided by number) on return, 0 if no bond between the two elements
|
---|
| 47 | * \param &Max maximum distance on return, 0 if no bond between the two elements
|
---|
| 48 | */
|
---|
| 49 | void MinMeanMaxBondDistanceBetweenElements(const molecule *mol, element *type1, element *type2, double &Min, double &Mean, double &Max)
|
---|
| 50 | {
|
---|
| 51 | Min = 2e+6;
|
---|
| 52 | Mean = 0.;
|
---|
| 53 | Max = -2e+6;
|
---|
| 54 |
|
---|
| 55 | int AtomNo = 0;
|
---|
[9879f6] | 56 | for (molecule::const_iterator iter = mol->begin(); iter != mol->end(); ++iter) {
|
---|
| 57 | if ((*iter)->type == type1)
|
---|
| 58 | for (BondList::const_iterator BondRunner = (*iter)->ListOfBonds.begin(); BondRunner != (*iter)->ListOfBonds.end(); BondRunner++)
|
---|
| 59 | if ((*BondRunner)->GetOtherAtom((*iter))->type == type2) {
|
---|
[220cf37] | 60 | const double distance = (*BondRunner)->GetDistanceSquared();
|
---|
| 61 | if (Min > distance)
|
---|
| 62 | Min = distance;
|
---|
| 63 | if (Max < distance)
|
---|
| 64 | Max = distance;
|
---|
| 65 | Mean += sqrt(distance);
|
---|
| 66 | AtomNo++;
|
---|
| 67 | }
|
---|
| 68 | }
|
---|
| 69 | if (Max < 0) {
|
---|
| 70 | Max = Min = 0.;
|
---|
| 71 | } else {
|
---|
| 72 | Max = sqrt(Max);
|
---|
| 73 | Min = sqrt(Min);
|
---|
| 74 | Mean = Mean/(double)AtomNo;
|
---|
| 75 | }
|
---|
| 76 | };
|
---|