sig
type t = {
points : Lwt_term.point array array;
x : int;
y : int;
width : int;
height : int;
}
val points : Lwt_term.Zone.t -> Lwt_term.point array array
val x : Lwt_term.Zone.t -> int
val y : Lwt_term.Zone.t -> int
val width : Lwt_term.Zone.t -> int
val height : Lwt_term.Zone.t -> int
val make : width:int -> height:int -> Lwt_term.Zone.t
val sub :
zone:Lwt_term.Zone.t ->
x:int -> y:int -> width:int -> height:int -> Lwt_term.Zone.t
val inner : Lwt_term.Zone.t -> Lwt_term.Zone.t
end