Skip to content
Snippets Groups Projects
Commit c4b14c58 authored by Ralf Jung's avatar Ralf Jung
Browse files

Apply 1 suggestion(s) to 1 file(s)

parent 5e5b2d17
No related branches found
No related tags found
No related merge requests found
...@@ -350,7 +350,7 @@ Section map. ...@@ -350,7 +350,7 @@ Section map.
Lemma set_map_union (f : A B) (X Y : C) : Lemma set_map_union (f : A B) (X Y : C) :
set_map (D:=D) f (X Y) set_map (D:=D) f X set_map (D:=D) f Y. set_map (D:=D) f (X Y) set_map (D:=D) f X set_map (D:=D) f Y.
Proof. set_solver. Qed. Proof. set_solver. Qed.
(** This cannot be using [=] because list_to_set_singleton does not hold for [=]. *) (** This cannot be using [=] because [list_to_set_singleton] does not hold for [=]. *)
Lemma set_map_singleton (f : A B) (x : A) : Lemma set_map_singleton (f : A B) (x : A) :
set_map (C:=C) (D:=D) f {[x]} {[f x]}. set_map (C:=C) (D:=D) f {[x]} {[f x]}.
Proof. set_solver. Qed. Proof. set_solver. Qed.
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment