val render: amb: Point.t -> lights: Light.t array -> obj: Object.t -> depth: int -> fov: float -> wid: int -> ht: int -> filename: string -> unit