module Viewport: sig .. end
sig
end
type t
val create : float -> float -> float -> float -> t
float -> float -> float -> float -> t
create x y width height
val compute_window_matrix : t -> Osg.Matrix.t
t -> Osg.Matrix.t