X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FConvert%2FColor%2FLUV.pm;h=513dada55dd27023829f86f795c7ad2b3d24f858;hb=4e59696a82a1dceb7bf28416d0cb2ce58cf351bd;hp=886deb736f1119adbd19c136ead0e7e2d3ef7424;hpb=1f72b051c754be821a14b94b1828d71e40631de3;p=convert-color-husl.git diff --git a/lib/Convert/Color/LUV.pm b/lib/Convert/Color/LUV.pm index 886deb7..513dada 100644 --- a/lib/Convert/Color/LUV.pm +++ b/lib/Convert/Color/LUV.pm @@ -1,6 +1,6 @@ package Convert::Color::LUV; -use 5.014000; +use 5.008009; use strict; use warnings; use parent qw/Convert::Color/; @@ -10,11 +10,16 @@ use Convert::Color::XYZ; our $VERSION = '0.001'; use constant +{ ## no critic (Capitalization) - KAPPA => 903.2962962, - EPS => 0.0088564516, + KAPPA => (29/3) ** 3, + EPS => (6/29) ** 3, - REF_U => 0.19783000664283, - REF_V => 0.46831999493879, + REF_X => 3127/3290, + REF_Z => 3583/3290, +}; + +use constant +{ ## no critic (Capitalization) + REF_U => 4 * REF_X / (REF_X + 15 + 3 * REF_Z), + REF_V => 9 / (REF_X + 15 + 3 * REF_Z), }; __PACKAGE__->register_color_space('luv');