r g b
(when (typep h 'number) (float h))
(when (typep h2 'number) (float h2))
(float s) (float (/ s2 255)) (float v) (float (/ v2 255)))
(return-from test-color-conversion-255-float nil))))))))
t)
r g b
(when (typep h 'number) (float h))
(when (typep h2 'number) (float h2))
(float s) (float (/ s2 255)) (float v) (float (/ v2 255)))
(return-from test-color-conversion-255-float nil))))))))
t)