fact: Definition eq_type_and_var : sigT eP2 -> sigT eP2 -> option pointed_Prop := fun x y => (eq_semidec_and_gen TypeCode_eq_semidec_transparent _ _ var1 (fst (projT2 x)) (fst (projT2 y)) /\ eq_semidec_and_gen TypeCode_eq_semidec_transparent _ _ var2 (snd (projT2 x)) (snd (projT2 y)))%option_pointed_prop.
imports: Coq.Lists.List Coq.Arith.EqNat Coq.Logic.Eqdep_dec Fiat.Parsers.Reflective.Syntax Fiat.Parsers.Reflective.SyntaxEquality Fiat.Parsers.Reflective.SyntaxEquivalence Fiat.Common.PointedProp Fiat.Common.OptionFacts Fiat.Common.Prod Fiat.Common.Sigma Fiat.Common