Patch title: Release 85 bulk changes
Abstract:
File: /pliant/graphic/color/color.pli
Key:
    Removed line
    Added line
   
abstract
  [Tri values colors conversions] ; eol
  link "extra details" "http://www.cs.rit.edu/~ncs/color/t_c
  [ and ]
  link "sRGB spec" "http://www.w3.org/Graphics/Color/sRGB.ht

module "/pliant/language/unsafe.pli"
module "spectrum.pli"
module "gradation.pli"
module "/pliant/math/functions.pli"
module "/pliant/math/matrix.pli"
module "/pliant/graphic/misc/float.pli"
abstract
  [Tri values colors conversions] ; eol
  link "extra details" "http://www.cs.rit.edu/~ncs/color/t_c
  [ and ]
  link "sRGB spec" "http://www.w3.org/Graphics/Color/sRGB.ht

module "/pliant/language/unsafe.pli"
module "spectrum.pli"
module "gradation.pli"
module "/pliant/math/functions.pli"
module "/pliant/math/matrix.pli"
module "/pliant/graphic/misc/float.pli"
submodule "rgb888.pli"



function angle xx yy -> a
  arg Float xx yy a
  var Float x y z
  x := xx ; y := yy
  if x>=0.0
    if y>=0.0
      z := 0
    else
      z := x ; x := -y ; y := z ; z := 1.5*pi
  else
    if y>=0
      z := x ; x := y ; y := -z ; z := 0.5*pi
    else
      x := -x; y := -y ; z := pi
  if y<=x
    if x=0
      a := 0
    a := z+(atan y/x)
  else
    a := z+0.5*pi-(atan x/y)



function angle xx yy -> a
  arg Float xx yy a
  var Float x y z
  x := xx ; y := yy
  if x>=0.0
    if y>=0.0
      z := 0
    else
      z := x ; x := -y ; y := z ; z := 1.5*pi
  else
    if y>=0
      z := x ; x := y ; y := -z ; z := 0.5*pi
    else
      x := -x; y := -y ; z := pi
  if y<=x
    if x=0
      a := 0
    a := z+(atan y/x)
  else
    a := z+0.5*pi-(atan x/y)



  type ColorRGB888
    field uInt8 r g b

  type ColorHSV
    field Float32 h s v


function cmc_distance ref test -> d
  arg ColorXYZ ref test ; arg Float d
  d := cmc_distance (cast ref ColorLab) (cast test ColorLab)
 
export cmc_distance
  type ColorHSV
    field Float32 h s v


function cmc_distance ref test -> d
  arg ColorXYZ ref test ; arg Float d
  d := cmc_distance (cast ref ColorLab) (cast test ColorLab)
 
export cmc_distance