[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])
|
---|
[919c8a] | 23 | AT_XFAIL_IF([/bin/true])
|
---|
[85dee9] | 24 | AT_SKIP_IF([../../molecuilder --help --actionname fit-potential; if test $? -eq 5; then /bin/true; else /bin/false; fi])
|
---|
[48d20d] | 25 |
|
---|
| 26 | file=length_homology.dat
|
---|
| 27 | AT_CHECK([/bin/cp -f ${abs_top_srcdir}/tests/regression/Fragmentation/FitPotential/pre/$file $file], 0)
|
---|
| 28 | AT_CHECK([chmod u+w $file], 0, [ignore], [ignore])
|
---|
| 29 | 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])
|
---|
| 30 | # check that L_2 error is below 1e-6
|
---|
| 31 | AT_CHECK([grep "Best parameters with L2 error" stdout | awk '{if ($8 > 1e-6) exit 1}'], 0, [ignore], [ignore])
|
---|
| 32 | # check parameters to printed precision
|
---|
| 33 | 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])
|
---|
| 34 |
|
---|
| 35 | AT_CLEANUP
|
---|
| 36 |
|
---|
| 37 | AT_SETUP([Fragmentation - Fit harmonic_angle potential to water])
|
---|
| 38 | AT_KEYWORDS([fragmentation fit-potential harmonic_angle])
|
---|
[1e242a] | 39 | AT_XFAIL_IF([/bin/true])
|
---|
[85dee9] | 40 | AT_SKIP_IF([../../molecuilder --help --actionname fit-potential; if test $? -eq 5; then /bin/true; else /bin/false; fi])
|
---|
[48d20d] | 41 |
|
---|
| 42 | file=angle_homology.dat
|
---|
| 43 | AT_CHECK([/bin/cp -f ${abs_top_srcdir}/tests/regression/Fragmentation/FitPotential/pre/$file $file], 0)
|
---|
| 44 | AT_CHECK([chmod u+w $file], 0, [ignore], [ignore])
|
---|
| 45 | 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])
|
---|
| 46 | # check that L_2 error is below 1e-6
|
---|
| 47 | AT_CHECK([grep "||e||_2:" stdout | awk '{if ($7 > 1e-6) exit 1}'], 0, [ignore], [ignore])
|
---|
| 48 | # check parameters to printed precision
|
---|
| 49 | 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])
|
---|
| 50 |
|
---|
| 51 | AT_CLEANUP
|
---|