fact: Definition eqd n m p q (x: X (typ n) (typ m)) (y: X (typ p) (typ q)) := eq_dep (prod positive positive) (fun i => X (typ (fst i)) (typ (snd i))) (n,m) x (p,q) y.
imports: ATBR(Common Classes) Coq(FMapPositive) Coq(Eqdep)