basis/colors/mix/mix-tests.factor

   1 USING: colors colors.mix kernel tools.test ;
   2
   3 { t } [
   4     COLOR: blue COLOR: red 0.0 linear-gradient
   5     COLOR: blue color=
   6 ] unit-test
   7
   8 { t } [
   9     COLOR: blue COLOR: red 1.0 linear-gradient
  10     COLOR: red color=
  11 ] unit-test
  12
  13 { t } [
  14     { COLOR: blue COLOR: red COLOR: green } 0.0 sample-linear-gradient
  15     COLOR: blue color=
  16 ] unit-test
  17
  18 { t } [
  19     { COLOR: blue COLOR: red COLOR: green } 0.5 sample-linear-gradient
  20     COLOR: red color=
  21 ] unit-test
  22
  23 { t } [
  24     { COLOR: blue COLOR: red COLOR: green } 1.0 sample-linear-gradient
  25     COLOR: green color=
  26 ] unit-test
  27
  28 { t } [
  29     { COLOR: blue COLOR: red } 0.5 sample-linear-gradient
  30     COLOR: blue COLOR: red 0.5 linear-gradient =
  31 ] unit-test