52 |
|
#include "utils/simError.h" |
53 |
|
|
54 |
|
namespace OpenMD { |
55 |
< |
ZConsWriter::ZConsWriter(SimInfo* info, const std::string& filename) : info_(info) { |
56 |
< |
//use master - slave mode, only master node writes to disk |
55 |
> |
ZConsWriter::ZConsWriter(SimInfo* info, const std::string& filename) : |
56 |
> |
info_(info) { |
57 |
> |
// use master - slave mode, only master node writes to disk |
58 |
|
#ifdef IS_MPI |
59 |
|
if(worldRank == 0){ |
60 |
|
#endif |
60 |
– |
|
61 |
|
output_.open(filename.c_str()); |
62 |
|
|
63 |
|
if(!output_){ |
64 |
|
sprintf( painCave.errMsg, |
65 |
< |
"Could not open %s for z constrain output_ \n", filename.c_str()); |
65 |
> |
"Could not open %s for z constrain output_ \n", |
66 |
> |
filename.c_str()); |
67 |
|
painCave.isFatal = 1; |
68 |
|
simError(); |
69 |
|
} |
70 |
|
|
71 |
|
output_ << "//time(fs)" << std::endl; |
72 |
|
output_ << "//number of fixed z-constrain molecules" << std::endl; |
73 |
< |
output_ << "//global Index of molecule\tzconstrain force\tcurrentZPos" << std::endl; |
74 |
< |
|
73 |
> |
output_ << "//global Index of molecule\tzconstrain force\tcurrentZPos" |
74 |
> |
<< std::endl; |
75 |
|
#ifdef IS_MPI |
76 |
|
} |
77 |
< |
#endif |
77 |
< |
|
77 |
> |
#endif |
78 |
|
} |
79 |
< |
|
79 |
> |
|
80 |
|
ZConsWriter::~ZConsWriter() |
81 |
|
{ |
82 |
< |
|
82 |
> |
|
83 |
|
#ifdef IS_MPI |
84 |
|
if(worldRank == 0 ){ |
85 |
|
#endif |
91 |
|
|
92 |
|
void ZConsWriter::writeFZ(const std::list<ZconstraintMol>& fixedZmols){ |
93 |
|
#ifndef IS_MPI |
94 |
< |
output_ << info_->getSnapshotManager()->getCurrentSnapshot()->getTime() << std::endl; |
94 |
> |
output_ << info_->getSnapshotManager()->getCurrentSnapshot()->getTime() |
95 |
> |
<< std::endl; |
96 |
|
output_ << fixedZmols.size() << std::endl; |
97 |
|
|
98 |
|
std::list<ZconstraintMol>::const_iterator i; |
99 |
|
for ( i = fixedZmols.begin(); i != fixedZmols.end(); ++i) { |
100 |
< |
output_ << i->mol->getGlobalIndex() <<"\t" << i->fz << "\t" << i->zpos << "\t" << i->param.zTargetPos <<std::endl; |
100 |
> |
output_ << i->mol->getGlobalIndex() <<"\t" << i->fz << "\t" << i->zpos |
101 |
> |
<< "\t" << i->param.zTargetPos <<std::endl; |
102 |
|
} |
103 |
|
#else |
104 |
< |
|
104 |
> |
|
105 |
|
const int masterNode = 0; |
106 |
|
int nproc; |
107 |
|
int myNode; |
108 |
|
MPI_Comm_size( MPI_COMM_WORLD, &nproc); |
109 |
|
MPI_Comm_rank( MPI_COMM_WORLD, &myNode); |
110 |
< |
|
110 |
> |
|
111 |
|
std::vector<int> tmpNFixedZmols(nproc, 0); |
112 |
|
std::vector<int> nFixedZmolsInProc(nproc, 0); |
113 |
|
tmpNFixedZmols[myNode] = fixedZmols.size(); |
116 |
|
//rigidbodies and cutoff groups |
117 |
|
MPI_Allreduce(&tmpNFixedZmols[0], &nFixedZmolsInProc[0], |
118 |
|
nproc, MPI_INT, MPI_SUM, MPI_COMM_WORLD); |
119 |
< |
|
120 |
< |
MPI_Status* ierr; |
119 |
> |
|
120 |
> |
MPI_Status* ierr = NULL; |
121 |
|
int zmolIndex; |
122 |
|
RealType data[3]; |
123 |
|
|
124 |
|
if (myNode == masterNode) { |
125 |
< |
|
125 |
> |
|
126 |
|
std::vector<ZconsData> zconsData; |
127 |
|
ZconsData tmpData; |
128 |
|
for(int i =0 ; i < nproc; ++i) { |
135 |
|
tmpData.zconsPos = j->param.zTargetPos; |
136 |
|
zconsData.push_back(tmpData); |
137 |
|
} |
138 |
< |
|
138 |
> |
|
139 |
|
} else { |
140 |
|
for(int k =0 ; k < nFixedZmolsInProc[i]; ++k) { |
141 |
|
MPI_Recv(&zmolIndex, 1, MPI_INT, i, 0, MPI_COMM_WORLD, ierr); |
144 |
|
tmpData.zforce= data[0]; |
145 |
|
tmpData.zpos = data[1]; |
146 |
|
tmpData.zconsPos = data[2]; |
147 |
< |
zconsData.push_back(tmpData); |
147 |
> |
zconsData.push_back(tmpData); |
148 |
|
} |
149 |
< |
} |
148 |
< |
|
149 |
> |
} |
150 |
|
} |
151 |
|
|
152 |
< |
|
153 |
< |
output_ << info_->getSnapshotManager()->getCurrentSnapshot()->getTime() << std::endl; |
152 |
> |
output_ << info_->getSnapshotManager()->getCurrentSnapshot()->getTime() |
153 |
> |
<< std::endl; |
154 |
|
output_ << zconsData.size() << std::endl; |
155 |
|
|
156 |
|
std::vector<ZconsData>::iterator l; |
157 |
|
for (l = zconsData.begin(); l != zconsData.end(); ++l) { |
158 |
< |
output_ << l->zmolIndex << "\t" << l->zforce << "\t" << l->zpos << "\t" << l->zconsPos << std::endl; |
158 |
> |
output_ << l->zmolIndex << "\t" << l->zforce << "\t" << l->zpos |
159 |
> |
<< "\t" << l->zconsPos << std::endl; |
160 |
|
} |
161 |
< |
|
161 |
> |
|
162 |
|
} else { |
163 |
< |
|
163 |
> |
|
164 |
|
std::list<ZconstraintMol>::const_iterator j; |
165 |
|
for (j = fixedZmols.begin(); j != fixedZmols.end(); ++j) { |
166 |
|
zmolIndex = j->mol->getGlobalIndex(); |
169 |
|
data[2] = j->param.zTargetPos; |
170 |
|
MPI_Send(&zmolIndex, 1, MPI_INT, masterNode, 0, MPI_COMM_WORLD); |
171 |
|
MPI_Send(data, 3, MPI_REALTYPE, masterNode, 0, MPI_COMM_WORLD); |
170 |
– |
|
172 |
|
} |
173 |
|
} |
174 |
|
#endif |
175 |
|
} |
175 |
– |
|
176 |
|
} |