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]  Vardeman & Gezelter, in progress (2009).                        
 */

#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:	1390
Committed:	Wed Nov 25 20:02:06 2009 UTC (15 years, 5 months ago) by gezelter
Original Path:	*trunk/src/applications/staticProps/RippleOP.cpp*
File size:	13256 byte(s)
Log Message:	Almost all of the changes necessary to create OpenMD out of our old project (OOPSE-4)
#	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			* [4] Vardeman & Gezelter, in progress (2009).
40	xsun	980	*/
41
42			#include "applications/staticProps/RippleOP.hpp"
43			#include "utils/simError.h"
44			#include "io/DumpReader.hpp"
45			#include "primitives/Molecule.hpp"
46			#include "utils/NumericConstant.hpp"
47	gezelter	1390	namespace OpenMD {
48	xsun	980
49
50			RippleOP::RippleOP(SimInfo* info, const std::string& filename, const std::string& sele1, const std::string& sele2)
51			: StaticAnalyser(info, filename),
52			selectionScript1_(sele1), selectionScript2_(sele2), evaluator1_(info), evaluator2_(info),
53			seleMan1_(info), seleMan2_(info){
54
55			setOutputName(getPrefix(filename) + ".rp2");
56
57			evaluator1_.loadScriptString(sele1);
58			evaluator2_.loadScriptString(sele2);
59
60			if (!evaluator1_.isDynamic()) {
61			seleMan1_.setSelectionSet(evaluator1_.evaluate());
62			}else {
63			sprintf( painCave.errMsg,
64			"--sele1 must be static selection\n");
65	gezelter	1390	painCave.severity = OPENMD_ERROR;
66	xsun	980	painCave.isFatal = 1;
67			simError();
68			}
69
70			if (!evaluator2_.isDynamic()) {
71			seleMan2_.setSelectionSet(evaluator2_.evaluate());
72			}else {
73			sprintf( painCave.errMsg,
74			"--sele2 must be static selection\n");
75	gezelter	1390	painCave.severity = OPENMD_ERROR;
76	xsun	980	painCave.isFatal = 1;
77			simError();
78			}
79
80			if (seleMan1_.getSelectionCount() != seleMan2_.getSelectionCount() ) {
81			sprintf( painCave.errMsg,
82			"The number of selected Stuntdoubles are not the same in --sele1 and sele2\n");
83	gezelter	1390	painCave.severity = OPENMD_ERROR;
84	xsun	980	painCave.isFatal = 1;
85			simError();
86
87			}
88
89			int i;
90			int j;
91			StuntDouble* sd1;
92			StuntDouble* sd2;
93			for (sd1 = seleMan1_.beginSelected(i), sd2 = seleMan2_.beginSelected(j);
94			sd1 != NULL && sd2 != NULL;
95			sd1 = seleMan1_.nextSelected(i), sd2 = seleMan2_.nextSelected(j)) {
96
97			sdPairs_.push_back(std::make_pair(sd1, sd2));
98			}
99
100			}
101
102			void RippleOP::process() {
103			Molecule* mol;
104			RigidBody* rb;
105			SimInfo::MoleculeIterator mi;
106			Molecule::RigidBodyIterator rbIter;
107	xsun	1213
108			StuntDouble* j1;
109			StuntDouble* j2;
110			StuntDouble* sd3;
111	xsun	980
112			DumpReader reader(info_, dumpFilename_);
113			int nFrames = reader.getNFrames();
114	xsun	1213
115	xsun	980	for (int i = 0; i < nFrames; i += step_) {
116			reader.readFrame(i);
117			currentSnapshot_ = info_->getSnapshotManager()->getCurrentSnapshot();
118	xsun	1213	int nMolecules = info_->getNGlobalMolecules();
119			int i1;
120			int nUpper=0;
121			int nLower=0;
122			int nTail=0;
123			RealType sumZ = 0.0;
124	xsun	980
125			for (mol = info_->beginMolecule(mi); mol != NULL; mol = info_->nextMolecule(mi)) {
126			//change the positions of atoms which belong to the rigidbodies
127			for (rb = mol->beginRigidBody(rbIter); rb != NULL; rb = mol->nextRigidBody(rbIter)) {
128			rb->updateAtoms();
129			}
130			}
131	xsun	1213
132			for (sd3 = seleMan2_.beginSelected(i1); sd3 != NULL; sd3 = seleMan2_.nextSelected(i1)) {
133			Vector3d pos1 = sd3->getPos();
134			if (usePeriodicBoundaryConditions_)
135			currentSnapshot_->wrapVector(pos1);
136			sd3->setPos(pos1);
137			}
138
139			for (sd3 = seleMan2_.beginSelected(i1); sd3 != NULL; sd3 = seleMan2_.nextSelected(i1)) {
140			Vector3d pos1 = sd3->getPos();
141			sumZ += pos1.z();
142			}
143			RealType avgZ = sumZ / (RealType) nMolecules;
144	xsun	980
145	xsun	1213	Mat3x3d orderTensorHeadUpper(0.0), orderTensorTail(0.0), orderTensorHeadLower(0.0);
146			// for (std::vector<std::pair<StuntDouble, StuntDouble> >::iterator j = sdPairs_.begin(); j != sdPairs_.end(); ++j) {
147			for (j1 = seleMan1_.beginSelected(i1); j1 != NULL; j1 = seleMan1_.nextSelected(i1)) {
148			Vector3d pos = j1->getPos();
149			if (usePeriodicBoundaryConditions_)
150			currentSnapshot_->wrapVector(pos);
151			Vector3d vecHeadUpper;
152			if (pos.z() >= avgZ){
153			vecHeadUpper = j1->getElectroFrame().getColumn(2);
154			nUpper++;
155			}
156			Vector3d vecHeadLower;
157			if (pos.z() <= avgZ){
158			vecHeadLower = j1->getElectroFrame().getColumn(2);
159			nLower++;
160			}
161			orderTensorHeadUpper +=outProduct(vecHeadUpper, vecHeadUpper);
162			orderTensorHeadLower +=outProduct(vecHeadLower, vecHeadLower);
163			}
164			for (j2 = seleMan2_.beginSelected(i1); j2 != NULL; j2 = seleMan2_.nextSelected(i1)) {
165			// The lab frame vector corresponding to the body-fixed
166			// z-axis is simply the second column of A.transpose()
167			// or, identically, the second row of A itself.
168
169			Vector3d vecTail = j2->getA().getRow(2);
170	xsun	980	orderTensorTail +=outProduct(vecTail, vecTail);
171	xsun	1213	nTail++;
172	xsun	980	}
173
174	xsun	1213	orderTensorHeadUpper /= (RealType) nUpper;
175			orderTensorHeadLower /= (RealType) nLower;
176			orderTensorHeadUpper -= (RealType)(1.0/3.0) * Mat3x3d::identity();
177			orderTensorHeadLower -= (RealType)(1.0/3.0) * Mat3x3d::identity();
178
179			orderTensorTail /= (RealType) nTail;
180	xsun	980	orderTensorTail -= (RealType)(1.0/3.0) * Mat3x3d::identity();
181
182	xsun	1213	Vector3d eigenvaluesHeadUpper, eigenvaluesHeadLower, eigenvaluesTail;
183			Mat3x3d eigenvectorsHeadUpper, eigenvectorsHeadLower, eigenvectorsTail;
184			Mat3x3d::diagonalize(orderTensorHeadUpper, eigenvaluesHeadUpper, eigenvectorsHeadUpper);
185			Mat3x3d::diagonalize(orderTensorHeadLower, eigenvaluesHeadLower, eigenvectorsHeadLower);
186	xsun	980	Mat3x3d::diagonalize(orderTensorTail, eigenvaluesTail, eigenvectorsTail);
187
188	xsun	1213	int whichUpper, whichLower, whichTail;
189			RealType maxEvalUpper = 0.0;
190			RealType maxEvalLower = 0.0;
191			RealType maxEvalTail = 0.0;
192	xsun	980	for(int k = 0; k< 3; k++){
193	xsun	1213	if(fabs(eigenvaluesHeadUpper[k]) > maxEvalUpper){
194			whichUpper = k;
195			maxEvalUpper = fabs(eigenvaluesHeadUpper[k]);
196	xsun	980	}
197			}
198	xsun	1213	RealType p2HeadUpper = 1.5 * maxEvalUpper;
199	xsun	980	for(int k = 0; k< 3; k++){
200	xsun	1213	if(fabs(eigenvaluesHeadLower[k]) > maxEvalLower){
201			whichLower = k;
202			maxEvalLower = fabs(eigenvaluesHeadLower[k]);
203	xsun	980	}
204			}
205	xsun	1213	RealType p2HeadLower = 1.5 * maxEvalLower;
206			for(int k = 0; k< 3; k++){
207			if(fabs(eigenvaluesTail[k]) > maxEvalTail){
208			whichTail = k;
209			maxEvalTail = fabs(eigenvaluesTail[k]);
210			}
211			}
212			RealType p2Tail = 1.5 * maxEvalTail;
213	xsun	980
214			//the eigen vector is already normalized in SquareMatrix3::diagonalize
215	xsun	1213	Vector3d directorHeadUpper = eigenvectorsHeadUpper.getColumn(whichUpper);
216			if (directorHeadUpper[0] < 0) {
217			directorHeadUpper.negate();
218	xsun	980	}
219	xsun	1213	Vector3d directorHeadLower = eigenvectorsHeadLower.getColumn(whichLower);
220			if (directorHeadLower[0] < 0) {
221			directorHeadLower.negate();
222			}
223			Vector3d directorTail = eigenvectorsTail.getColumn(whichTail);
224	xsun	980	if (directorTail[0] < 0) {
225			directorTail.negate();
226			}
227
228	xsun	1213	OrderParam paramHeadUpper, paramHeadLower, paramTail;
229			paramHeadUpper.p2 = p2HeadUpper;
230			paramHeadUpper.director = directorHeadUpper;
231			paramHeadLower.p2 = p2HeadLower;
232			paramHeadLower.director = directorHeadLower;
233	xsun	980	paramTail.p2 = p2Tail;
234			paramTail.director = directorTail;
235
236	xsun	1213	orderParamsHeadUpper_.push_back(paramHeadUpper);
237			orderParamsHeadLower_.push_back(paramHeadLower);
238	xsun	980	orderParamsTail_.push_back(paramTail);
239
240			}
241
242	xsun	1213	OrderParam sumOPHeadUpper, errsumOPHeadUpper;
243			OrderParam sumOPHeadLower, errsumOPHeadLower;
244	xsun	980	OrderParam sumOPTail, errsumOPTail;
245
246	xsun	1213	sumOPHeadUpper.p2 = 0.0;
247			errsumOPHeadUpper.p2 = 0.0;
248			sumOPHeadLower.p2 = 0.0;
249			errsumOPHeadLower.p2 = 0.0;
250			for (std::size_t i = 0; i < orderParamsHeadUpper_.size(); ++i) {
251			sumOPHeadUpper.p2 += orderParamsHeadUpper_[i].p2;
252			sumOPHeadUpper.director[0] += orderParamsHeadUpper_[i].director[0];
253			sumOPHeadUpper.director[1] += orderParamsHeadUpper_[i].director[1];
254			sumOPHeadUpper.director[2] += orderParamsHeadUpper_[i].director[2];
255	xsun	980	}
256
257	xsun	1213	avgOPHeadUpper.p2 = sumOPHeadUpper.p2 / (RealType)orderParamsHeadUpper_.size();
258			avgOPHeadUpper.director[0] = sumOPHeadUpper.director[0] / (RealType)orderParamsHeadUpper_.size();
259			avgOPHeadUpper.director[1] = sumOPHeadUpper.director[1] / (RealType)orderParamsHeadUpper_.size();
260			avgOPHeadUpper.director[2] = sumOPHeadUpper.director[2] / (RealType)orderParamsHeadUpper_.size();
261			for (std::size_t i = 0; i < orderParamsHeadUpper_.size(); ++i) {
262			errsumOPHeadUpper.p2 += pow((orderParamsHeadUpper_[i].p2 - avgOPHeadUpper.p2), 2);
263	xsun	980	}
264	xsun	1213	errOPHeadUpper.p2 = sqrt(errsumOPHeadUpper.p2 / (RealType)orderParamsHeadUpper_.size());
265			for (std::size_t i = 0; i < orderParamsHeadLower_.size(); ++i) {
266			sumOPHeadLower.p2 += orderParamsHeadLower_[i].p2;
267			sumOPHeadLower.director[0] += orderParamsHeadLower_[i].director[0];
268			sumOPHeadLower.director[1] += orderParamsHeadLower_[i].director[1];
269			sumOPHeadLower.director[2] += orderParamsHeadLower_[i].director[2];
270			}
271	xsun	980
272	xsun	1213	avgOPHeadLower.p2 = sumOPHeadLower.p2 / (RealType)orderParamsHeadLower_.size();
273			avgOPHeadLower.director[0] = sumOPHeadLower.director[0] / (RealType)orderParamsHeadLower_.size();
274			avgOPHeadLower.director[1] = sumOPHeadLower.director[1] / (RealType)orderParamsHeadLower_.size();
275			avgOPHeadLower.director[2] = sumOPHeadLower.director[2] / (RealType)orderParamsHeadLower_.size();
276			for (std::size_t i = 0; i < orderParamsHeadLower_.size(); ++i) {
277			errsumOPHeadLower.p2 += pow((orderParamsHeadLower_[i].p2 - avgOPHeadLower.p2), 2);
278			}
279			errOPHeadLower.p2 = sqrt(errsumOPHeadLower.p2 / (RealType)orderParamsHeadLower_.size());
280
281	xsun	980	sumOPTail.p2 = 0.0;
282			errsumOPTail.p2 = 0.0;
283			for (std::size_t i = 0; i < orderParamsTail_.size(); ++i) {
284			sumOPTail.p2 += orderParamsTail_[i].p2;
285			sumOPTail.director[0] += orderParamsTail_[i].director[0];
286			sumOPTail.director[1] += orderParamsTail_[i].director[1];
287			sumOPTail.director[2] += orderParamsTail_[i].director[2];
288			}
289
290			avgOPTail.p2 = sumOPTail.p2 / (RealType)orderParamsTail_.size();
291			avgOPTail.director[0] = sumOPTail.director[0] / (RealType)orderParamsTail_.size();
292			avgOPTail.director[1] = sumOPTail.director[1] / (RealType)orderParamsTail_.size();
293			avgOPTail.director[2] = sumOPTail.director[2] / (RealType)orderParamsTail_.size();
294			for (std::size_t i = 0; i < orderParamsTail_.size(); ++i) {
295			errsumOPTail.p2 += pow((orderParamsTail_[i].p2 - avgOPTail.p2), 2);
296			}
297			errOPTail.p2 = sqrt(errsumOPTail.p2 / (RealType)orderParamsTail_.size());
298
299			writeP2();
300
301			}
302
303			void RippleOP::writeP2() {
304
305			std::ofstream os(getOutputFileName().c_str());
306			os<< "#selection1: (" << selectionScript1_ << ")\n";
307			os << "#p2\terror\tdirector_x\tdirector_y\tdiretor_z\n";
308
309	xsun	1213	os << avgOPHeadUpper.p2 << "\t"
310			<< errOPHeadUpper.p2 << "\t"
311			<< avgOPHeadUpper.director[0] << "\t"
312			<< avgOPHeadUpper.director[1] << "\t"
313			<< avgOPHeadUpper.director[2] << "\n";
314
315			os << avgOPHeadLower.p2 << "\t"
316			<< errOPHeadLower.p2 << "\t"
317			<< avgOPHeadLower.director[0] << "\t"
318			<< avgOPHeadLower.director[1] << "\t"
319			<< avgOPHeadLower.director[2] << "\n";
320	xsun	980
321			os << "selection2: (" << selectionScript2_ << ")\n";
322			os << "#p2\terror\tdirector_x\tdirector_y\tdiretor_z\n";
323
324			os << avgOPTail.p2 << "\t"
325			<< errOPTail.p2 << "\t"
326			<< avgOPTail.director[0] << "\t"
327			<< avgOPTail.director[1] << "\t"
328			<< avgOPTail.director[2] << "\n";
329			}
330
331			}
332