fact: Definition eq_prod : grel (A*B) := fun x y => let (a,b) := x in let (a',b') := y in (eqA a a' /\ eqB b b').
imports: Coq(RelationClasses Setoid Morphisms SetoidList Mergesort Permutation) mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat seq fintype) mathcomp(bigop path) RegexpBrzozowski(glue)