Section Properties.
Implicit Types x y : TVar.
Implicit Types xs ys : list TVar.
(* ---------------------------------------------------------------------- *)
(** *** Primary properties *)
(* ---------------------------------------------------------------------- *)
(** **** Properties of singulars *)
(* ---------------------------------------------------------------------- *)
(** **** Properties of concatenation *)
(* ---------------------------------------------------------------------- *)
(** **** Properties of get *)
(* ---------------------------------------------------------------------- *)
(** **** Properties of dom *)
(* ---------------------------------------------------------------------- *)
(** **** Properties of img *)
(* ---------------------------------------------------------------------- *)
(** **** Properties of belongs *)
(* ---------------------------------------------------------------------- *)
(** **** Properties of all_belongs *)
(* ---------------------------------------------------------------------- *)
(** **** Properties of notin *)
(* ---------------------------------------------------------------------- *)
(** **** Properties of all_notin *)
(* ---------------------------------------------------------------------- *)
(** **** Properties of map *)
(* ---------------------------------------------------------------------- *)
(** **** Properties of update_one *)

(** Ok commutes with update. *)
Axiom ok_update_one : forall A x (v : A) (E : gen_env A),
ok E ->
ok (E [x <- v]).