| 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 | }
 | 
|---|