Skip to content

Commit

Permalink
zap unused var, better test diag
Browse files Browse the repository at this point in the history
  • Loading branch information
mohawk2 committed Jan 7, 2023
1 parent 6cf2a68 commit 9eb6452
Show file tree
Hide file tree
Showing 2 changed files with 1 addition and 9 deletions.
8 changes: 0 additions & 8 deletions lib/PDL/Transform/Color.pm
Original file line number Diff line number Diff line change
Expand Up @@ -353,14 +353,6 @@ our $PI = 3.141592653589793238462643383279502;

# Some matrix values of use in RGB conversions...

# Matrix to convert CIE RGB to CIE XYZ
our($crgb2cxyz_mat) =
pdl( [0.49000, 0.31000, 0.20000],
[0.17697, 0.81240, 0.01063],
[0.00000, 0.01000, 0.99000]
) / 0.17697;
our($crgb2ciexyz_inv) = $crgb2cxyz_mat->inv;

# Matrix to convert CIE XYZ to sRGB
our($srgb2cxyz_inv) =
pdl( [ 3.2410, -1.5374, -0.4986],
Expand Down
2 changes: 1 addition & 1 deletion t/color.t
Original file line number Diff line number Diff line change
Expand Up @@ -102,7 +102,7 @@ ok( all( ($xpypzptriplet->slice('0:1')*1000)->rint ==
)
* 1000)->rint
),
"XYZ translation works for R, G, and B vectors");
"XYZ translation works for R, G, and B vectors") or diag "got: ", ($xpypzptriplet->slice('0:1')*1000)->rint;
eval { $i2triplet = $otriplet->invert(t_xyz()); };
is $@, '', "t_xyz inverse runs OK";
ok( all( ($i2triplet*10000)->rint == ($itriplet*10000)->rint ), "t_xyz inverse works OK");
Expand Down

0 comments on commit 9eb6452

Please sign in to comment.