| 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 | # | 
|---|
| 18 | # | 
|---|
| 19 | #    MoleCuilder - creates and alters molecular systems | 
|---|
| 20 | #    Copyright (C) 2008-2012 University of Bonn | 
|---|
| 21 | # | 
|---|
| 22 | #    This program is free software: you can redistribute it and/or modify | 
|---|
| 23 | #    it under the terms of the GNU General Public License as published by | 
|---|
| 24 | #    the Free Software Foundation, either version 3 of the License, or | 
|---|
| 25 | #    (at your option) any later version. | 
|---|
| 26 | # | 
|---|
| 27 | #    This program is distributed in the hope that it will be useful, | 
|---|
| 28 | #    but WITHOUT ANY WARRANTY; without even the implied warranty of | 
|---|
| 29 | #    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the | 
|---|
| 30 | #    GNU General Public License for more details. | 
|---|
| 31 | # | 
|---|
| 32 | #    You should have received a copy of the GNU General Public License | 
|---|
| 33 | #    along with this program.  If not, see <http://www.gnu.org/licenses/>. | 
|---|
| 34 | # | 
|---|
| 35 | ### set boundary conditions | 
|---|
| 36 |  | 
|---|
| 37 | AT_SETUP([Domain - set boundary conditions]) | 
|---|
| 38 | AT_KEYWORDS([domain set-boundary-conditions]) | 
|---|
| 39 |  | 
|---|
| 40 | BC="Wrap Wrap Wrap" | 
|---|
| 41 | AT_CHECK([../../molecuilder -B "5,0,5,0,0,5" --set-boundary-conditions $BC], 0, [stdout], [stderr]) | 
|---|
| 42 | AT_CHECK([fgrep "Boundary conditions are now ${BC}" stdout], 0, [ignore], [ignore]) | 
|---|
| 43 | BC="Bounce Bounce Bounce" | 
|---|
| 44 | AT_CHECK([../../molecuilder -B "5,0,5,0,0,5" --set-boundary-conditions $BC], 0, [stdout], [stderr]) | 
|---|
| 45 | AT_CHECK([fgrep "Boundary conditions are now ${BC}" stdout], 0, [ignore], [ignore]) | 
|---|
| 46 | BC="Ignore Ignore Ignore" | 
|---|
| 47 | AT_CHECK([../../molecuilder -B "5,0,5,0,0,5" --set-boundary-conditions $BC], 0, [stdout], [stderr]) | 
|---|
| 48 | AT_CHECK([fgrep "Boundary conditions are now ${BC}" stdout], 0, [ignore], [ignore]) | 
|---|
| 49 | BC="Wrap Bounce Ignore" | 
|---|
| 50 | AT_CHECK([../../molecuilder -B "5,0,5,0,0,5" --set-boundary-conditions $BC], 0, [stdout], [stderr]) | 
|---|
| 51 | AT_CHECK([fgrep "Boundary conditions are now ${BC}" stdout], 0, [ignore], [ignore]) | 
|---|
| 52 |  | 
|---|
| 53 | AT_CLEANUP | 
|---|
| 54 |  | 
|---|
| 55 |  | 
|---|
| 56 | AT_SETUP([Domain - set boundary conditions with Undo]) | 
|---|
| 57 | AT_KEYWORDS([domain set-boundary-conditions undo]) | 
|---|
| 58 |  | 
|---|
| 59 | Check_BC="Wrap Wrap Wrap" | 
|---|
| 60 | BC="Wrap Wrap Wrap" | 
|---|
| 61 | AT_CHECK([../../molecuilder -B "5,0,5,0,0,5" --set-boundary-conditions $BC --undo], 0, [stdout], [stderr]) | 
|---|
| 62 | AT_CHECK([fgrep "Boundary conditions are set back to ${Check_BC}" stdout], 0, [ignore], [ignore]) | 
|---|
| 63 | BC="Bounce Bounce Bounce" | 
|---|
| 64 | AT_CHECK([../../molecuilder -B "5,0,5,0,0,5" --set-boundary-conditions $BC --undo], 0, [stdout], [stderr]) | 
|---|
| 65 | AT_CHECK([fgrep "Boundary conditions are set back to ${Check_BC}" stdout], 0, [ignore], [ignore]) | 
|---|
| 66 | BC="Ignore Ignore Ignore" | 
|---|
| 67 | AT_CHECK([../../molecuilder -B "5,0,5,0,0,5" --set-boundary-conditions $BC --undo], 0, [stdout], [stderr]) | 
|---|
| 68 | AT_CHECK([fgrep "Boundary conditions are set back to ${Check_BC}" stdout], 0, [ignore], [ignore]) | 
|---|
| 69 | BC="Wrap Bounce Ignore" | 
|---|
| 70 | AT_CHECK([../../molecuilder -B "5,0,5,0,0,5" --set-boundary-conditions $BC --undo], 0, [stdout], [stderr]) | 
|---|
| 71 | AT_CHECK([fgrep "Boundary conditions are set back to ${Check_BC}" stdout], 0, [ignore], [ignore]) | 
|---|
| 72 |  | 
|---|
| 73 | AT_CLEANUP | 
|---|
| 74 |  | 
|---|
| 75 |  | 
|---|
| 76 | AT_SETUP([Domain - set boundary conditions with Redo]) | 
|---|
| 77 | AT_KEYWORDS([domain set-boundary-conditions redo]) | 
|---|
| 78 |  | 
|---|
| 79 | BC="Wrap Wrap Wrap" | 
|---|
| 80 | AT_CHECK([../../molecuilder -B "5,0,5,0,0,5" --set-boundary-conditions $BC --undo --redo], 0, [stdout], [stderr]) | 
|---|
| 81 | AT_CHECK([fgrep "Boundary conditions are again ${BC}" stdout], 0, [ignore], [ignore]) | 
|---|
| 82 | BC="Bounce Bounce Bounce" | 
|---|
| 83 | AT_CHECK([../../molecuilder -B "5,0,5,0,0,5" --set-boundary-conditions $BC --undo --redo], 0, [stdout], [stderr]) | 
|---|
| 84 | AT_CHECK([fgrep "Boundary conditions are again ${BC}" stdout], 0, [ignore], [ignore]) | 
|---|
| 85 | BC="Ignore Ignore Ignore" | 
|---|
| 86 | AT_CHECK([../../molecuilder -B "5,0,5,0,0,5" --set-boundary-conditions $BC --undo --redo], 0, [stdout], [stderr]) | 
|---|
| 87 | AT_CHECK([fgrep "Boundary conditions are again ${BC}" stdout], 0, [ignore], [ignore]) | 
|---|
| 88 | BC="Wrap Bounce Ignore" | 
|---|
| 89 | AT_CHECK([../../molecuilder -B "5,0,5,0,0,5" --set-boundary-conditions $BC --undo --redo], 0, [stdout], [stderr]) | 
|---|
| 90 | AT_CHECK([fgrep "Boundary conditions are again ${BC}" stdout], 0, [ignore], [ignore]) | 
|---|
| 91 |  | 
|---|
| 92 | AT_CLEANUP | 
|---|