Patch title: Release 84 bulk changes
Abstract:
File: /pliant/graphic/image/prototype.pli
Key:
    Removed line
    Added line
   
abstract
  ['ImagePrototype' is defining the API to deal with pixels 


abstract
  ['ImagePrototype' is defining the API to deal with pixels 


function image_prototype x0 y0 x1 y1 rx ry aa adjust gamut -
  arg Float x0 y0 x1 y1 rx ry ; arg Int aa adjust ; oarg Col
function image_prototype x0 y0 x1 y1 rx ry aa_x aa_y adjust gamut -> p
  arg Float x0 y0 x1 y1 rx ry ; arg Int aa_x aa_y adjust ; oarg ColorGamut gamut ; arg ImagePrototype p
  check adjust>=image_adjust_extend and adjust<=image_adjust
  check adjust>=image_adjust_extend and adjust<=image_adjust
  var Int size_x := (max (cast (abs x1-x0)*(rx/25.4)+(shunt 
  var Int size_y := (max (cast (abs y1-y0)*(ry/25.4)+(shunt 
  var Int size_x := (max (cast (abs x1-x0)*(rx/25.4)+(shunt adjust=image_adjust_extend 0.5 adjust=image_adjust_reduce -0.5 0) Int)\aa_x 1)*aa_x
  var Int size_y := (max (cast (abs y1-y0)*(ry/25.4)+(shunt adjust=image_adjust_extend 0.5 adjust=image_adjust_reduce -0.5 0) Int)\aa_y 1)*aa_y
  p := image_prototype x0 y0 x0+size_x/(rx/25.4)*((x1-x0)/(a


method p index_y y -> i
  arg ImagePrototype p ; arg Float y ; arg Int i
  i := cast (y-p:y0)/(p:y1-p:y0)*p:size_y Int
  p := image_prototype x0 y0 x0+size_x/(rx/25.4)*((x1-x0)/(a


method p index_y y -> i
  arg ImagePrototype p ; arg Float y ; arg Int i
  i := cast (y-p:y0)/(p:y1-p:y0)*p:size_y Int