3 |
|
# program that builds water boxes |
4 |
|
|
5 |
|
# author = "Chris Fennell |
6 |
< |
# version = "$Revision: 1.2 $" |
7 |
< |
# date = "$Date: 2007-01-09 03:42:14 $" |
6 |
> |
# version = "$Revision: 1.3 $" |
7 |
> |
# date = "$Date: 2007-01-22 22:27:37 $" |
8 |
|
# copyright = "Copyright (c) 2006 by the University of Notre Dame" |
9 |
|
# license = "OOPSE" |
10 |
|
|
256 |
|
$zCorr[3] = $cell2Z; |
257 |
|
# assemble the lattice |
258 |
|
$counter = 0; |
259 |
< |
for ($z = 0; $z < $nx; $z++) { |
259 |
> |
for ($z = 0; $z < $nz; $z++) { |
260 |
|
for ($y = 0; $y < $ny; $y++) { |
261 |
< |
for ($x = 0; $x < $nz; $x++) { |
261 |
> |
for ($x = 0; $x < $nx; $x++) { |
262 |
|
for ($uc = 0; $uc < 4; $uc++) { |
263 |
|
$xCorr[$uc+$counter] = $xCorr[$uc] + $cellLengthX*$x; |
264 |
|
$yCorr[$uc+$counter] = $yCorr[$uc] + $cellLengthY*$y; |
277 |
|
$zCorr[0] = $cell2Z; |
278 |
|
#assemble the lattice |
279 |
|
$counter = 0; |
280 |
< |
for ($z = 0; $z < $nx; $z++) { |
280 |
> |
for ($z = 0; $z < $nz; $z++) { |
281 |
|
for ($y = 0; $y < $ny; $y++) { |
282 |
< |
for ($x = 0; $x < $nz; $x++) { |
282 |
> |
for ($x = 0; $x < $nx; $x++) { |
283 |
|
$xCorr[$counter] = $xCorr[0] + $cellLengthX*$x; |
284 |
|
$yCorr[$counter] = $yCorr[0] + $cellLengthY*$y; |
285 |
|
$zCorr[$counter] = $zCorr[0] + $cellLengthZ*$z; |