(* Note that, in a qmap m, it is not True that: exd m x -> A m k x <> nil, exd m x -> A_1 m k x <> nil *)
(* Note also: *)

(* Specifications: *)
Lemma A_nil: forall (m:fmap)(k:dim),
inv_qhmap m -> A m k nil = nil.
Lemma A_1_nil: forall (m:fmap)(k:dim),
inv_qhmap m -> A_1 m k nil = nil.