ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/group/trunk/OOPSE/libmdtools/Integrator.hpp
Revision: 843
Committed: Wed Oct 29 20:41:39 2003 UTC (20 years, 8 months ago) by mmeineke
File size: 12496 byte(s)
Log Message:
fixed a stdlib.h include error in bass.l

fixed a little bug in the first time step, regarding the setting of ecr and est in fortran

File Contents

# User Rev Content
1 mmeineke 377 #ifndef _INTEGRATOR_H_
2     #define _INTEGRATOR_H_
3    
4 tim 658 #include <string>
5     #include <vector>
6 mmeineke 377 #include "Atom.hpp"
7 gezelter 604 #include "Molecule.hpp"
8 mmeineke 377 #include "SRI.hpp"
9     #include "AbstractClasses.hpp"
10     #include "SimInfo.hpp"
11     #include "ForceFields.hpp"
12 mmeineke 540 #include "Thermo.hpp"
13     #include "ReadWrite.hpp"
14 tim 658 #include "ZConsWriter.hpp"
15 mmeineke 377
16 tim 658 using namespace std;
17 mmeineke 561 const double kB = 8.31451e-7;// boltzmann constant amu*Ang^2*fs^-2/K
18     const double eConvert = 4.184e-4; // converts kcal/mol -> amu*A^2/fs^2
19 mmeineke 586 const double p_convert = 1.63882576e8; //converts amu*fs^-2*Ang^-1 -> atm
20 mmeineke 561 const int maxIteration = 300;
21     const double tol = 1.0e-6;
22    
23 mmeineke 377
24 tim 645 template<typename T = BaseIntegrator> class Integrator : public T {
25    
26 mmeineke 377 public:
27 mmeineke 561 Integrator( SimInfo *theInfo, ForceFields* the_ff );
28 mmeineke 548 virtual ~Integrator();
29 mmeineke 377 void integrate( void );
30 tim 763 virtual double getConservedQuantity(void);
31 tim 837 virtual string getAdditionalParameters(void);
32 mmeineke 377
33 mmeineke 540 protected:
34 mmeineke 778
35 mmeineke 540 virtual void integrateStep( int calcPot, int calcStress );
36 mmeineke 548 virtual void preMove( void );
37 mmeineke 540 virtual void moveA( void );
38     virtual void moveB( void );
39     virtual void constrainA( void );
40     virtual void constrainB( void );
41 mmeineke 559 virtual int readyCheck( void ) { return 1; }
42 tim 677
43 mmeineke 746 virtual void resetIntegrator( void ) { }
44 tim 837
45     virtual void calcForce( int calcPot, int calcStress );
46 tim 677 virtual void thermalize();
47 tim 837
48 mmeineke 778 virtual void rotationPropagation( DirectionalAtom* dAtom, double ji[3] );
49    
50 mmeineke 540 void checkConstraints( void );
51 tim 837 void rotate( int axes1, int axes2, double angle, double j[3],
52 tim 701 double A[3][3] );
53 tim 837
54 mmeineke 377 ForceFields* myFF;
55    
56 mmeineke 540 SimInfo *info; // all the info we'll ever need
57     int nAtoms; /* the number of atoms */
58 mmeineke 548 int oldAtoms;
59 mmeineke 540 Atom **atoms; /* array of atom pointers */
60 mmeineke 423 Molecule* molecules;
61     int nMols;
62    
63 mmeineke 548 int isConstrained; // boolean to know whether the systems contains
64 tim 701 // constraints.
65 tim 837 int nConstrained; // counter for number of constraints
66     int *constrainedA; // the i of a constraint pair
67     int *constrainedB; // the j of a constraint pair
68     double *constrainedDsqr; // the square of the constraint distance
69    
70 mmeineke 548 int* moving; // tells whether we are moving atom i
71     int* moved; // tells whether we have moved atom i
72 tim 837 double* oldPos; // pre constrained positions
73 mmeineke 548
74 mmeineke 540 short isFirst; /*boolean for the first time integrate is called */
75 tim 837
76 mmeineke 540 double dt;
77 mmeineke 541 double dt2;
78 gezelter 560
79 mmeineke 540 Thermo *tStats;
80     StatWriter* statOut;
81     DumpWriter* dumpOut;
82 tim 837
83 mmeineke 377 };
84    
85 tim 645 typedef Integrator<BaseIntegrator> RealIntegrator;
86 mmeineke 540
87 tim 645 template<typename T> class NVE : public T {
88    
89 mmeineke 561 public:
90     NVE ( SimInfo *theInfo, ForceFields* the_ff ):
91 tim 645 T( theInfo, the_ff ){}
92 tim 837 virtual ~NVE(){}
93 tim 645 };
94 mmeineke 555
95    
96 tim 645 template<typename T> class NVT : public T {
97 mmeineke 555
98 gezelter 560 public:
99    
100 mmeineke 561 NVT ( SimInfo *theInfo, ForceFields* the_ff);
101 tim 763 virtual ~NVT();
102 mmeineke 540
103 gezelter 560 void setTauThermostat(double tt) {tauThermostat = tt; have_tau_thermostat=1;}
104     void setTargetTemp(double tt) {targetTemp = tt; have_target_temp = 1;}
105 tim 763 void setChiTolerance(double tol) {chiTolerance = tol;}
106     virtual double getConservedQuantity(void);
107 tim 837 virtual string getAdditionalParameters(void);
108 gezelter 560
109 mmeineke 540 protected:
110 gezelter 560
111 mmeineke 561 virtual void moveA( void );
112     virtual void moveB( void );
113 mmeineke 540
114 mmeineke 561 virtual int readyCheck();
115 gezelter 560
116 mmeineke 746 virtual void resetIntegrator( void );
117    
118 gezelter 565 // chi is a propagated degree of freedom.
119 gezelter 560
120 gezelter 565 double chi;
121 gezelter 560
122 tim 763 //integral of chi(t)dt
123     double integralOfChidt;
124    
125 gezelter 565 // targetTemp must be set. tauThermostat must also be set;
126 gezelter 560
127     double targetTemp;
128     double tauThermostat;
129 tim 837
130 gezelter 565 short int have_tau_thermostat, have_target_temp;
131 gezelter 560
132 tim 763 double *oldVel;
133     double *oldJi;
134    
135     double chiTolerance;
136     short int have_chi_tolerance;
137    
138 mmeineke 540 };
139    
140    
141    
142 mmeineke 778 template<typename T> class NPT : public T{
143 tim 645
144 gezelter 560 public:
145    
146 mmeineke 778 NPT ( SimInfo *theInfo, ForceFields* the_ff);
147     virtual ~NPT();
148 tim 837
149 mmeineke 594 virtual void integrateStep( int calcPot, int calcStress ){
150     calcStress = 1;
151 tim 645 T::integrateStep( calcPot, calcStress );
152 mmeineke 594 }
153    
154 mmeineke 778 virtual double getConservedQuantity(void) = 0;
155 tim 837 virtual string getAdditionalParameters(void) = 0;
156 mmeineke 843
157     double myTauThermo( void ) { return tauThermostat; }
158     double myTauBaro( void ) { return tauBarostat; }
159    
160 gezelter 560 void setTauThermostat(double tt) {tauThermostat = tt; have_tau_thermostat=1;}
161     void setTauBarostat(double tb) {tauBarostat = tb; have_tau_barostat=1;}
162     void setTargetTemp(double tt) {targetTemp = tt; have_target_temp = 1;}
163     void setTargetPressure(double tp) {targetPressure = tp; have_target_pressure = 1;}
164 tim 763 void setChiTolerance(double tol) {chiTolerance = tol; have_chi_tolerance = 1;}
165     void setPosIterTolerance(double tol) {posIterTolerance = tol; have_pos_iter_tolerance = 1;}
166     void setEtaTolerance(double tol) {etaTolerance = tol; have_eta_tolerance = 1;}
167 gezelter 560
168     protected:
169    
170 mmeineke 561 virtual void moveA( void );
171     virtual void moveB( void );
172 gezelter 560
173 mmeineke 561 virtual int readyCheck();
174 gezelter 560
175 mmeineke 746 virtual void resetIntegrator( void );
176    
177 mmeineke 778 virtual void getVelScaleA( double sc[3], double vel[3] ) = 0;
178     virtual void getVelScaleB( double sc[3], int index ) = 0;
179 tim 837 virtual void getPosScale(double pos[3], double COM[3],
180 mmeineke 778 int index, double sc[3]) = 0;
181    
182     virtual bool chiConverged( void );
183     virtual bool etaConverged( void ) = 0;
184 tim 837
185 mmeineke 778 virtual void evolveChiA( void );
186     virtual void evolveEtaA( void ) = 0;
187     virtual void evolveChiB( void );
188     virtual void evolveEtaB( void ) = 0;
189    
190     virtual void scaleSimBox( void ) = 0;
191    
192 tim 763 void accIntegralOfChidt(void) { integralOfChidt += dt * chi;}
193    
194 gezelter 565 // chi and eta are the propagated degrees of freedom
195 gezelter 560
196 mmeineke 778 double oldChi;
197     double prevChi;
198 gezelter 565 double chi;
199 gezelter 574 double NkBT;
200 tim 763 double fkBT;
201 gezelter 560
202 mmeineke 778 double tt2, tb2;
203     double instaTemp, instaPress, instaVol;
204 mmeineke 780 double press[3][3];
205 mmeineke 778
206 tim 763 int Nparticles;
207    
208     double integralOfChidt;
209    
210 tim 837 // targetTemp, targetPressure, and tauBarostat must be set.
211 gezelter 560 // One of qmass or tauThermostat must be set;
212    
213     double targetTemp;
214     double targetPressure;
215     double tauThermostat;
216     double tauBarostat;
217    
218     short int have_tau_thermostat, have_tau_barostat, have_target_temp;
219 gezelter 565 short int have_target_pressure;
220 gezelter 560
221 tim 763 double *oldPos;
222     double *oldVel;
223     double *oldJi;
224    
225     double chiTolerance;
226     short int have_chi_tolerance;
227     double posIterTolerance;
228     short int have_pos_iter_tolerance;
229     double etaTolerance;
230     short int have_eta_tolerance;
231    
232 gezelter 560 };
233    
234 mmeineke 778 template<typename T> class NPTi : public T{
235 tim 837
236 mmeineke 778 public:
237     NPTi( SimInfo *theInfo, ForceFields* the_ff);
238     ~NPTi();
239    
240     virtual double getConservedQuantity(void);
241     virtual void resetIntegrator(void);
242 tim 837 virtual string getAdditionalParameters(void);
243 mmeineke 778 protected:
244    
245    
246 tim 837
247 mmeineke 778 virtual void evolveEtaA(void);
248     virtual void evolveEtaB(void);
249    
250     virtual bool etaConverged( void );
251    
252     virtual void scaleSimBox( void );
253    
254     virtual void getVelScaleA( double sc[3], double vel[3] );
255     virtual void getVelScaleB( double sc[3], int index );
256 tim 837 virtual void getPosScale(double pos[3], double COM[3],
257 mmeineke 778 int index, double sc[3]);
258    
259     double eta, oldEta, prevEta;
260     };
261    
262 tim 645 template<typename T> class NPTf : public T{
263 gezelter 576
264     public:
265    
266     NPTf ( SimInfo *theInfo, ForceFields* the_ff);
267 tim 767 virtual ~NPTf();
268 gezelter 576
269 tim 763 virtual double getConservedQuantity(void);
270 tim 837 virtual string getAdditionalParameters(void);
271 mmeineke 780 virtual void resetIntegrator(void);
272 mmeineke 594
273 gezelter 576 protected:
274    
275 mmeineke 780 virtual void evolveEtaA(void);
276     virtual void evolveEtaB(void);
277 gezelter 576
278 mmeineke 780 virtual bool etaConverged( void );
279 mmeineke 746
280 mmeineke 780 virtual void scaleSimBox( void );
281 gezelter 576
282 mmeineke 780 virtual void getVelScaleA( double sc[3], double vel[3] );
283     virtual void getVelScaleB( double sc[3], int index );
284 tim 837 virtual void getPosScale(double pos[3], double COM[3],
285 mmeineke 780 int index, double sc[3]);
286 tim 763
287 gezelter 588 double eta[3][3];
288 mmeineke 780 double oldEta[3][3];
289     double prevEta[3][3];
290 gezelter 576 };
291    
292 mmeineke 812 template<typename T> class NPTxyz : public T{
293 mmeineke 755
294     public:
295    
296 mmeineke 812 NPTxyz ( SimInfo *theInfo, ForceFields* the_ff);
297     virtual ~NPTxyz();
298 mmeineke 755
299 mmeineke 812 virtual double getConservedQuantity(void);
300 tim 837 virtual string getAdditionalParameters(void);
301 mmeineke 812 virtual void resetIntegrator(void);
302 mmeineke 755
303     protected:
304    
305 mmeineke 812 virtual void evolveEtaA(void);
306     virtual void evolveEtaB(void);
307 mmeineke 755
308 mmeineke 812 virtual bool etaConverged( void );
309 mmeineke 755
310 mmeineke 812 virtual void scaleSimBox( void );
311 mmeineke 755
312 mmeineke 812 virtual void getVelScaleA( double sc[3], double vel[3] );
313     virtual void getVelScaleB( double sc[3], int index );
314 tim 837 virtual void getPosScale(double pos[3], double COM[3],
315 mmeineke 812 int index, double sc[3]);
316 mmeineke 755
317 mmeineke 812 double eta[3][3];
318     double oldEta[3][3];
319     double prevEta[3][3];
320     };
321 mmeineke 755
322    
323 tim 658 template<typename T> class ZConstraint : public T {
324 tim 837
325     public:
326 tim 738 class ForceSubtractionPolicy{
327 tim 699 public:
328 tim 738 ForceSubtractionPolicy(ZConstraint<T>* integrator) {zconsIntegrator = integrator;}
329 tim 658
330 tim 837 virtual void update() = 0;
331 tim 699 virtual double getZFOfFixedZMols(Molecule* mol, Atom* atom, double totalForce) = 0;
332     virtual double getZFOfMovingMols(Atom* atom, double totalForce) = 0;
333 tim 701 virtual double getHFOfFixedZMols(Molecule* mol, Atom* atom, double totalForce) = 0;
334     virtual double getHFOfUnconsMols(Atom* atom, double totalForce) = 0;
335 tim 837
336 tim 701 protected:
337 mmeineke 788 ZConstraint<T>* zconsIntegrator;
338 tim 699 };
339    
340 tim 738 class PolicyByNumber : public ForceSubtractionPolicy{
341 gezelter 747
342 tim 699 public:
343 tim 837 PolicyByNumber(ZConstraint<T>* integrator) :ForceSubtractionPolicy(integrator) {}
344     virtual void update();
345 tim 699 virtual double getZFOfFixedZMols(Molecule* mol, Atom* atom, double totalForce) ;
346     virtual double getZFOfMovingMols(Atom* atom, double totalForce) ;
347 tim 701 virtual double getHFOfFixedZMols(Molecule* mol, Atom* atom, double totalForce);
348     virtual double getHFOfUnconsMols(Atom* atom, double totalForce);
349 tim 837
350 tim 699 private:
351 tim 763 int totNumOfMovingAtoms;
352 tim 699 };
353    
354 tim 738 class PolicyByMass : public ForceSubtractionPolicy{
355 gezelter 747
356 tim 699 public:
357 tim 837 PolicyByMass(ZConstraint<T>* integrator) :ForceSubtractionPolicy(integrator) {}
358    
359     virtual void update();
360 tim 699 virtual double getZFOfFixedZMols(Molecule* mol, Atom* atom, double totalForce) ;
361     virtual double getZFOfMovingMols(Atom* atom, double totalForce) ;
362 tim 701 virtual double getHFOfFixedZMols(Molecule* mol, Atom* atom, double totalForce);
363     virtual double getHFOfUnconsMols(Atom* atom, double totalForce);
364 tim 699
365 tim 701 private:
366     double totMassOfMovingAtoms;
367 tim 699 };
368    
369 tim 658 public:
370    
371     ZConstraint( SimInfo *theInfo, ForceFields* the_ff);
372     ~ZConstraint();
373 tim 837
374 tim 658 void setZConsTime(double time) {this->zconsTime = time;}
375     void getZConsTime() {return zconsTime;}
376 tim 837
377 tim 701 void setIndexOfAllZConsMols(vector<int> index) {indexOfAllZConsMols = index;}
378     void getIndexOfAllZConsMols() {return indexOfAllZConsMols;}
379 tim 837
380 tim 701 void setZConsOutput(const char * fileName) {zconsOutput = fileName;}
381 tim 658 string getZConsOutput() {return zconsOutput;}
382 tim 837
383 tim 677 virtual void integrate();
384 tim 658
385 tim 837
386 tim 658 #ifdef IS_MPI
387 tim 701 virtual void update(); //which is called to indicate the molecules' migration
388 mmeineke 377 #endif
389 tim 658
390 tim 837 enum ZConsState {zcsMoving, zcsFixed};
391 mmeineke 790
392     vector<Molecule*> zconsMols; //z-constraint molecules array
393     vector<ZConsState> states; //state of z-constraint molecules
394    
395    
396 tim 837
397 mmeineke 790 int totNumOfUnconsAtoms; //total number of uncontraint atoms
398     double totalMassOfUncons; //total mas of unconstraint molecules
399    
400    
401 tim 658 protected:
402    
403 mmeineke 790
404 tim 837
405     virtual void calcForce( int calcPot, int calcStress );
406 tim 677 virtual void thermalize(void);
407 tim 837
408 tim 677 void zeroOutVel();
409     void doZconstraintForce();
410 tim 682 void doHarmonic();
411 tim 677 bool checkZConsState();
412    
413     bool haveFixedZMols();
414     bool haveMovingZMols();
415    
416     double calcZSys();
417    
418     int isZConstraintMol(Molecule* mol);
419    
420    
421 tim 701 double zconsTime; //sample time
422     double zconsTol; //tolerance of z-contratint
423     double zForceConst; //base force constant term
424     //which is estimate by OOPSE
425 mmeineke 790
426 tim 837
427     vector<double> massOfZConsMols; //mass of z-constraint molecule
428 tim 701 vector<double> kz; //force constant array
429 mmeineke 790
430 tim 701 vector<double> zPos; //
431 tim 837
432    
433 tim 701 vector<Molecule*> unconsMols; //unconstraint molecules array
434     vector<double> massOfUnconsMols; //mass array of unconstraint molecules
435 tim 682
436 mmeineke 790
437 tim 701 vector<ZConsParaItem>* parameters; //
438 tim 837
439 tim 658 vector<int> indexOfAllZConsMols; //index of All Z-Constraint Molecuels
440 tim 677
441 tim 837 int* indexOfZConsMols; //index of local Z-Constraint Molecules
442 tim 658 double* fz;
443 tim 699 double* curZPos;
444 tim 677
445 mmeineke 790
446 tim 837
447     int whichDirection; //constraint direction
448    
449 tim 658 private:
450 tim 837
451 tim 701 string zconsOutput; //filename of zconstraint output
452     ZConsWriter* fzOut; //z-constraint writer
453 tim 677
454 tim 837 double curZconsTime;
455 tim 699
456 tim 696 double calcMovingMolsCOMVel();
457     double calcSysCOMVel();
458     double calcTotalForce();
459 tim 837
460 gezelter 747 ForceSubtractionPolicy* forcePolicy; //force subtraction policy
461 tim 738 friend class ForceSubtractionPolicy;
462 tim 677
463 tim 658 };
464    
465     #endif