Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
10
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
Hugo Herbelin
iris-coq
Commits
6010b7c4
Commit
6010b7c4
authored
Dec 10, 2018
by
Robbert Krebbers
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
A comment that `agree_car` is not non-expansive.
parent
e6d61427
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
3 additions
and
0 deletions
+3
-0
theories/algebra/agree.v
theories/algebra/agree.v
+3
-0
No files found.
theories/algebra/agree.v
View file @
6010b7c4
...
...
@@ -26,6 +26,9 @@ Proof.
Thus Ag(T) is not necessarily complete.
*)
(** Note that the projection [agree_car] is not non-expansive, so it cannot be
used in the logic. If you need to get a witness out, you should use the
lemma [to_agree_uninjN] instead. *)
Record
agree
(
A
:
Type
)
:
Type
:
=
{
agree_car
:
list
A
;
agree_not_nil
:
bool_decide
(
agree_car
=
[])
=
false
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment