module Hat: sig .. end
sig
end
type t = int
int
val centered : int
val up : int
val right : int
val down : int
val left : int
val rightup : int
val rightdown : int
val leftup : int
val leftdown : int