applications/staticProps/RippleOP.cpp

/*
 * Copyright (c) 2005 The University of Notre Dame. All Rights Reserved.
 *
 * The University of Notre Dame grants you ("Licensee") a
 * non-exclusive, royalty free, license to use, modify and
 * redistribute this software in source and binary code form, provided
 * that the following conditions are met:
 *
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 *
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the
 *    distribution.
 *
 * This software is provided "AS IS," without a warranty of any
 * kind. All express or implied conditions, representations and
 * warranties, including any implied warranty of merchantability,
 * fitness for a particular purpose or non-infringement, are hereby
 * excluded.  The University of Notre Dame and its licensors shall not
 * be liable for any damages suffered by licensee as a result of
 * using, modifying or distributing the software or its
 * derivatives. In no event will the University of Notre Dame or its
 * licensors be liable for any lost revenue, profit or data, or for
 * direct, indirect, special, consequential, incidental or punitive
 * damages, however caused and regardless of the theory of liability,
 * arising out of the use of or inability to use software, even if the
 * University of Notre Dame has been advised of the possibility of
 * such damages.
 *
 * SUPPORT OPEN SCIENCE!  If you use OpenMD or its source code in your
 * research, please cite the appropriate papers when you publish your
 * work.  Good starting points are:
 *                                                                      
 * [1]  Meineke, et al., J. Comp. Chem. 26, 252-271 (2005).             
 * [2]  Fennell & Gezelter, J. Chem. Phys. 124, 234104 (2006).          
 * [3]  Sun, Lin & Gezelter, J. Chem. Phys. 128, 24107 (2008).          
 * [4]  Kuang & Gezelter,  J. Chem. Phys. 133, 164101 (2010).
 * [5]  Vardeman, Stocker & Gezelter, J. Chem. Theory Comput. 7, 834 (2011).
 */

#include "applications/staticProps/RippleOP.hpp"
#include "utils/simError.h"
#include "io/DumpReader.hpp"
#include "primitives/Molecule.hpp"
#include "utils/NumericConstant.hpp"
namespace OpenMD {


  RippleOP::RippleOP(SimInfo* info, const std::string& filename, const std::string& sele1, const std::string& sele2)
    : StaticAnalyser(info, filename),
      selectionScript1_(sele1), selectionScript2_(sele2), evaluator1_(info), evaluator2_(info), 
      seleMan1_(info), seleMan2_(info){
    
    setOutputName(getPrefix(filename) + ".rp2");
    
    evaluator1_.loadScriptString(sele1);
    evaluator2_.loadScriptString(sele2);
    
    if (!evaluator1_.isDynamic()) {
      seleMan1_.setSelectionSet(evaluator1_.evaluate());
    }else {
      sprintf( painCave.errMsg,
               "--sele1 must be static selection\n");
      painCave.severity = OPENMD_ERROR;
      painCave.isFatal = 1;
      simError();  
    }
    
    if (!evaluator2_.isDynamic()) {
      seleMan2_.setSelectionSet(evaluator2_.evaluate());
    }else {
      sprintf( painCave.errMsg,
               "--sele2 must be static selection\n");
      painCave.severity = OPENMD_ERROR;
      painCave.isFatal = 1;
      simError();  
    }
    
    if (seleMan1_.getSelectionCount() != seleMan2_.getSelectionCount() ) {
      sprintf( painCave.errMsg,
               "The number of selected Stuntdoubles are not the same in --sele1 and sele2\n");
      painCave.severity = OPENMD_ERROR;
      painCave.isFatal = 1;
      simError();  

    }
    
    int i;
    int j;
    StuntDouble* sd1;
    StuntDouble* sd2;
    for (sd1 = seleMan1_.beginSelected(i), sd2 = seleMan2_.beginSelected(j);
     sd1 != NULL && sd2 != NULL;
         sd1 = seleMan1_.nextSelected(i), sd2 = seleMan2_.nextSelected(j)) {
      
      sdPairs_.push_back(std::make_pair(sd1, sd2));
    }
    
  }
  
