diff options
Diffstat (limited to 'scripts/cif2hkl')
-rwxr-xr-x | scripts/cif2hkl | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/scripts/cif2hkl b/scripts/cif2hkl index 8d82726c..f03b1b69 100755 --- a/scripts/cif2hkl +++ b/scripts/cif2hkl @@ -4,8 +4,7 @@ use strict; my $line; -printf(" h k l I phase sigma(I) counts" - ." fs/px ss/px\n"); +printf(" h k l I phase sigma(I) nmeas\n"); while ( $line = <STDIN> ) { @@ -17,9 +16,8 @@ while ( $line = <STDIN> ) { my $intensity = $4; my $sigi = $5; - printf("%3i %3i %3i %10.2f %s %10.2f %7i %6.1f %6.1f\n", - $h, $k, $l, $intensity, " -", $sigi, - 1, 0.0, 0.0); + printf("%4i %4i %4i %10.2f %s %10.2f %7i\n", + $h, $k, $l, $intensity, " -", $sigi, 1); } |