Skip to content

Commit

Permalink
oops! clarify the actual meaning of numbers stored in the file
Browse files Browse the repository at this point in the history
  • Loading branch information
aitap committed May 14, 2019
1 parent aaf7939 commit 08d4dae
Show file tree
Hide file tree
Showing 2 changed files with 2 additions and 2 deletions.
2 changes: 1 addition & 1 deletion decode.pl
Original file line number Diff line number Diff line change
Expand Up @@ -15,7 +15,7 @@
# additional shift by 5 bytes for some reason
seek $rfh, 1029, SEEK_SET;

# the spectrum is stored in pairs of lambda, 1-T
# the spectrum is stored in pairs of lambda, A
local $/ = \16;
print $wfh (join("\t", unpack "d<2", $_), "\n")
while (<$rfh>);
Expand Down
2 changes: 1 addition & 1 deletion test/test.pl
Original file line number Diff line number Diff line change
Expand Up @@ -6,7 +6,7 @@

# with default export settings (are there any?),
# wavelength is specified to 1e-2 nm;
# 1-T is specified to 1e-3 relative units
# A is specified to 1e-3 relative units
my @tol = (5e-3, 5e-4);

sub similar {
Expand Down

0 comments on commit 08d4dae

Please sign in to comment.