  void RippleOP::process() {
    Molecule* mol;
    RigidBody* rb;
    SimInfo::MoleculeIterator mi;
    Molecule::RigidBodyIterator rbIter;

    StuntDouble* j1;
    StuntDouble* j2;
    StuntDouble* sd3;
  
    DumpReader reader(info_, dumpFilename_);    
    int nFrames = reader.getNFrames();

    for (int i = 0; i < nFrames; i += step_) {
      reader.readFrame(i);
      currentSnapshot_ = info_->getSnapshotManager()->getCurrentSnapshot();
      int nMolecules = info_->getNGlobalMolecules();
      int i1;
      int nUpper=0;
      int nLower=0;
      int nTail=0;
      RealType sumZ = 0.0;
      
      for (mol = info_->beginMolecule(mi); mol != NULL; mol = info_->nextMolecule(mi)) {
        //change the positions of atoms which belong to the rigidbodies
        for (rb = mol->beginRigidBody(rbIter); rb != NULL; rb = mol->nextRigidBody(rbIter)) {
          rb->updateAtoms();
        }
      }      

      for (sd3 = seleMan2_.beginSelected(i1); sd3 != NULL; sd3 = seleMan2_.nextSelected(i1)) {
        Vector3d pos1 = sd3->getPos();
        if (usePeriodicBoundaryConditions_)
          currentSnapshot_->wrapVector(pos1);
        sd3->setPos(pos1);
      }

      for (sd3 = seleMan2_.beginSelected(i1); sd3 != NULL; sd3 = seleMan2_.nextSelected(i1)) {
        Vector3d pos1 = sd3->getPos();
        sumZ += pos1.z();
      }
      RealType avgZ = sumZ / (RealType) nMolecules;
      
      Mat3x3d orderTensorHeadUpper(0.0), orderTensorTail(0.0), orderTensorHeadLower(0.0);
      //      for (std::vector<std::pair<StuntDouble*, StuntDouble*> >::iterator j = sdPairs_.begin(); j != sdPairs_.end(); ++j) {
      for (j1 = seleMan1_.beginSelected(i1); j1 != NULL; j1 = seleMan1_.nextSelected(i1)) {
        Vector3d pos = j1->getPos();
        if (usePeriodicBoundaryConditions_)
          currentSnapshot_->wrapVector(pos);
        Vector3d vecHeadUpper;
        if (pos.z() >= avgZ){
          vecHeadUpper = j1->getElectroFrame().getColumn(2);
          nUpper++;
        }
        Vector3d vecHeadLower;
        if (pos.z() <= avgZ){
          vecHeadLower = j1->getElectroFrame().getColumn(2);
          nLower++;
        }
        orderTensorHeadUpper +=outProduct(vecHeadUpper, vecHeadUpper);
        orderTensorHeadLower +=outProduct(vecHeadLower, vecHeadLower);
      }
      for (j2 = seleMan2_.beginSelected(i1); j2 != NULL; j2 = seleMan2_.nextSelected(i1)) {
        // The lab frame vector corresponding to the body-fixed 
        // z-axis is simply the second column of A.transpose()
        // or, identically, the second row of A itself.

        Vector3d vecTail = j2->getA().getRow(2);
        orderTensorTail +=outProduct(vecTail, vecTail);
        nTail++;
      }
      
      orderTensorHeadUpper /= (RealType) nUpper;
      orderTensorHeadLower /= (RealType) nLower;
      orderTensorHeadUpper -= (RealType)(1.0/3.0) * Mat3x3d::identity();  
      orderTensorHeadLower -= (RealType)(1.0/3.0) * Mat3x3d::identity();  
      
      orderTensorTail /= (RealType) nTail;
      orderTensorTail -= (RealType)(1.0/3.0) * Mat3x3d::identity();  
      
      Vector3d eigenvaluesHeadUpper, eigenvaluesHeadLower, eigenvaluesTail;
      Mat3x3d eigenvectorsHeadUpper, eigenvectorsHeadLower, eigenvectorsTail;    
      Mat3x3d::diagonalize(orderTensorHeadUpper, eigenvaluesHeadUpper, eigenvectorsHeadUpper);
      Mat3x3d::diagonalize(orderTensorHeadLower, eigenvaluesHeadLower, eigenvectorsHeadLower);
      Mat3x3d::diagonalize(orderTensorTail, eigenvaluesTail, eigenvectorsTail);
      
      int whichUpper, whichLower, whichTail;
      RealType maxEvalUpper = 0.0;
      RealType maxEvalLower = 0.0;
      RealType maxEvalTail = 0.0;
      for(int k = 0; k< 3; k++){
        if(fabs(eigenvaluesHeadUpper[k]) > maxEvalUpper){
          whichUpper = k;
          maxEvalUpper = fabs(eigenvaluesHeadUpper[k]);
        }
      }
      RealType p2HeadUpper = 1.5 * maxEvalUpper;
      for(int k = 0; k< 3; k++){
        if(fabs(eigenvaluesHeadLower[k]) > maxEvalLower){
          whichLower = k;
          maxEvalLower = fabs(eigenvaluesHeadLower[k]);
        }
      }
      RealType p2HeadLower = 1.5 * maxEvalLower;
      for(int k = 0; k< 3; k++){
        if(fabs(eigenvaluesTail[k]) > maxEvalTail){
          whichTail = k;
          maxEvalTail = fabs(eigenvaluesTail[k]);
        }
      }
      RealType p2Tail = 1.5 * maxEvalTail;
      
      //the eigen vector is already normalized in SquareMatrix3::diagonalize
      Vector3d directorHeadUpper = eigenvectorsHeadUpper.getColumn(whichUpper);
      if (directorHeadUpper[0] < 0) {
        directorHeadUpper.negate();
      }
      Vector3d directorHeadLower = eigenvectorsHeadLower.getColumn(whichLower);
      if (directorHeadLower[0] < 0) {
        directorHeadLower.negate();
      }
      Vector3d directorTail = eigenvectorsTail.getColumn(whichTail);
      if (directorTail[0] < 0) {
        directorTail.negate();
      }   

      OrderParam paramHeadUpper, paramHeadLower, paramTail;
      paramHeadUpper.p2 = p2HeadUpper;
      paramHeadUpper.director = directorHeadUpper;
      paramHeadLower.p2 = p2HeadLower;
      paramHeadLower.director = directorHeadLower;
      paramTail.p2 = p2Tail;
      paramTail.director = directorTail;
      
      orderParamsHeadUpper_.push_back(paramHeadUpper);
      orderParamsHeadLower_.push_back(paramHeadLower);
      orderParamsTail_.push_back(paramTail);       
      
    }

    OrderParam sumOPHeadUpper, errsumOPHeadUpper;
    OrderParam sumOPHeadLower, errsumOPHeadLower;
    OrderParam sumOPTail, errsumOPTail;

    sumOPHeadUpper.p2 = 0.0;
    errsumOPHeadUpper.p2 = 0.0;
    sumOPHeadLower.p2 = 0.0;
    errsumOPHeadLower.p2 = 0.0;
    for (std::size_t i = 0; i < orderParamsHeadUpper_.size(); ++i) {
      sumOPHeadUpper.p2 += orderParamsHeadUpper_[i].p2;
      sumOPHeadUpper.director[0] += orderParamsHeadUpper_[i].director[0];
      sumOPHeadUpper.director[1] += orderParamsHeadUpper_[i].director[1];
      sumOPHeadUpper.director[2] += orderParamsHeadUpper_[i].director[2];
    }

    avgOPHeadUpper.p2 = sumOPHeadUpper.p2 / (RealType)orderParamsHeadUpper_.size();
    avgOPHeadUpper.director[0] = sumOPHeadUpper.director[0] / (RealType)orderParamsHeadUpper_.size();
    avgOPHeadUpper.director[1] = sumOPHeadUpper.director[1] / (RealType)orderParamsHeadUpper_.size();
    avgOPHeadUpper.director[2] = sumOPHeadUpper.director[2] / (RealType)orderParamsHeadUpper_.size();
    for (std::size_t i = 0; i < orderParamsHeadUpper_.size(); ++i) {
      errsumOPHeadUpper.p2 += pow((orderParamsHeadUpper_[i].p2 - avgOPHeadUpper.p2), 2);
    }
    errOPHeadUpper.p2 = sqrt(errsumOPHeadUpper.p2 / (RealType)orderParamsHeadUpper_.size());
    for (std::size_t i = 0; i < orderParamsHeadLower_.size(); ++i) {
      sumOPHeadLower.p2 += orderParamsHeadLower_[i].p2;
      sumOPHeadLower.director[0] += orderParamsHeadLower_[i].director[0];
      sumOPHeadLower.director[1] += orderParamsHeadLower_[i].director[1];
      sumOPHeadLower.director[2] += orderParamsHeadLower_[i].director[2];
    }

    avgOPHeadLower.p2 = sumOPHeadLower.p2 / (RealType)orderParamsHeadLower_.size();
    avgOPHeadLower.director[0] = sumOPHeadLower.director[0] / (RealType)orderParamsHeadLower_.size();
    avgOPHeadLower.director[1] = sumOPHeadLower.director[1] / (RealType)orderParamsHeadLower_.size();
    avgOPHeadLower.director[2] = sumOPHeadLower.director[2] / (RealType)orderParamsHeadLower_.size();
    for (std::size_t i = 0; i < orderParamsHeadLower_.size(); ++i) {
      errsumOPHeadLower.p2 += pow((orderParamsHeadLower_[i].p2 - avgOPHeadLower.p2), 2);
    }
    errOPHeadLower.p2 = sqrt(errsumOPHeadLower.p2 / (RealType)orderParamsHeadLower_.size());

    sumOPTail.p2 = 0.0;
    errsumOPTail.p2 = 0.0;
    for (std::size_t i = 0; i < orderParamsTail_.size(); ++i) {
      sumOPTail.p2 += orderParamsTail_[i].p2;
      sumOPTail.director[0] += orderParamsTail_[i].director[0];
      sumOPTail.director[1] += orderParamsTail_[i].director[1];
      sumOPTail.director[2] += orderParamsTail_[i].director[2];
    }

    avgOPTail.p2 = sumOPTail.p2 / (RealType)orderParamsTail_.size();
    avgOPTail.director[0] = sumOPTail.director[0] / (RealType)orderParamsTail_.size();
    avgOPTail.director[1] = sumOPTail.director[1] / (RealType)orderParamsTail_.size();
    avgOPTail.director[2] = sumOPTail.director[2] / (RealType)orderParamsTail_.size();
    for (std::size_t i = 0; i < orderParamsTail_.size(); ++i) {
      errsumOPTail.p2 += pow((orderParamsTail_[i].p2 - avgOPTail.p2), 2);
    }
    errOPTail.p2 = sqrt(errsumOPTail.p2 / (RealType)orderParamsTail_.size());
    
    writeP2();
    
  }
  
