| [abae35] | 1 | /*
 | 
|---|
 | 2 |  * Project: MoleCuilder
 | 
|---|
 | 3 |  * Description: creates and alters molecular systems
 | 
|---|
| [0aa122] | 4 |  * Copyright (C)  2010-2012 University of Bonn. All rights reserved.
 | 
|---|
| [94d5ac6] | 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/>.
 | 
|---|
| [abae35] | 21 |  */
 | 
|---|
 | 22 | 
 | 
|---|
| [194649] | 23 | /*
 | 
|---|
 | 24 |  * Berendsen.cpp
 | 
|---|
 | 25 |  *
 | 
|---|
 | 26 |  *  Created on: Aug 20, 2010
 | 
|---|
 | 27 |  *      Author: crueger
 | 
|---|
 | 28 |  */
 | 
|---|
 | 29 | 
 | 
|---|
| [d2b28f] | 30 | // include config.h
 | 
|---|
 | 31 | #ifdef HAVE_CONFIG_H
 | 
|---|
 | 32 | #include <config.h>
 | 
|---|
 | 33 | #endif
 | 
|---|
 | 34 | 
 | 
|---|
| [ad011c] | 35 | #include "CodePatterns/MemDebug.hpp"
 | 
|---|
| [d2b28f] | 36 | 
 | 
|---|
| [194649] | 37 | #include "Berendsen.hpp"
 | 
|---|
| [41a467] | 38 | 
 | 
|---|
| [ad011c] | 39 | #include "CodePatterns/Log.hpp"
 | 
|---|
| [41a467] | 40 | #include "config.hpp"
 | 
|---|
 | 41 | #include "Element/element.hpp"
 | 
|---|
| [255829] | 42 | #include "Helpers/defs.hpp"
 | 
|---|
| [41a467] | 43 | #include "Parser/PcpParser_helper.hpp"
 | 
|---|
| [ab26c3] | 44 | #include "Thermostats/ThermoStatContainer.hpp"
 | 
|---|
| [579a81] | 45 | #include "World.hpp"
 | 
|---|
| [194649] | 46 | 
 | 
|---|
| [579a81] | 47 | Berendsen::Berendsen(double _TempFrequency) :
 | 
|---|
 | 48 |   TempFrequency(_TempFrequency)
 | 
|---|
| [194649] | 49 | {}
 | 
|---|
 | 50 | 
 | 
|---|
| [3e4162] | 51 | Berendsen::Berendsen() :
 | 
|---|
 | 52 |   TempFrequency(2.5)
 | 
|---|
 | 53 | {}
 | 
|---|
 | 54 | 
 | 
|---|
| [194649] | 55 | Berendsen::~Berendsen()
 | 
|---|
 | 56 | {}
 | 
|---|
 | 57 | 
 | 
|---|
| [14c57a] | 58 | const char *ThermostatTraits<Berendsen>::name = "Berendsen";
 | 
|---|
 | 59 | 
 | 
|---|
 | 60 | std::string ThermostatTraits<Berendsen>::getName(){
 | 
|---|
 | 61 |   return ThermostatTraits<Berendsen>::name;
 | 
|---|
 | 62 | }
 | 
|---|
| [579a81] | 63 | 
 | 
|---|
| [14c57a] | 64 | Thermostat *ThermostatTraits<Berendsen>::make(class ConfigFileBuffer * const fb){
 | 
|---|
| [c0c650] | 65 |   double TempFrequency;
 | 
|---|
 | 66 |   const int verbose = 0;
 | 
|---|
 | 67 |   ParseForParameter(verbose,fb,"Thermostat", 0, 2, 1, double_type, &TempFrequency, 1, critical); // read \tau_T
 | 
|---|
| [14c57a] | 68 |   return new Berendsen(TempFrequency);
 | 
|---|
| [c0c650] | 69 | }
 | 
|---|
| [579a81] | 70 | 
 | 
|---|
 | 71 | double Berendsen::scaleAtoms(unsigned int step,double ActualTemp,ATOMSET(std::list) atoms){
 | 
|---|
 | 72 |   return doScaleAtoms(step,ActualTemp,atoms.begin(),atoms.end());
 | 
|---|
| [194649] | 73 | }
 | 
|---|
 | 74 | 
 | 
|---|
| [579a81] | 75 | double Berendsen::scaleAtoms(unsigned int step,double ActualTemp,ATOMSET(std::vector) atoms){
 | 
|---|
 | 76 |   return doScaleAtoms(step,ActualTemp,atoms.begin(),atoms.end());
 | 
|---|
| [194649] | 77 | }
 | 
|---|
 | 78 | 
 | 
|---|
| [579a81] | 79 | double Berendsen::scaleAtoms(unsigned int step,double ActualTemp,ATOMSET(std::set) atoms){
 | 
|---|
 | 80 |   return doScaleAtoms(step,ActualTemp,atoms.begin(),atoms.end());
 | 
|---|
| [194649] | 81 | }
 | 
|---|
 | 82 | 
 | 
|---|
 | 83 | template <class ForwardIterator>
 | 
|---|
| [579a81] | 84 | double Berendsen::doScaleAtoms(unsigned int step,double ActualTemp,ForwardIterator begin, ForwardIterator end){
 | 
|---|
| [47d041] | 85 |   LOG(2,  "Applying Berendsen-VanGunsteren thermostat...");
 | 
|---|
| [14c57a] | 86 |   double ekin=0;
 | 
|---|
| [f73351] | 87 |   if (fabs(ActualTemp) > MYEPSILON) {
 | 
|---|
 | 88 |     double ScaleTempFactor = getContainer().TargetTemp/ActualTemp;
 | 
|---|
 | 89 |     for(ForwardIterator iter=begin;iter!=end;++iter){
 | 
|---|
 | 90 |       Vector U = (*iter)->getAtomicVelocityAtStep(step);
 | 
|---|
 | 91 |       if ((*iter)->getFixedIon() == 0) { // even FixedIon moves, only not by other's forces
 | 
|---|
 | 92 |         U *= sqrt(1+(World::getInstance().getConfig()->Deltat/TempFrequency)*(ScaleTempFactor-1));
 | 
|---|
 | 93 |         ekin += 0.5*(*iter)->getType()->getMass() * U.NormSquared();
 | 
|---|
 | 94 |       }
 | 
|---|
 | 95 |       (*iter)->setAtomicVelocityAtStep(step, U);
 | 
|---|
| [194649] | 96 |     }
 | 
|---|
 | 97 |   }
 | 
|---|
 | 98 |   return ekin;
 | 
|---|
 | 99 | }
 | 
|---|
| [579a81] | 100 | 
 | 
|---|
 | 101 | std::string Berendsen::name(){
 | 
|---|
| [14c57a] | 102 |   return ThermostatTraits<Berendsen>::name;
 | 
|---|
| [579a81] | 103 | }
 | 
|---|
 | 104 | 
 | 
|---|
| [c0c650] | 105 | std::string Berendsen::writeParams(){
 | 
|---|
| [579a81] | 106 |   stringstream sstr;
 | 
|---|
 | 107 |   sstr << TempFrequency;
 | 
|---|
 | 108 |   return sstr.str();
 | 
|---|
 | 109 | }
 | 
|---|