1 | /*
|
---|
2 | * Project: MoleCuilder
|
---|
3 | * Description: creates and alters molecular systems
|
---|
4 | * Copyright (C) 2010-2012 University of Bonn. All rights reserved.
|
---|
5 | *
|
---|
6 | *
|
---|
7 | * This file is part of MoleCuilder.
|
---|
8 | *
|
---|
9 | * MoleCuilder is free software: you can redistribute it and/or modify
|
---|
10 | * it under the terms of the GNU General Public License as published by
|
---|
11 | * the Free Software Foundation, either version 2 of the License, or
|
---|
12 | * (at your option) any later version.
|
---|
13 | *
|
---|
14 | * MoleCuilder is distributed in the hope that it will be useful,
|
---|
15 | * but WITHOUT ANY WARRANTY; without even the implied warranty of
|
---|
16 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
---|
17 | * GNU General Public License for more details.
|
---|
18 | *
|
---|
19 | * You should have received a copy of the GNU General Public License
|
---|
20 | * along with MoleCuilder. If not, see <http://www.gnu.org/licenses/>.
|
---|
21 | */
|
---|
22 |
|
---|
23 | /*
|
---|
24 | * GaussianThermostat.cpp
|
---|
25 | *
|
---|
26 | * Created on: Aug 18, 2010
|
---|
27 | * Author: crueger
|
---|
28 | */
|
---|
29 |
|
---|
30 | // include config.h
|
---|
31 | #ifdef HAVE_CONFIG_H
|
---|
32 | #include <config.h>
|
---|
33 | #endif
|
---|
34 |
|
---|
35 | #include "CodePatterns/MemDebug.hpp"
|
---|
36 |
|
---|
37 | #include "GaussianThermostat.hpp"
|
---|
38 |
|
---|
39 | #include "Atom/AtomSet.hpp"
|
---|
40 | #include "CodePatterns/Log.hpp"
|
---|
41 | #include "config.hpp"
|
---|
42 | #include "Element/element.hpp"
|
---|
43 | #include "Helpers/defs.hpp"
|
---|
44 | #include "LinearAlgebra/Vector.hpp"
|
---|
45 | #include "Parser/PcpParser_helper.hpp"
|
---|
46 | #include "World.hpp"
|
---|
47 |
|
---|
48 | #include <set>
|
---|
49 |
|
---|
50 | GaussianThermostat::GaussianThermostat(int _ScaleTempStep) :
|
---|
51 | E(0),G(0),
|
---|
52 | ScaleTempStep(_ScaleTempStep)
|
---|
53 | {}
|
---|
54 |
|
---|
55 | GaussianThermostat::GaussianThermostat() :
|
---|
56 | E(0),G(0),
|
---|
57 | ScaleTempStep(25)
|
---|
58 | {}
|
---|
59 |
|
---|
60 | GaussianThermostat::~GaussianThermostat()
|
---|
61 | {}
|
---|
62 |
|
---|
63 | const char *ThermostatTraits<GaussianThermostat>::name = "Gaussian";
|
---|
64 |
|
---|
65 | std::string ThermostatTraits<GaussianThermostat>::getName(){
|
---|
66 | return ThermostatTraits<GaussianThermostat>::name;
|
---|
67 | }
|
---|
68 |
|
---|
69 | Thermostat *ThermostatTraits<GaussianThermostat>::make(class ConfigFileBuffer * const fb){
|
---|
70 | int ScaleTempStep;
|
---|
71 | const int verbose = 0;
|
---|
72 | ParseForParameter(verbose,fb,"Thermostat", 0, 2, 1, int_type, &ScaleTempStep, 1, critical); // read collision rate
|
---|
73 | return new class GaussianThermostat(ScaleTempStep);
|
---|
74 | }
|
---|
75 |
|
---|
76 | double GaussianThermostat::scaleAtoms(unsigned int step,double ActualTemp,ATOMSET(std::list) atoms){
|
---|
77 | return doScaleAtoms(step,ActualTemp,atoms.begin(),atoms.end());
|
---|
78 | }
|
---|
79 |
|
---|
80 | double GaussianThermostat::scaleAtoms(unsigned int step,double ActualTemp,ATOMSET(std::vector) atoms){
|
---|
81 | return doScaleAtoms(step,ActualTemp,atoms.begin(),atoms.end());
|
---|
82 | }
|
---|
83 |
|
---|
84 | double GaussianThermostat::scaleAtoms(unsigned int step,double ActualTemp,ATOMSET(std::set) atoms){
|
---|
85 | return doScaleAtoms(step,ActualTemp,atoms.begin(),atoms.end());
|
---|
86 | }
|
---|
87 |
|
---|
88 | template <class ForwardIterator>
|
---|
89 | double GaussianThermostat::doScaleAtoms(unsigned int step,double ActualTemp,ForwardIterator begin, ForwardIterator end){
|
---|
90 | LOG(2, "Applying Gaussian thermostat...");
|
---|
91 | init(step,begin,end);
|
---|
92 | double G_over_E = G/E;
|
---|
93 | LOG(1, "Gaussian Least Constraint constant is " << G_over_E << ".");
|
---|
94 | double ekin =0;
|
---|
95 | for(ForwardIterator iter=begin;iter!=end;++iter){
|
---|
96 | Vector U = (*iter)->getAtomicVelocityAtStep(step);
|
---|
97 | if ((*iter)->getFixedIon() == 0) {// even FixedIon moves, only not by other's forces
|
---|
98 | U += World::getInstance().getConfig()->Deltat * G_over_E * U;
|
---|
99 | ekin += (*iter)->getType()->getMass() * U.NormSquared();
|
---|
100 | }
|
---|
101 | (*iter)->setAtomicVelocityAtStep(step, U);
|
---|
102 | }
|
---|
103 | return ekin;
|
---|
104 | }
|
---|
105 |
|
---|
106 | template <class ForwardIterator>
|
---|
107 | void GaussianThermostat::init(unsigned int step,ForwardIterator begin, ForwardIterator end){
|
---|
108 | E=0;
|
---|
109 | G=0;
|
---|
110 | for(ForwardIterator iter=begin;iter!=end;++iter){
|
---|
111 | const Vector &U = (*iter)->getAtomicVelocityAtStep(step);
|
---|
112 | const Vector &F = (*iter)->getAtomicForceAtStep(step);
|
---|
113 | if ((*iter)->getFixedIon() == 0){ // even FixedIon moves, only not by other's forces
|
---|
114 | G += U.ScalarProduct(F);
|
---|
115 | E += U.NormSquared()*(*iter)->getType()->getMass();
|
---|
116 | }
|
---|
117 | }
|
---|
118 | }
|
---|
119 |
|
---|
120 | double GaussianThermostat::getE() const{
|
---|
121 | return E;
|
---|
122 | }
|
---|
123 |
|
---|
124 | double GaussianThermostat::getG() const{
|
---|
125 | return G;
|
---|
126 | }
|
---|
127 |
|
---|
128 | std::string GaussianThermostat::name(){
|
---|
129 | return ThermostatTraits<GaussianThermostat>::name;
|
---|
130 | }
|
---|
131 |
|
---|
132 | std::string GaussianThermostat::writeParams(){
|
---|
133 | std::stringstream sstr;
|
---|
134 | sstr << ScaleTempStep;
|
---|
135 | return sstr.str();
|
---|
136 | }
|
---|