6 |
|
* redistribute this software in source and binary code form, provided |
7 |
|
* that the following conditions are met: |
8 |
|
* |
9 |
< |
* 1. Acknowledgement of the program authors must be made in any |
10 |
< |
* publication of scientific results based in part on use of the |
11 |
< |
* program. An acceptable form of acknowledgement is citation of |
12 |
< |
* the article in which the program was described (Matthew |
13 |
< |
* A. Meineke, Charles F. Vardeman II, Teng Lin, Christopher |
14 |
< |
* J. Fennell and J. Daniel Gezelter, "OOPSE: An Object-Oriented |
15 |
< |
* Parallel Simulation Engine for Molecular Dynamics," |
16 |
< |
* J. Comput. Chem. 26, pp. 252-271 (2005)) |
17 |
< |
* |
18 |
< |
* 2. Redistributions of source code must retain the above copyright |
9 |
> |
* 1. Redistributions of source code must retain the above copyright |
10 |
|
* notice, this list of conditions and the following disclaimer. |
11 |
|
* |
12 |
< |
* 3. Redistributions in binary form must reproduce the above copyright |
12 |
> |
* 2. Redistributions in binary form must reproduce the above copyright |
13 |
|
* notice, this list of conditions and the following disclaimer in the |
14 |
|
* documentation and/or other materials provided with the |
15 |
|
* distribution. |
29 |
|
* University of Notre Dame has been advised of the possibility of |
30 |
|
* such damages. |
31 |
|
* |
32 |
< |
* BondOrderParameter.cpp |
33 |
< |
* OOPSE-4 |
34 |
< |
* |
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] Kuang & Gezelter, J. Chem. Phys. 133, 164101 (2010). |
40 |
> |
* [4] , Stocker & Gezelter, J. Chem. Theory Comput. 7, 834 (2011). * |
41 |
|
* Created by J. Daniel Gezelter on 09/26/06. |
42 |
|
* @author J. Daniel Gezelter |
43 |
< |
* @version $Id: BOPofR.cpp,v 1.1 2007-04-11 23:27:20 chuckv Exp $ |
43 |
> |
* @version $Id$ |
44 |
|
* |
45 |
|
*/ |
46 |
|
|
49 |
|
#include "io/DumpReader.hpp" |
50 |
|
#include "primitives/Molecule.hpp" |
51 |
|
#include "utils/NumericConstant.hpp" |
52 |
+ |
#include "math/Wigner3jm.hpp" |
53 |
+ |
#include "brains/Thermo.hpp" |
54 |
|
|
55 |
+ |
using namespace MATPACK; |
56 |
+ |
namespace OpenMD { |
57 |
|
|
57 |
– |
namespace oopse { |
58 |
– |
|
58 |
|
BOPofR::BOPofR(SimInfo* info, const std::string& filename, const std::string& sele, double rCut, |
59 |
|
int nbins, RealType len) : StaticAnalyser(info, filename), selectionScript_(sele), evaluator_(info), seleMan_(info){ |
60 |
|
|
75 |
|
RCount_.resize(nBins_); |
76 |
|
WofR_.resize(nBins_); |
77 |
|
QofR_.resize(nBins_); |
78 |
+ |
|
79 |
+ |
for (int i = 0; i < nBins_; i++){ |
80 |
+ |
RCount_[i] = 0; |
81 |
+ |
WofR_[i] = 0; |
82 |
+ |
QofR_[i] = 0; |
83 |
+ |
} |
84 |
|
|
85 |
|
// Make arrays for Wigner3jm |
86 |
< |
double* THRCOF = new double[2*lMax_+1]; |
86 |
> |
RealType* THRCOF = new RealType[2*lMax_+1]; |
87 |
|
// Variables for Wigner routine |
88 |
< |
double lPass, m1Pass, m2m, m2M; |
88 |
> |
RealType lPass, m1Pass, m2m, m2M; |
89 |
|
int error, mSize; |
90 |
|
mSize = 2*lMax_+1; |
91 |
|
|
92 |
|
for (int l = 0; l <= lMax_; l++) { |
93 |
< |
lPass = (double)l; |
93 |
> |
lPass = (RealType)l; |
94 |
|
for (int m1 = -l; m1 <= l; m1++) { |
95 |
< |
m1Pass = (double)m1; |
95 |
> |
m1Pass = (RealType)m1; |
96 |
|
|
97 |
|
std::pair<int,int> lm = std::make_pair(l, m1); |
98 |
|
|
102 |
|
} |
103 |
|
|
104 |
|
// Get Wigner coefficients |
105 |
< |
Wigner3jm(&lPass, &lPass, &lPass, |
106 |
< |
&m1Pass, &m2m, &m2M, |
107 |
< |
THRCOF, &mSize, &error); |
105 |
> |
Wigner3jm(lPass, lPass, lPass, |
106 |
> |
m1Pass, m2m, m2M, |
107 |
> |
THRCOF, mSize, error); |
108 |
|
|
109 |
|
m2Min[lm] = (int)floor(m2m); |
110 |
|
m2Max[lm] = (int)floor(m2M); |
116 |
|
} |
117 |
|
|
118 |
|
delete [] THRCOF; |
119 |
< |
THRCOF = NULL; |
119 |
> |
THRCOF = NULL; |
120 |
|
|
116 |
– |
|
117 |
– |
for (int bin = 0; bin < nBins_; bin++) { |
118 |
– |
QofR_[bin].resize(lMax_ + 1); |
119 |
– |
WofR_[bin].resize(lMax_ + 1 ); |
120 |
– |
RCount_[bin].resize(lMax_ + 1); |
121 |
– |
|
122 |
– |
for (int l = 0; l <= lMax_; l++) { |
123 |
– |
QofR_[bin][l] = 0.0; |
124 |
– |
WofR_[bin][l] = 0.0; |
125 |
– |
RCount_[bin][l] = 1; |
126 |
– |
} |
127 |
– |
|
128 |
– |
} |
129 |
– |
|
121 |
|
} |
122 |
|
|
123 |
|
BOPofR::~BOPofR() { |
145 |
|
} |
146 |
|
|
147 |
|
|
148 |
< |
void BOPofR::initalizeHistogram() { |
149 |
< |
for (int bin = 0; bin < nBins_; bin++) { |
150 |
< |
QofR_[bin].resize(lMax_); |
151 |
< |
WofR_[bin].resize(lMax_); |
152 |
< |
RCount_[bin].resize(lMax_); |
153 |
< |
for (int l = 0; l <= lMax_; l++) { |
163 |
< |
QofR_[bin][l] = 0; |
164 |
< |
WofR_[bin][l] = 0; |
165 |
< |
RCount_[bin][l] = 0; |
166 |
< |
} |
167 |
< |
} |
148 |
> |
void BOPofR::initializeHistogram() { |
149 |
> |
for (int i = 0; i < nBins_; i++){ |
150 |
> |
RCount_[i] = 0; |
151 |
> |
WofR_[i] = 0; |
152 |
> |
QofR_[i] = 0; |
153 |
> |
} |
154 |
|
} |
155 |
|
|
156 |
|
|
167 |
|
RealType costheta; |
168 |
|
RealType phi; |
169 |
|
RealType r; |
184 |
– |
RealType dist; |
170 |
|
Vector3d rCOM; |
171 |
|
RealType distCOM; |
172 |
|
Vector3d pos; |
183 |
|
std::vector<ComplexType> W_hat; |
184 |
|
int nBonds, Nbonds; |
185 |
|
SphericalHarmonic sphericalHarmonic; |
186 |
< |
int i, j; |
187 |
< |
|
186 |
> |
int i; |
187 |
> |
|
188 |
|
DumpReader reader(info_, dumpFilename_); |
189 |
|
int nFrames = reader.getNFrames(); |
190 |
|
frameCounter_ = 0; |
191 |
|
|
192 |
+ |
Thermo thermo(info_); |
193 |
+ |
|
194 |
|
q_l.resize(lMax_+1); |
195 |
|
q2.resize(lMax_+1); |
196 |
|
w.resize(lMax_+1); |
206 |
|
reader.readFrame(istep); |
207 |
|
frameCounter_++; |
208 |
|
currentSnapshot_ = info_->getSnapshotManager()->getCurrentSnapshot(); |
209 |
< |
CenterOfMass = info_->getCom(); |
209 |
> |
CenterOfMass = thermo.getCom(); |
210 |
|
if (evaluator_.isDynamic()) { |
211 |
|
seleMan_.setSelectionSet(evaluator_.evaluate()); |
212 |
|
} |
304 |
|
} |
305 |
|
} |
306 |
|
|
307 |
< |
w_hat[l] = w[l] / pow(q2[l], 1.5); |
307 |
> |
w_hat[l] = w[l] / pow(q2[l], RealType(1.5)); |
308 |
|
} |
309 |
|
|
310 |
|
collectHistogram(q_l, w_hat, distCOM); |
311 |
< |
if(real(w_hat[6]) < -0.1){ |
312 |
< |
std::cout << real(w_hat[6]) << pos << std::endl; |
313 |
< |
} |
311 |
> |
|
312 |
> |
// printf( "%s %18.10g %18.10g %18.10g %18.10g \n", sd->getType().c_str(),pos[0],pos[1],pos[2],real(w_hat[6])); |
313 |
> |
|
314 |
|
} |
315 |
|
} |
316 |
|
|
323 |
|
if ( distCOM < len_){ |
324 |
|
// Figure out where this distance goes... |
325 |
|
int whichBin = distCOM / deltaR_; |
326 |
< |
|
327 |
< |
|
328 |
< |
for (int l = 0; l <= lMax_; l++) { |
329 |
< |
RCount_[whichBin][l]++; |
343 |
< |
QofR_[whichBin][l]=q[l]; |
344 |
< |
WofR_[whichBin][l]=real(what[l]); |
326 |
> |
RCount_[whichBin]++; |
327 |
> |
|
328 |
> |
if(real(what[6]) < -0.15){ |
329 |
> |
WofR_[whichBin]++; |
330 |
|
} |
331 |
< |
|
331 |
> |
if(q[6] > 0.5){ |
332 |
> |
QofR_[whichBin]++; |
333 |
> |
} |
334 |
|
} |
335 |
|
|
336 |
|
} |
346 |
|
for (int i = 0; i < nBins_; ++i) { |
347 |
|
RealType Rval = (i + 0.5) * deltaR_; |
348 |
|
osq << Rval; |
349 |
< |
for (int l = 0; l <= lMax_; l++) { |
350 |
< |
|
351 |
< |
osq << "\t" << (RealType)QofR_[i][l]/(RealType)RCount_[i][l]; |
352 |
< |
} |
353 |
< |
osq << "\n"; |
349 |
> |
if (RCount_[i] == 0){ |
350 |
> |
osq << "\t" << 0; |
351 |
> |
osq << "\n"; |
352 |
> |
}else{ |
353 |
> |
osq << "\t" << (RealType)QofR_[i]/(RealType)RCount_[i]; |
354 |
> |
osq << "\n"; |
355 |
> |
} |
356 |
|
} |
357 |
|
|
358 |
|
osq.close(); |
371 |
|
for (int i = 0; i < nBins_; ++i) { |
372 |
|
RealType Rval = deltaR_ * (i + 0.5); |
373 |
|
osw << Rval; |
374 |
< |
for (int l = 0; l <= lMax_; l++) { |
375 |
< |
|
376 |
< |
osw << "\t" << (RealType)WofR_[i][l]/(RealType)RCount_[i][l]; |
377 |
< |
} |
378 |
< |
osw << "\n"; |
374 |
> |
if (RCount_[i] == 0){ |
375 |
> |
osw << "\t" << 0; |
376 |
> |
osw << "\n"; |
377 |
> |
}else{ |
378 |
> |
osw << "\t" << (RealType)WofR_[i]/(RealType)RCount_[i]; |
379 |
> |
osw << "\n"; |
380 |
> |
} |
381 |
|
} |
382 |
|
|
383 |
|
osw.close(); |