| 3 |
|
# program that builds water boxes |
| 4 |
|
|
| 5 |
|
# author = "Chris Fennell |
| 6 |
< |
# version = "$Revision: 1.6 $" |
| 7 |
< |
# date = "$Date: 2009-10-22 19:12:14 $" |
| 6 |
> |
# version = "$Revision: 1.7 $" |
| 7 |
> |
# date = "$Date: 2009-11-25 20:01:59 $" |
| 8 |
|
# copyright = "Copyright (c) 2006 by the University of Notre Dame" |
| 9 |
< |
# license = "OOPSE" |
| 9 |
> |
# license = "OpenMD" |
| 10 |
|
|
| 11 |
|
use Getopt::Std; |
| 12 |
|
|
| 317 |
|
|
| 318 |
|
sub writeOutFile { |
| 319 |
|
# write out the header |
| 320 |
< |
print OUTFILE "<OOPSE version=4>\n"; |
| 320 |
> |
print OUTFILE "<OpenMD version=1>\n"; |
| 321 |
|
findCutoff(); |
| 322 |
|
findAlpha(); |
| 323 |
|
printMetaData(); |
| 351 |
|
print OUTFILE "$q0 $q1 $q2 $q3\n"; |
| 352 |
|
} |
| 353 |
|
|
| 354 |
< |
print OUTFILE " </StuntDoubles>\n </Snapshot>\n</OOPSE>\n"; |
| 354 |
> |
print OUTFILE " </StuntDoubles>\n </Snapshot>\n</OpenMD>\n"; |
| 355 |
|
} |
| 356 |
|
|
| 357 |
|
sub printMetaData { |
