Commit 46e116b9 authored by Robbert Krebbers's avatar Robbert Krebbers

Relation between `set_seq` and `seq`.

parent 5658dc85
......@@ -1086,6 +1086,10 @@ Section set_seq.
Lemma set_seq_S_end_union_L `{!LeibnizEquiv C} start len :
set_seq start (S len) =@{C} {[ start + len ]} set_seq start len.
Proof. unfold_leibniz. apply set_seq_S_end_union. Qed.
Lemma list_to_set_seq start len :
list_to_set (seq start len) =@{C} set_seq start len.
Proof. revert start; induction len; intros; f_equal/=; auto. Qed.
End set_seq.
(** Mimimal elements *)
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment