extra/colors/contrast/contrast-tests.factor

   1 USING: colors colors.contrast kernel tools.test ;
   2
   3 { 0.0 } [ COLOR: black relative-luminance ] unit-test
   4 { 1.0 } [ COLOR: white relative-luminance ] unit-test
   5
   6 { 1.0 } [ COLOR: blue dup contrast-ratio ] unit-test
   7 { 21.0 } [ COLOR: black COLOR: white contrast-ratio ] unit-test