sig
  type t
  external create : float -> float -> float -> float -> Osg.Viewport.t
    = "viewport_create"
  external compute_window_matrix : Osg.Viewport.t -> Osg.Matrix.t
    = "viewport_compute_window_matrix"
end