(*========================================================== ============================================================ TOPOLOGICAL FMAPS, HMAPS -  WITH TAGS AND EMBEDDINGS  PART 5:  characteristics, eqc, expf / L0, L_B  COMPLETE FOR DIM 0 (DIM 1 IN THE NEXT FILE): OK! ============================================================ ==========================================================*)
Require Export Jordan4.
(* OK: *)
(* OK: *)
(* LEMMA, USEFUL: *)
(*=========================================================== cF, expf on L and B ============================================================*)
(* OK, TRIVIAL: USEFUL? *)

Lemma cA_1_I:forall(m:fmap)(k:dim)(x z:dart)(u:tag)(p:point),
inv_hmap m -> prec_I m x -> x <> z ->
(cA_1 (I m x u p) k z = cA_1 m k z).