Affine
type t = {
a : float;
b : float;
c : float;
d : float;
tx : float;
ty : float;
}
val identity : t
val translate : float -> float -> t
val rotate : float -> t
val scale : float -> float -> t
val compose : t -> t -> t
val apply : t -> (float * float) -> float * float
val invert : t -> t