Module Skp_view

type t = {
  1. target : Vec3.t;
  2. distance : float;
  3. azimuth : float;
  4. elevation : float;
  5. fov : float;
}
type area = {
  1. cx : float;
  2. cy : float;
  3. w : float;
  4. h : float;
}
val start : t
val eye : t -> Vec3.t
val camera : t -> Camera.t
val project : t -> area -> Vec3.t -> (float * float) option
val ray : t -> area -> (float * float) -> Vec3.t * Vec3.t
val polygon : t -> area -> (Vec3.t * bool) list -> ((float * float) * bool) list
val segment : t -> area -> Vec3.t -> Vec3.t -> ((float * float) * (float * float)) option
val orbit : t -> float -> float -> t
val pan : t -> area -> float -> float -> t
val zoom : t -> float -> t
val extents : t -> Vec3.t list -> t