Functor BatTuple.Tuple4.Eq

module Eq: 
functor (T1 : BatOrd.Eq) -> 
functor (T2 : BatOrd.Eq) -> 
functor (T3 : BatOrd.Eq) -> 
functor (T4 : BatOrd.Eq) -> Eq  with type t = T1.t * T2.t * T3.t * T4.t