| [6253ed] | 1 | # | 
|---|
|  | 2 | #    MoleCuilder - creates and alters molecular systems | 
|---|
|  | 3 | #    Copyright (C) 2008-2012 University of Bonn | 
|---|
|  | 4 | # | 
|---|
|  | 5 | #    This program is free software: you can redistribute it and/or modify | 
|---|
|  | 6 | #    it under the terms of the GNU General Public License as published by | 
|---|
|  | 7 | #    the Free Software Foundation, either version 3 of the License, or | 
|---|
|  | 8 | #    (at your option) any later version. | 
|---|
|  | 9 | # | 
|---|
|  | 10 | #    This program is distributed in the hope that it will be useful, | 
|---|
|  | 11 | #    but WITHOUT ANY WARRANTY; without even the implied warranty of | 
|---|
|  | 12 | #    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the | 
|---|
|  | 13 | #    GNU General Public License for more details. | 
|---|
|  | 14 | # | 
|---|
|  | 15 | #    You should have received a copy of the GNU General Public License | 
|---|
|  | 16 | #    along with this program.  If not, see <http://www.gnu.org/licenses/>. | 
|---|
|  | 17 | # | 
|---|
| [3e1b7b] | 18 | ### 3. (un)select all atoms inside a tiny sphere | 
|---|
|  | 19 |  | 
|---|
|  | 20 | AT_SETUP([Unselection - All atoms inside tiny sphere]) | 
|---|
|  | 21 | AT_KEYWORDS([unselection atom sphere unselect-atoms-inside-sphere]) | 
|---|
|  | 22 |  | 
|---|
|  | 23 | file=allatomsinsidetinysphere.xyz | 
|---|
|  | 24 | AT_CHECK([/bin/cp -f ${abs_top_srcdir}/tests/regression/Selection/Atoms/AtomsInsideSphere/pre/box.xyz $file], 0) | 
|---|
|  | 25 | AT_CHECK([chmod u+w $file], 0) | 
|---|
| [024c65] | 26 | AT_CHECK([../../molecuilder -i $file -v 2 --select-all-atoms --create-shape --shape-name "sphere1" --shape-type "sphere" --translation "10,10,10" --stretch "1.65, 1.65, 1.65" --angle-x 0. --angle-y 0. --angle-z 0. --select-shape-by-name "sphere1" --unselect-atoms-inside-volume -r], 0, [stdout], [stderr]) | 
|---|
| [3e1b7b] | 27 | AT_CHECK([diff -I '.*Created by molecuilder.*' $file ${abs_top_srcdir}/tests/regression/Selection/Atoms/AtomsInsideSphere/post/allatomsinsidetinysphere.xyz], 0, [ignore], [ignore]) | 
|---|
|  | 28 |  | 
|---|
|  | 29 | # check size of sphere | 
|---|
|  | 30 | AT_SKIP_IF([! awk '' < /dev/null])  # check whether awk is there | 
|---|
|  | 31 | AT_SKIP_IF([! cat >/dev/null < /dev/null])  # check whether cat is there | 
|---|
|  | 32 | AT_SKIP_IF([! wc -l /dev/null])  # check whether wc is there | 
|---|
|  | 33 | AT_CHECK([cat < $file | awk -F" " '{ if ((NF == 4) && (($2-10)*($2-10)+($3-10)*($3-10)+($4-10)*($4-10) > 2.7225)) print $1,$2,$3,$4;}' | wc -l], 0, [stdout], [ignore]) | 
|---|
|  | 34 | AT_CHECK([fgrep "0" stdout], 0, [ignore], [ignore]) | 
|---|
|  | 35 | AT_CHECK([cat < $file | awk -F" " '{ if ((NF == 4) && (($2-10)*($2-10)+($3-10)*($3-10)+($4-10)*($4-10) < 2.7225)) print $1,$2,$3,$4;}' | wc -l], 0, [stdout], [ignore]) | 
|---|
|  | 36 | AT_CHECK([fgrep "2" stdout], 0, [ignore], [ignore]) | 
|---|
|  | 37 |  | 
|---|
|  | 38 | AT_CLEANUP | 
|---|
|  | 39 |  | 
|---|
|  | 40 |  | 
|---|
|  | 41 | AT_SETUP([Unselection - All atoms inside tiny sphere with Undo]) | 
|---|
|  | 42 | AT_KEYWORDS([unselection atom sphere unselect-atoms-inside-sphere]) | 
|---|
|  | 43 |  | 
|---|
|  | 44 | file=allatomsinsidetinysphere.xyz | 
|---|
|  | 45 | AT_CHECK([/bin/cp -f ${abs_top_srcdir}/tests/regression/Selection/Atoms/AtomsInsideSphere/pre/box.xyz $file], 0) | 
|---|
|  | 46 | AT_CHECK([chmod u+w $file], 0) | 
|---|
| [024c65] | 47 | AT_CHECK([../../molecuilder -i $file -v 2 --select-all-atoms --create-shape --shape-name "sphere1" --shape-type "sphere" --translation "10,10,10" --stretch "1.65, 1.65, 1.65" --angle-x 0. --angle-y 0. --angle-z 0. --select-shape-by-name "sphere1" --unselect-atoms-inside-volume --undo -r], 0, [stdout], [stderr]) | 
|---|
| [3e1b7b] | 48 | AT_CHECK([diff -I '.*Created by molecuilder.*' $file ${abs_top_srcdir}/tests/regression/Selection/Atoms/AtomsInsideSphere/post/empty.xyz], 0, [ignore], [ignore]) | 
|---|
|  | 49 |  | 
|---|
|  | 50 | AT_CLEANUP | 
|---|
|  | 51 |  | 
|---|
|  | 52 |  | 
|---|
|  | 53 | AT_SETUP([Unselection - All atoms inside tiny sphere with Redo]) | 
|---|
|  | 54 | AT_KEYWORDS([unselection atom sphere unselect-atoms-inside-sphere]) | 
|---|
|  | 55 |  | 
|---|
|  | 56 | file=allatomsinsidetinysphere.xyz | 
|---|
|  | 57 | AT_CHECK([/bin/cp -f ${abs_top_srcdir}/tests/regression/Selection/Atoms/AtomsInsideSphere/pre/box.xyz $file], 0) | 
|---|
|  | 58 | AT_CHECK([chmod u+w $file], 0) | 
|---|
| [024c65] | 59 | AT_CHECK([../../molecuilder -i $file -v 2 --select-all-atoms --create-shape --shape-name "sphere1" --shape-type "sphere" --translation "10,10,10" --stretch "1.65, 1.65, 1.65" --angle-x 0. --angle-y 0. --angle-z 0. --select-shape-by-name "sphere1" --unselect-atoms-inside-volume --undo --redo -r], 0, [stdout], [stderr]) | 
|---|
| [3e1b7b] | 60 | AT_CHECK([diff -I '.*Created by molecuilder.*' $file ${abs_top_srcdir}/tests/regression/Selection/Atoms/AtomsInsideSphere/post/allatomsinsidetinysphere.xyz], 0, [ignore], [ignore]) | 
|---|
|  | 61 |  | 
|---|
|  | 62 | AT_CLEANUP | 
|---|