type kind = | Linear| Bilinear
val scale_coef : t -> t -> (int * int) -> (int * int) -> unitval bilinear_scale_coef : t -> t -> float -> float -> unitval scale_coef_kind : kind -> t -> t -> (int * int) -> (int * int) -> unitval onto : ?kind:kind -> ?proportional:bool -> t -> t -> unitval create : 
  ?kind:kind ->
  ?copy:bool ->
  ?proportional:bool ->
  t ->
  int ->
  int ->
  t