sig val get_camera : location:int * int * int -> look_at:int * int * int -> string val add_camera : Povray.scene -> location:int * int * int -> look_at:int * int * int -> Povray.scene end