math.trig: use deg>rad in a few places to reduce duplication.

[factor.git] / extra / colors / lch / lch.factor

diff --git a/extra/colors/lch/lch.factor b/extra/colors/lch/lch.factor
index d09e1fb213509ccc397e3c9ad86d5efe44b8befc..bdfe54bd796f2d9d0e6488e6f263f81717851995 100644 (file)
--- a/extra/colors/lch/lch.factor
+++ b/extra/colors/lch/lch.factor
@@ -2,7 +2,7 @@
 ! See http://factorcode.org/license.txt for BSD license
 
 USING: accessors colors colors.lab colors.luv colors.xyz kernel
-locals math math.constants math.functions math.libm ;
+locals math math.functions math.libm math.trig ;
 
 IN: colors.lch
 
@@ -10,16 +10,6 @@ TUPLE: LCHuv l c h alpha ;
 
 C: <LCHuv> LCHuv
 
-<PRIVATE
-
-: deg>rad ( degrees -- radians )
-    pi * 180 / ; inline
-
-: rad>deg ( radians -- degrees )
-    180 * pi / ; inline
-
-PRIVATE>
-
 M: LCHuv >rgba >luva >rgba ;
 
 M: LCHuv >xyza >luva >xyza ;