  void RippleOP::writeP2() {
    
    std::ofstream os(getOutputFileName().c_str());
    os<< "#selection1: (" << selectionScript1_ << ")\n";
    os << "#p2\terror\tdirector_x\tdirector_y\tdiretor_z\n";    
    
    os <<  avgOPHeadUpper.p2 << "\t"
       <<  errOPHeadUpper.p2 << "\t"
       <<  avgOPHeadUpper.director[0] << "\t"
       <<  avgOPHeadUpper.director[1] << "\t"
       <<  avgOPHeadUpper.director[2] << "\n";

    os <<  avgOPHeadLower.p2 << "\t"
       <<  errOPHeadLower.p2 << "\t"
       <<  avgOPHeadLower.director[0] << "\t"
       <<  avgOPHeadLower.director[1] << "\t"
       <<  avgOPHeadLower.director[2] << "\n";
    
    os << "selection2: (" << selectionScript2_ << ")\n";
    os << "#p2\terror\tdirector_x\tdirector_y\tdiretor_z\n";
    
    os <<  avgOPTail.p2 << "\t"
       <<  errOPTail.p2 << "\t"
       <<  avgOPTail.director[0] << "\t"
       <<  avgOPTail.director[1] << "\t"
       <<  avgOPTail.director[2] << "\n";
  }
  
}

