sig
  type t
  external create' : unit -> Osg.Convex_planar_occluder.t
    = "convex_planar_occluder_create"
  external set_occluder :
    Osg.Convex_planar_occluder.t -> Osg.Convex_planar_polygon.t -> unit
    = "convex_planar_occluder_set_occluder"
  external add_hole :
    Osg.Convex_planar_occluder.t -> Osg.Convex_planar_polygon.t -> unit
    = "convex_planar_occluder_add_hole"
  val create :
    occluder:Osg.Convex_planar_polygon.t ->
    holes:Osg.Convex_planar_polygon.t list -> Osg.Convex_planar_occluder.t
end