Patch title: Release 84 bulk changes
Abstract:
File: /pliant/graphic/color/database.pli
Key:
    Removed line
    Added line
   
submodule "/pliant/appli/database.pli"
module "spectrum.pli"
module "/pliant/language/unsafe.pli"


type ColorPrinter
  field Str driver
  field Str model
  field Str options
  field Str paper
  field Float size_x <- 210
  field Float size_y <- 297
  field Str mode <- "page"
  field Float margin_left <- 10
  field Float margin_top <- 10
  field Float margin_right <- 10
  field Float margin_bottom <- 20
  field Float resolution_x resolution_y <- 300
submodule "/pliant/appli/database.pli"
module "spectrum.pli"
module "/pliant/language/unsafe.pli"


type ColorPrinter
  field Str driver
  field Str model
  field Str options
  field Str paper
  field Float size_x <- 210
  field Float size_y <- 297
  field Str mode <- "page"
  field Float margin_left <- 10
  field Float margin_top <- 10
  field Float margin_right <- 10
  field Float margin_bottom <- 20
  field Float resolution_x resolution_y <- 300
  field Int antialiasing <- 4
  field Int antialiasing_x antialiasing_y <- 4
  field Float sharpening <- undefined
  field Float limit <- undefined
  field Float middle <- undefined
  field Str gamut
  field Int grid_steps <- 17


method ch s100 -> s100
  arg Data:ColorChannel ch ; arg ColorSpectrum32 s100
  if (exists ch:sample:"255")
    s100 := color_spectrum32 ch:sample:"255"
  else
    s100 := color_spectrum32 ch:sample:"100"
  field Float sharpening <- undefined
  field Float limit <- undefined
  field Float middle <- undefined
  field Str gamut
  field Int grid_steps <- 17


method ch s100 -> s100
  arg Data:ColorChannel ch ; arg ColorSpectrum32 s100
  if (exists ch:sample:"255")
    s100 := color_spectrum32 ch:sample:"255"
  else
    s100 := color_spectrum32 ch:sample:"100"