[3c1465] | 1 | /*
|
---|
| 2 | * Project: MoleCuilder
|
---|
| 3 | * Description: creates and alters molecular systems
|
---|
| 4 | * Copyright (C) 2012 University of Bonn. All rights reserved.
|
---|
[acc9b1] | 5 | * Copyright (C) 2013 Frederik Heber. All rights reserved.
|
---|
[3c1465] | 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_HarmonicUnitTest.cpp
|
---|
| 26 | *
|
---|
| 27 | * Created on: Oct 04, 2012
|
---|
| 28 | * Author: heber
|
---|
| 29 | */
|
---|
| 30 |
|
---|
| 31 | // include config.h
|
---|
| 32 | #ifdef HAVE_CONFIG_H
|
---|
| 33 | #include <config.h>
|
---|
| 34 | #endif
|
---|
| 35 |
|
---|
| 36 | using namespace std;
|
---|
| 37 |
|
---|
| 38 | #include <cppunit/CompilerOutputter.h>
|
---|
| 39 | #include <cppunit/extensions/TestFactoryRegistry.h>
|
---|
| 40 | #include <cppunit/ui/text/TestRunner.h>
|
---|
| 41 |
|
---|
| 42 | #include "PairPotential_HarmonicUnitTest.hpp"
|
---|
| 43 |
|
---|
| 44 | #include <boost/assign.hpp>
|
---|
| 45 |
|
---|
| 46 | #include "CodePatterns/Assert.hpp"
|
---|
| 47 |
|
---|
| 48 | #include "FunctionApproximation/FunctionArgument.hpp"
|
---|
| 49 | #include "Potentials/Specifics/PairPotential_Harmonic.hpp"
|
---|
| 50 | #include "Potentials/helpers.hpp"
|
---|
| 51 |
|
---|
| 52 | using namespace boost::assign;
|
---|
| 53 |
|
---|
| 54 | #ifdef HAVE_TESTRUNNER
|
---|
| 55 | #include "UnitTestMain.hpp"
|
---|
| 56 | #endif /*HAVE_TESTRUNNER*/
|
---|
| 57 |
|
---|
| 58 | /********************************************** Test classes **************************************/
|
---|
| 59 |
|
---|
| 60 | // Registers the fixture into the 'registry'
|
---|
| 61 | CPPUNIT_TEST_SUITE_REGISTRATION( PairPotential_HarmonicTest );
|
---|
| 62 |
|
---|
| 63 |
|
---|
| 64 | void PairPotential_HarmonicTest::setUp()
|
---|
| 65 | {
|
---|
| 66 | // failing asserts should be thrown
|
---|
| 67 | ASSERT_DO(Assert::Throw);
|
---|
| 68 |
|
---|
| 69 | input += 0., 1., 2., 3., 4., 5., 6., 7., 8., 9.;
|
---|
| 70 | output +=
|
---|
[065a16] | 71 | .5*1.,
|
---|
| 72 | .5*0.,
|
---|
| 73 | .5*1.,
|
---|
| 74 | .5*4.,
|
---|
| 75 | .5*9.,
|
---|
| 76 | .5*16.,
|
---|
| 77 | .5*25.,
|
---|
| 78 | .5*36.,
|
---|
| 79 | .5*49.,
|
---|
| 80 | .5*64.;
|
---|
[3c1465] | 81 |
|
---|
| 82 | CPPUNIT_ASSERT_EQUAL( input.size(), output.size() );
|
---|
| 83 | }
|
---|
| 84 |
|
---|
| 85 |
|
---|
| 86 | void PairPotential_HarmonicTest::tearDown()
|
---|
| 87 | {
|
---|
| 88 | }
|
---|
| 89 |
|
---|
| 90 | /** UnitTest for operator()
|
---|
| 91 | */
|
---|
| 92 | void PairPotential_HarmonicTest::operatorTest()
|
---|
| 93 | {
|
---|
[ed2551] | 94 | PairPotential_Harmonic::ParticleTypes_t types =
|
---|
| 95 | boost::assign::list_of<PairPotential_Harmonic::ParticleType_t>
|
---|
| 96 | (0)(1)
|
---|
| 97 | ;
|
---|
[065a16] | 98 | PairPotential_Harmonic harmonic(types, .5,1.);
|
---|
[3c1465] | 99 | for (size_t index = 0; index < input.size(); ++index) {
|
---|
[55fe788] | 100 | argument_t arg(argument_t::indices_t(0,1), argument_t::types_t(0,1), input[index]);
|
---|
[3c1465] | 101 | CPPUNIT_ASSERT(
|
---|
| 102 | Helpers::isEqual(
|
---|
| 103 | output[index],
|
---|
[e1fe7e] | 104 | harmonic( FunctionModel::list_of_arguments_t(1, FunctionModel::arguments_t(1,arg)) )[0]
|
---|
[3c1465] | 105 | )
|
---|
| 106 | );
|
---|
| 107 | }
|
---|
| 108 | }
|
---|
| 109 |
|
---|
| 110 | /** UnitTest for derivative()
|
---|
| 111 | */
|
---|
| 112 | void PairPotential_HarmonicTest::derivativeTest()
|
---|
| 113 | {
|
---|
[ed2551] | 114 | PairPotential_Harmonic::ParticleTypes_t types =
|
---|
| 115 | boost::assign::list_of<PairPotential_Harmonic::ParticleType_t>
|
---|
| 116 | (0)(1)
|
---|
| 117 | ;
|
---|
[065a16] | 118 | PairPotential_Harmonic harmonic(types, .5,1.);
|
---|
[55fe788] | 119 | argument_t arg(argument_t::indices_t(0,1), argument_t::types_t(0,1), 1.);
|
---|
[3c1465] | 120 | CPPUNIT_ASSERT(
|
---|
| 121 | Helpers::isEqual(
|
---|
| 122 | 0.,
|
---|
| 123 | harmonic.derivative(
|
---|
[e1fe7e] | 124 | FunctionModel::list_of_arguments_t(1, FunctionModel::arguments_t(1,arg))
|
---|
[3c1465] | 125 | )[0]
|
---|
| 126 | )
|
---|
| 127 | );
|
---|
| 128 | }
|
---|
| 129 |
|
---|
| 130 |
|
---|
| 131 | /** UnitTest for parameter_derivative()
|
---|
| 132 | */
|
---|
| 133 | void PairPotential_HarmonicTest::parameter_derivativeTest()
|
---|
| 134 | {
|
---|
[ed2551] | 135 | PairPotential_Harmonic::ParticleTypes_t types =
|
---|
| 136 | boost::assign::list_of<PairPotential_Harmonic::ParticleType_t>
|
---|
| 137 | (0)(1)
|
---|
| 138 | ;
|
---|
[065a16] | 139 | PairPotential_Harmonic harmonic(types, .5,1.);
|
---|
[55fe788] | 140 | argument_t arg(argument_t::indices_t(0,1), argument_t::types_t(0,1), 1.);
|
---|
[3c1465] | 141 | CPPUNIT_ASSERT(
|
---|
| 142 | Helpers::isEqual(
|
---|
| 143 | 0.,
|
---|
| 144 | harmonic.parameter_derivative(
|
---|
[e1fe7e] | 145 | FunctionModel::list_of_arguments_t(1, FunctionModel::arguments_t(1,arg)),
|
---|
[3c1465] | 146 | 0
|
---|
| 147 | )[0]
|
---|
| 148 | )
|
---|
| 149 | );
|
---|
| 150 | CPPUNIT_ASSERT(
|
---|
| 151 | Helpers::isEqual(
|
---|
| 152 | 0.,
|
---|
| 153 | harmonic.parameter_derivative(
|
---|
[e1fe7e] | 154 | FunctionModel::list_of_arguments_t(1, FunctionModel::arguments_t(1,arg)),
|
---|
[3c1465] | 155 | 1
|
---|
| 156 | )[0]
|
---|
| 157 | )
|
---|
| 158 | );
|
---|
| 159 | }
|
---|