| [48d20d] | 1 | #
 | 
|---|
 | 2 | #    MoleCuilder - creates and alters molecular systems
 | 
|---|
 | 3 | #    Copyright (C) 2013 University of Bonn
 | 
|---|
| [5aaa43] | 4 | #    Copyright (C) 2013 Frederik Heber
 | 
|---|
| [48d20d] | 5 | #
 | 
|---|
 | 6 | #    This program is free software: you can redistribute it and/or modify
 | 
|---|
 | 7 | #    it under the terms of the GNU General Public License as published by
 | 
|---|
 | 8 | #    the Free Software Foundation, either version 3 of the License, or
 | 
|---|
 | 9 | #    (at your option) any later version.
 | 
|---|
 | 10 | #
 | 
|---|
 | 11 | #    This program is distributed in the hope that it will be useful,
 | 
|---|
 | 12 | #    but WITHOUT ANY WARRANTY; without even the implied warranty of
 | 
|---|
 | 13 | #    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 | 
|---|
 | 14 | #    GNU General Public License for more details.
 | 
|---|
 | 15 | #
 | 
|---|
 | 16 | #    You should have received a copy of the GNU General Public License
 | 
|---|
 | 17 | #    along with this program.  If not, see <http://www.gnu.org/licenses/>.
 | 
|---|
 | 18 | #
 | 
|---|
 | 19 | ### fit some potentials
 | 
|---|
 | 20 | 
 | 
|---|
 | 21 | AT_SETUP([Fragmentation - Fit morse potential to water])
 | 
|---|
 | 22 | AT_KEYWORDS([fragmentation fit-potential morse])
 | 
|---|
 | 23 | AT_SKIP_IF([../../molecuilder --fit-potential; if test ! $? -eq 0; then /bin/true;fi])
 | 
|---|
 | 24 | 
 | 
|---|
 | 25 | file=length_homology.dat
 | 
|---|
 | 26 | AT_CHECK([/bin/cp -f ${abs_top_srcdir}/tests/regression/Fragmentation/FitPotential/pre/$file $file], 0)
 | 
|---|
 | 27 | AT_CHECK([chmod u+w $file], 0, [ignore], [ignore])
 | 
|---|
 | 28 | AT_CHECK([../../molecuilder --fit-potential "morse" --homology-file $file --potential-charges 8 1 --fragment-charges 1 8 1 --take-best-of 5], 0, [stdout], [ignore])
 | 
|---|
 | 29 | # check that L_2 error is below 1e-6
 | 
|---|
 | 30 | AT_CHECK([grep "Best parameters with L2 error" stdout | awk '{if ($8 > 1e-6) exit 1}'], 0, [ignore], [ignore])
 | 
|---|
 | 31 | # check parameters to printed precision
 | 
|---|
 | 32 | AT_CHECK([grep "morse:.*particle_type1=8,.*particle_type2=1,.*spring_constant=1.2652,.*equilibrium_distance=1.78095,.*dissociation_energy=0.401285;" stdout], 0, [ignore], [ignore])
 | 
|---|
 | 33 | 
 | 
|---|
 | 34 | AT_CLEANUP
 | 
|---|
 | 35 | 
 | 
|---|
 | 36 | AT_SETUP([Fragmentation - Fit harmonic_angle potential to water])
 | 
|---|
 | 37 | AT_KEYWORDS([fragmentation fit-potential harmonic_angle])
 | 
|---|
 | 38 | AT_SKIP_IF([../../molecuilder --fit-potential; if test ! $? -eq 0; then /bin/true;fi])
 | 
|---|
 | 39 | 
 | 
|---|
 | 40 | file=angle_homology.dat
 | 
|---|
 | 41 | AT_CHECK([/bin/cp -f ${abs_top_srcdir}/tests/regression/Fragmentation/FitPotential/pre/$file $file], 0)
 | 
|---|
 | 42 | AT_CHECK([chmod u+w $file], 0, [ignore], [ignore])
 | 
|---|
 | 43 | AT_CHECK([../../molecuilder --fit-potential "harmonic_angle" --homology-file $file --potential-charges 1 8 1 --fragment-charges 1 8 1 --take-best-of 5], 0, [stdout], [ignore])
 | 
|---|
 | 44 | # check that L_2 error is below 1e-6
 | 
|---|
 | 45 | AT_CHECK([grep "||e||_2:" stdout | awk '{if ($7 > 1e-6) exit 1}'], 0, [ignore], [ignore])
 | 
|---|
 | 46 | # check parameters to printed precision
 | 
|---|
 | 47 | AT_CHECK([grep "harmonic_angle:.*particle_type1=1,.*particle_type2=8,.*particle_type3=1,.*spring_constant=0.100497,.*equilibrium_distance=-0.274675;" stdout], 0, [ignore], [ignore])
 | 
|---|
 | 48 | 
 | 
|---|
 | 49 | AT_CLEANUP
 | 
|---|