package lablgl

  1. Overview
  2. Docs
type t
val create : unit -> t
val cylinder : base:float -> top:float -> height:float -> slices:int -> stacks:int -> ?quad:t -> unit -> unit
val disk : inner:float -> outer:float -> slices:int -> loops:int -> ?quad:t -> unit -> unit
val partial_disk : inner:float -> outer:float -> slices:int -> loops:int -> start:float -> sweep:float -> ?quad:t -> unit -> unit
val sphere : radius:float -> slices:int -> stacks:int -> ?quad:t -> unit -> unit
val draw_style : t -> [ `fill | `line | `point | `silhouette ] -> unit
val normals : t -> [ `flat | `none | `smooth ] -> unit
val orientation : t -> [ `inside | `outside ] -> unit
val texture : t -> bool -> unit