Revision:	1665
Committed:	Tue Nov 22 20:38:56 2011 UTC (13 years, 5 months ago) by gezelter
File size:	13322 byte(s)
Log Message:	updated copyright notices
#	User	Rev	Content
1	xsun	980	/*
2			* Copyright (c) 2005 The University of Notre Dame. All Rights Reserved.
3			*
4			* The University of Notre Dame grants you ("Licensee") a
5			* non-exclusive, royalty free, license to use, modify and
6			* redistribute this software in source and binary code form, provided
7			* that the following conditions are met:
8			*
9	gezelter	1390	* 1. Redistributions of source code must retain the above copyright
10	xsun	980	* notice, this list of conditions and the following disclaimer.
11			*
12	gezelter	1390	* 2. Redistributions in binary form must reproduce the above copyright
13	xsun	980	* notice, this list of conditions and the following disclaimer in the
14			* documentation and/or other materials provided with the
15			* distribution.
16			*
17			* This software is provided "AS IS," without a warranty of any
18			* kind. All express or implied conditions, representations and
19			* warranties, including any implied warranty of merchantability,
20			* fitness for a particular purpose or non-infringement, are hereby
21			* excluded. The University of Notre Dame and its licensors shall not
22			* be liable for any damages suffered by licensee as a result of
23			* using, modifying or distributing the software or its
24			* derivatives. In no event will the University of Notre Dame or its
25			* licensors be liable for any lost revenue, profit or data, or for
26			* direct, indirect, special, consequential, incidental or punitive
27			* damages, however caused and regardless of the theory of liability,
28			* arising out of the use of or inability to use software, even if the
29			* University of Notre Dame has been advised of the possibility of
30			* such damages.
31	gezelter	1390	*
32			* SUPPORT OPEN SCIENCE! If you use OpenMD or its source code in your
33			* research, please cite the appropriate papers when you publish your
34			* work. Good starting points are:
35			*
36			* [1] Meineke, et al., J. Comp. Chem. 26, 252-271 (2005).
37			* [2] Fennell & Gezelter, J. Chem. Phys. 124, 234104 (2006).
38			* [3] Sun, Lin & Gezelter, J. Chem. Phys. 128, 24107 (2008).
39	gezelter	1665	* [4] Kuang & Gezelter, J. Chem. Phys. 133, 164101 (2010).
40			* [5] Vardeman, Stocker & Gezelter, J. Chem. Theory Comput. 7, 834 (2011).
41	xsun	980	*/
42
43			#include "applications/staticProps/RippleOP.hpp"
44			#include "utils/simError.h"
45			#include "io/DumpReader.hpp"
46			#include "primitives/Molecule.hpp"
47			#include "utils/NumericConstant.hpp"
48	gezelter	1390	namespace OpenMD {
49	xsun	980
50
51			RippleOP::RippleOP(SimInfo* info, const std::string& filename, const std::string& sele1, const std::string& sele2)
52			: StaticAnalyser(info, filename),
53			selectionScript1_(sele1), selectionScript2_(sele2), evaluator1_(info), evaluator2_(info),
54			seleMan1_(info), seleMan2_(info){
55
56			setOutputName(getPrefix(filename) + ".rp2");
57
58			evaluator1_.loadScriptString(sele1);
59			evaluator2_.loadScriptString(sele2);
60
61			if (!evaluator1_.isDynamic()) {
62			seleMan1_.setSelectionSet(evaluator1_.evaluate());
63			}else {
64			sprintf( painCave.errMsg,
65			"--sele1 must be static selection\n");
66	gezelter	1390	painCave.severity = OPENMD_ERROR;
67	xsun	980	painCave.isFatal = 1;
68			simError();
69			}
70
71			if (!evaluator2_.isDynamic()) {
72			seleMan2_.setSelectionSet(evaluator2_.evaluate());
73			}else {
74			sprintf( painCave.errMsg,
75			"--sele2 must be static selection\n");
76	gezelter	1390	painCave.severity = OPENMD_ERROR;
77	xsun	980	painCave.isFatal = 1;
78			simError();
79			}
80
81			if (seleMan1_.getSelectionCount() != seleMan2_.getSelectionCount() ) {
82			sprintf( painCave.errMsg,
83			"The number of selected Stuntdoubles are not the same in --sele1 and sele2\n");
84	gezelter	1390	painCave.severity = OPENMD_ERROR;
85	xsun	980	painCave.isFatal = 1;
86			simError();
87
88			}
89
90			int i;
91			int j;
92			StuntDouble* sd1;
93			StuntDouble* sd2;
94			for (sd1 = seleMan1_.beginSelected(i), sd2 = seleMan2_.beginSelected(j);
95			sd1 != NULL && sd2 != NULL;
96			sd1 = seleMan1_.nextSelected(i), sd2 = seleMan2_.nextSelected(j)) {
97
98			sdPairs_.push_back(std::make_pair(sd1, sd2));
99			}
100
101			}
102
103			void RippleOP::process() {
104			Molecule* mol;
105			RigidBody* rb;
106			SimInfo::MoleculeIterator mi;
107			Molecule::RigidBodyIterator rbIter;
108	xsun	1213
109			StuntDouble* j1;
110			StuntDouble* j2;
111			StuntDouble* sd3;
112	xsun	980
113			DumpReader reader(info_, dumpFilename_);
114			int nFrames = reader.getNFrames();
115	xsun	1213
116	xsun	980	for (int i = 0; i < nFrames; i += step_) {
117			reader.readFrame(i);
118			currentSnapshot_ = info_->getSnapshotManager()->getCurrentSnapshot();
119	xsun	1213	int nMolecules = info_->getNGlobalMolecules();
120			int i1;
121			int nUpper=0;
122			int nLower=0;
123			int nTail=0;
124			RealType sumZ = 0.0;
125	xsun	980
126			for (mol = info_->beginMolecule(mi); mol != NULL; mol = info_->nextMolecule(mi)) {
127			//change the positions of atoms which belong to the rigidbodies
128			for (rb = mol->beginRigidBody(rbIter); rb != NULL; rb = mol->nextRigidBody(rbIter)) {
129			rb->updateAtoms();
130			}
131			}
132	xsun	1213
133			for (sd3 = seleMan2_.beginSelected(i1); sd3 != NULL; sd3 = seleMan2_.nextSelected(i1)) {
134			Vector3d pos1 = sd3->getPos();
135			if (usePeriodicBoundaryConditions_)
136			currentSnapshot_->wrapVector(pos1);
137			sd3->setPos(pos1);
138			}
139
140			for (sd3 = seleMan2_.beginSelected(i1); sd3 != NULL; sd3 = seleMan2_.nextSelected(i1)) {
141			Vector3d pos1 = sd3->getPos();
142			sumZ += pos1.z();
143			}
144			RealType avgZ = sumZ / (RealType) nMolecules;
145	xsun	980
146	xsun	1213	Mat3x3d orderTensorHeadUpper(0.0), orderTensorTail(0.0), orderTensorHeadLower(0.0);
147			// for (std::vector<std::pair<StuntDouble, StuntDouble> >::iterator j = sdPairs_.begin(); j != sdPairs_.end(); ++j) {
148			for (j1 = seleMan1_.beginSelected(i1); j1 != NULL; j1 = seleMan1_.nextSelected(i1)) {
149			Vector3d pos = j1->getPos();
150			if (usePeriodicBoundaryConditions_)
151			currentSnapshot_->wrapVector(pos);
152			Vector3d vecHeadUpper;
153			if (pos.z() >= avgZ){
154			vecHeadUpper = j1->getElectroFrame().getColumn(2);
155			nUpper++;
156			}
157			Vector3d vecHeadLower;
158			if (pos.z() <= avgZ){
159			vecHeadLower = j1->getElectroFrame().getColumn(2);
160			nLower++;
161			}
162			orderTensorHeadUpper +=outProduct(vecHeadUpper, vecHeadUpper);
163			orderTensorHeadLower +=outProduct(vecHeadLower, vecHeadLower);
164			}
165			for (j2 = seleMan2_.beginSelected(i1); j2 != NULL; j2 = seleMan2_.nextSelected(i1)) {
166			// The lab frame vector corresponding to the body-fixed
167			// z-axis is simply the second column of A.transpose()
168			// or, identically, the second row of A itself.
169
170			Vector3d vecTail = j2->getA().getRow(2);
171	xsun	980	orderTensorTail +=outProduct(vecTail, vecTail);
172	xsun	1213	nTail++;
173	xsun	980	}
174
175	xsun	1213	orderTensorHeadUpper /= (RealType) nUpper;
176			orderTensorHeadLower /= (RealType) nLower;
177			orderTensorHeadUpper -= (RealType)(1.0/3.0) * Mat3x3d::identity();
178			orderTensorHeadLower -= (RealType)(1.0/3.0) * Mat3x3d::identity();
179
180			orderTensorTail /= (RealType) nTail;
181	xsun	980	orderTensorTail -= (RealType)(1.0/3.0) * Mat3x3d::identity();
182
183	xsun	1213	Vector3d eigenvaluesHeadUpper, eigenvaluesHeadLower, eigenvaluesTail;
184			Mat3x3d eigenvectorsHeadUpper, eigenvectorsHeadLower, eigenvectorsTail;
185			Mat3x3d::diagonalize(orderTensorHeadUpper, eigenvaluesHeadUpper, eigenvectorsHeadUpper);
186			Mat3x3d::diagonalize(orderTensorHeadLower, eigenvaluesHeadLower, eigenvectorsHeadLower);
187	xsun	980	Mat3x3d::diagonalize(orderTensorTail, eigenvaluesTail, eigenvectorsTail);
188
189	xsun	1213	int whichUpper, whichLower, whichTail;
190			RealType maxEvalUpper = 0.0;
191			RealType maxEvalLower = 0.0;
192			RealType maxEvalTail = 0.0;
193	xsun	980	for(int k = 0; k< 3; k++){
194	xsun	1213	if(fabs(eigenvaluesHeadUpper[k]) > maxEvalUpper){
195			whichUpper = k;
196			maxEvalUpper = fabs(eigenvaluesHeadUpper[k]);
197	xsun	980	}
198			}
199	xsun	1213	RealType p2HeadUpper = 1.5 * maxEvalUpper;
200	xsun	980	for(int k = 0; k< 3; k++){
201	xsun	1213	if(fabs(eigenvaluesHeadLower[k]) > maxEvalLower){
202			whichLower = k;
203			maxEvalLower = fabs(eigenvaluesHeadLower[k]);
204	xsun	980	}
205			}
206	xsun	1213	RealType p2HeadLower = 1.5 * maxEvalLower;
207			for(int k = 0; k< 3; k++){
208			if(fabs(eigenvaluesTail[k]) > maxEvalTail){
209			whichTail = k;
210			maxEvalTail = fabs(eigenvaluesTail[k]);
211			}
212			}
213			RealType p2Tail = 1.5 * maxEvalTail;
214	xsun	980
215			//the eigen vector is already normalized in SquareMatrix3::diagonalize
216	xsun	1213	Vector3d directorHeadUpper = eigenvectorsHeadUpper.getColumn(whichUpper);
217			if (directorHeadUpper[0] < 0) {
218			directorHeadUpper.negate();
219	xsun	980	}
220	xsun	1213	Vector3d directorHeadLower = eigenvectorsHeadLower.getColumn(whichLower);
221			if (directorHeadLower[0] < 0) {
222			directorHeadLower.negate();
223			}
224			Vector3d directorTail = eigenvectorsTail.getColumn(whichTail);
225	xsun	980	if (directorTail[0] < 0) {
226			directorTail.negate();
227			}
228
229	xsun	1213	OrderParam paramHeadUpper, paramHeadLower, paramTail;
230			paramHeadUpper.p2 = p2HeadUpper;
231			paramHeadUpper.director = directorHeadUpper;
232			paramHeadLower.p2 = p2HeadLower;
233			paramHeadLower.director = directorHeadLower;
234	xsun	980	paramTail.p2 = p2Tail;
235			paramTail.director = directorTail;
236
237	xsun	1213	orderParamsHeadUpper_.push_back(paramHeadUpper);
238			orderParamsHeadLower_.push_back(paramHeadLower);
239	xsun	980	orderParamsTail_.push_back(paramTail);
240
241			}
242
243	xsun	1213	OrderParam sumOPHeadUpper, errsumOPHeadUpper;
244			OrderParam sumOPHeadLower, errsumOPHeadLower;
245	xsun	980	OrderParam sumOPTail, errsumOPTail;
246
247	xsun	1213	sumOPHeadUpper.p2 = 0.0;
248			errsumOPHeadUpper.p2 = 0.0;
249			sumOPHeadLower.p2 = 0.0;
250			errsumOPHeadLower.p2 = 0.0;
251			for (std::size_t i = 0; i < orderParamsHeadUpper_.size(); ++i) {
252			sumOPHeadUpper.p2 += orderParamsHeadUpper_[i].p2;
253			sumOPHeadUpper.director[0] += orderParamsHeadUpper_[i].director[0];
254			sumOPHeadUpper.director[1] += orderParamsHeadUpper_[i].director[1];
255			sumOPHeadUpper.director[2] += orderParamsHeadUpper_[i].director[2];
256	xsun	980	}
257
258	xsun	1213	avgOPHeadUpper.p2 = sumOPHeadUpper.p2 / (RealType)orderParamsHeadUpper_.size();
259			avgOPHeadUpper.director[0] = sumOPHeadUpper.director[0] / (RealType)orderParamsHeadUpper_.size();
260			avgOPHeadUpper.director[1] = sumOPHeadUpper.director[1] / (RealType)orderParamsHeadUpper_.size();
261			avgOPHeadUpper.director[2] = sumOPHeadUpper.director[2] / (RealType)orderParamsHeadUpper_.size();
262			for (std::size_t i = 0; i < orderParamsHeadUpper_.size(); ++i) {
263			errsumOPHeadUpper.p2 += pow((orderParamsHeadUpper_[i].p2 - avgOPHeadUpper.p2), 2);
264	xsun	980	}
265	xsun	1213	errOPHeadUpper.p2 = sqrt(errsumOPHeadUpper.p2 / (RealType)orderParamsHeadUpper_.size());
266			for (std::size_t i = 0; i < orderParamsHeadLower_.size(); ++i) {
267			sumOPHeadLower.p2 += orderParamsHeadLower_[i].p2;
268			sumOPHeadLower.director[0] += orderParamsHeadLower_[i].director[0];
269			sumOPHeadLower.director[1] += orderParamsHeadLower_[i].director[1];
270			sumOPHeadLower.director[2] += orderParamsHeadLower_[i].director[2];
271			}
272	xsun	980
273	xsun	1213	avgOPHeadLower.p2 = sumOPHeadLower.p2 / (RealType)orderParamsHeadLower_.size();
274			avgOPHeadLower.director[0] = sumOPHeadLower.director[0] / (RealType)orderParamsHeadLower_.size();
275			avgOPHeadLower.director[1] = sumOPHeadLower.director[1] / (RealType)orderParamsHeadLower_.size();
276			avgOPHeadLower.director[2] = sumOPHeadLower.director[2] / (RealType)orderParamsHeadLower_.size();
277			for (std::size_t i = 0; i < orderParamsHeadLower_.size(); ++i) {
278			errsumOPHeadLower.p2 += pow((orderParamsHeadLower_[i].p2 - avgOPHeadLower.p2), 2);
279			}
280			errOPHeadLower.p2 = sqrt(errsumOPHeadLower.p2 / (RealType)orderParamsHeadLower_.size());
281
282	xsun	980	sumOPTail.p2 = 0.0;
283			errsumOPTail.p2 = 0.0;
284			for (std::size_t i = 0; i < orderParamsTail_.size(); ++i) {
285			sumOPTail.p2 += orderParamsTail_[i].p2;
286			sumOPTail.director[0] += orderParamsTail_[i].director[0];
287			sumOPTail.director[1] += orderParamsTail_[i].director[1];
288			sumOPTail.director[2] += orderParamsTail_[i].director[2];
289			}
290
291			avgOPTail.p2 = sumOPTail.p2 / (RealType)orderParamsTail_.size();
292			avgOPTail.director[0] = sumOPTail.director[0] / (RealType)orderParamsTail_.size();
293			avgOPTail.director[1] = sumOPTail.director[1] / (RealType)orderParamsTail_.size();
294			avgOPTail.director[2] = sumOPTail.director[2] / (RealType)orderParamsTail_.size();
295			for (std::size_t i = 0; i < orderParamsTail_.size(); ++i) {
296			errsumOPTail.p2 += pow((orderParamsTail_[i].p2 - avgOPTail.p2), 2);
297			}
298			errOPTail.p2 = sqrt(errsumOPTail.p2 / (RealType)orderParamsTail_.size());
299
300			writeP2();
301
302			}
303
304			void RippleOP::writeP2() {
305
306			std::ofstream os(getOutputFileName().c_str());
307			os<< "#selection1: (" << selectionScript1_ << ")\n";
308			os << "#p2\terror\tdirector_x\tdirector_y\tdiretor_z\n";
309
310	xsun	1213	os << avgOPHeadUpper.p2 << "\t"
311			<< errOPHeadUpper.p2 << "\t"
312			<< avgOPHeadUpper.director[0] << "\t"
313			<< avgOPHeadUpper.director[1] << "\t"
314			<< avgOPHeadUpper.director[2] << "\n";
315
316			os << avgOPHeadLower.p2 << "\t"
317			<< errOPHeadLower.p2 << "\t"
318			<< avgOPHeadLower.director[0] << "\t"
319			<< avgOPHeadLower.director[1] << "\t"
320			<< avgOPHeadLower.director[2] << "\n";
321	xsun	980
322			os << "selection2: (" << selectionScript2_ << ")\n";
323			os << "#p2\terror\tdirector_x\tdirector_y\tdiretor_z\n";
324
325			os << avgOPTail.p2 << "\t"
326			<< errOPTail.p2 << "\t"
327			<< avgOPTail.director[0] << "\t"
328			<< avgOPTail.director[1] << "\t"
329			<< avgOPTail.director[2] << "\n";
330			}
331
332			}
333