Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
Jan
stdpp
Commits
5c3c460e
Commit
5c3c460e
authored
Jul 15, 2020
by
Ralf Jung
Browse files
Merge branch 'master' of
https://gitlab.mpi-sws.org/iris/stdpp
parents
b26e5a4a
76b66f20
Changes
3
Hide whitespace changes
Inline
Side-by-side
CHANGELOG.md
View file @
5c3c460e
...
...
@@ -35,6 +35,8 @@ sarahzrf, and Tej Chajed.
as integers
`Z`
, in analogy with
`encode_nat`
/
`decode_nat`
.
-
Fix list
`Datatypes.length`
and string
`strings.length`
shadowing (
`length`
should now always be
`Datatypes.length`
).
-
Change the notation for pattern matching monadic bind into
`'pat ← x; y`
. It
was
`''pat ← x; y`
(with double
`'`
) due to a shortcoming of Coq ≤8.7.
## std++ 1.3 (released 2020-03-18)
...
...
theories/base.v
View file @
5c3c460e
...
...
@@ -1046,9 +1046,8 @@ Notation "(≫=)" := (λ m f, mbind f m) (only parsing) : stdpp_scope.
Notation
"x ← y ; z"
:
=
(
y
≫
=
(
λ
x
:
_
,
z
))
(
at
level
20
,
y
at
level
100
,
z
at
level
200
,
only
parsing
)
:
stdpp_scope
.
Notation
"' x1 .. xn ← y ; z"
:
=
(
y
≫
=
(
λ
x1
,
..
(
λ
xn
,
z
)
..
))
(
at
level
20
,
x1
binder
,
xn
binder
,
y
at
level
100
,
z
at
level
200
,
only
parsing
,
right
associativity
)
:
stdpp_scope
.
Notation
"' x ← y ; z"
:
=
(
y
≫
=
(
λ
x
:
_
,
z
))
(
at
level
20
,
x
pattern
,
y
at
level
100
,
z
at
level
200
,
only
parsing
)
:
stdpp_scope
.
Infix
"<$>"
:
=
fmap
(
at
level
61
,
left
associativity
)
:
stdpp_scope
.
...
...
theories/gmultiset.v
View file @
5c3c460e
...
...
@@ -28,7 +28,7 @@ Section definitions.
multiplicity
x
X
=
multiplicity
x
Y
.
Global
Instance
gmultiset_elements
:
Elements
A
(
gmultiset
A
)
:
=
λ
X
,
let
(
X
)
:
=
X
in
'
'
(
x
,
n
)
←
map_to_list
X
;
replicate
(
S
n
)
x
.
let
(
X
)
:
=
X
in
'
(
x
,
n
)
←
map_to_list
X
;
replicate
(
S
n
)
x
.
Global
Instance
gmultiset_size
:
Size
(
gmultiset
A
)
:
=
length
∘
elements
.
Global
Instance
gmultiset_empty
:
Empty
(
gmultiset
A
)
:
=
GMultiSet
∅
.
...
...
Write
Preview
Supports
Markdown
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