| [6bb72a] | 1 | /*
 | 
|---|
 | 2 |  * Project: MoleCuilder
 | 
|---|
 | 3 |  * Description: creates and alters molecular systems
 | 
|---|
 | 4 |  * Copyright (C)  2012 University of Bonn. All rights reserved.
 | 
|---|
 | 5 |  * Please see the COPYING file or "Copyright notice" in builder.cpp for details.
 | 
|---|
 | 6 |  * 
 | 
|---|
 | 7 |  *
 | 
|---|
 | 8 |  *   This file is part of MoleCuilder.
 | 
|---|
 | 9 |  *
 | 
|---|
 | 10 |  *    MoleCuilder is free software: you can redistribute it and/or modify
 | 
|---|
 | 11 |  *    it under the terms of the GNU General Public License as published by
 | 
|---|
 | 12 |  *    the Free Software Foundation, either version 2 of the License, or
 | 
|---|
 | 13 |  *    (at your option) any later version.
 | 
|---|
 | 14 |  *
 | 
|---|
 | 15 |  *    MoleCuilder is distributed in the hope that it will be useful,
 | 
|---|
 | 16 |  *    but WITHOUT ANY WARRANTY; without even the implied warranty of
 | 
|---|
 | 17 |  *    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 | 
|---|
 | 18 |  *    GNU General Public License for more details.
 | 
|---|
 | 19 |  *
 | 
|---|
 | 20 |  *    You should have received a copy of the GNU General Public License
 | 
|---|
 | 21 |  *    along with MoleCuilder.  If not, see <http://www.gnu.org/licenses/>. 
 | 
|---|
 | 22 |  */
 | 
|---|
 | 23 | 
 | 
|---|
 | 24 | /*
 | 
|---|
 | 25 |  * PairPotential_Harmonic.cpp
 | 
|---|
 | 26 |  *
 | 
|---|
 | 27 |  *  Created on: Sep 26, 2012
 | 
|---|
 | 28 |  *      Author: heber
 | 
|---|
 | 29 |  */
 | 
|---|
 | 30 | 
 | 
|---|
 | 31 | 
 | 
|---|
 | 32 | // include config.h
 | 
|---|
 | 33 | #ifdef HAVE_CONFIG_H
 | 
|---|
 | 34 | #include <config.h>
 | 
|---|
 | 35 | #endif
 | 
|---|
 | 36 | 
 | 
|---|
 | 37 | #include "CodePatterns/MemDebug.hpp"
 | 
|---|
 | 38 | 
 | 
|---|
 | 39 | #include "PairPotential_Harmonic.hpp"
 | 
|---|
 | 40 | 
 | 
|---|
 | 41 | #include "CodePatterns/Assert.hpp"
 | 
|---|
 | 42 | 
 | 
|---|
 | 43 | #include "Potentials/helpers.hpp"
 | 
|---|
 | 44 | 
 | 
|---|
 | 45 | EmpiricalPotential::result_t
 | 
|---|
 | 46 | PairPotential_Harmonic::operator()(
 | 
|---|
 | 47 |     const arguments_t &arguments
 | 
|---|
 | 48 |     ) const
 | 
|---|
 | 49 | {
 | 
|---|
 | 50 |   ASSERT( arguments.size() == 1,
 | 
|---|
 | 51 |       "PairPotential_Harmonic::operator() - requires exactly one argument.");
 | 
|---|
 | 52 |   const argument_t &r_ij = arguments[0];
 | 
|---|
 | 53 |   const result_t result = spring_constant * Helpers::pow( r_ij.distance - equilibrium_distance, 2 );
 | 
|---|
 | 54 |   return result;
 | 
|---|
 | 55 | }
 | 
|---|
 | 56 | 
 | 
|---|
 | 57 | EmpiricalPotential::derivative_components_t
 | 
|---|
 | 58 | PairPotential_Harmonic::derivative(
 | 
|---|
 | 59 |     const arguments_t &arguments
 | 
|---|
 | 60 |     ) const
 | 
|---|
 | 61 | {
 | 
|---|
 | 62 |   ASSERT( arguments.size() == 1,
 | 
|---|
 | 63 |       "PairPotential_Harmonic::operator() - requires exactly one argument.");
 | 
|---|
 | 64 |   derivative_components_t result;
 | 
|---|
 | 65 |   const argument_t &r_ij = arguments[0];
 | 
|---|
 | 66 |   result.push_back( 2. * spring_constant * ( r_ij.distance - equilibrium_distance) );
 | 
|---|
 | 67 |   ASSERT( result.size() == 1,
 | 
|---|
 | 68 |       "PairPotential_Harmonic::operator() - we did not create exactly one component.");
 | 
|---|
 | 69 |   return result;
 | 
|---|
 | 70 | }
 | 
|---|