(** [JMeq] is equivalent to [eq_dep Type (fun X => X)] *)

(* Specifications: *)
Lemma JMeq_eq_dep_id :
forall (A:Type) (B:Type) (x:A) (y:B), JMeq x y -> eq_dep Type (fun X:Type => X) A x B y.
Lemma eq_dep_id_JMeq :
forall (A: Type) (B:Type) (x:A) (y:B), eq_dep Type (fun X:Type => X) A x B y -> JMeq x y.