type t = {
top : int;
right : int;
bottom : int;
left : int;
}
val make : ?top:int -> ?right:int -> ?bottom:int -> ?left:int -> unit -> t
val horitzontal : int -> t
val topLeft : int -> int -> t
val topRight : int -> int -> t
val topBottom : int -> int -> t
val bottomLeft : int -> int -> t
val bottomRight : int -> int -> t
val bottomTop : int -> int -> t
val rightBottom : int -> int -> t
val rightLeft : int -> int -> t
val leftBottom : int -> int -> t
val leftTop : int -> int -> t
val leftRight : int -> int -> t