(* Compatibility *)
Notation sym_JMeq := JMeq_sym (only parsing).
Notation trans_JMeq := JMeq_trans (only parsing).
(******************************************  The following is the original floyd/jmeq_lemmas.v  ******************************************)

Lemma JMeq_sigT: forall {A: Type} {B: Type} (a: A), @eq Type A B -> {b: B | JMeq a b}.
Arguments JMeq_eq {A} {x y} _.