aboutsummaryrefslogtreecommitdiff
path: root/scripts/create-xscale
diff options
context:
space:
mode:
Diffstat (limited to 'scripts/create-xscale')
-rwxr-xr-xscripts/create-xscale7
1 files changed, 3 insertions, 4 deletions
diff --git a/scripts/create-xscale b/scripts/create-xscale
index 5d810f07..d452e8bc 100755
--- a/scripts/create-xscale
+++ b/scripts/create-xscale
@@ -21,16 +21,15 @@ while ( $line = <FH> ) {
chomp($line);
- if ( $line =~ /^\s+([0-9]+\-)\s+([0-9]+\-)\s+([0-9]+\-)\s+([0-9\.\-]+)/ ) {
+ if ( $line =~ /^\s+([0-9]+)\s+([0-9]+)\s+([0-9]+)\s+([0-9\.\-]+)\s+([\-]+)\s+([0-9\.\-]+)/ ) {
my $h = $1;
my $k = $2;
my $l = $3;
my $int = $4;
+ my $sig = $6;
- my $err = 179.0 * sqrt(abs($int)/179.0);
-
- printf("%6i %6i %5i %9.2f %9.2f\n", $h, $k, $l, $int, $err);
+ printf("%6i %6i %5i %9.2f %9.2f\n", $h, $k, $l, $int, $sig);
}
}