Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
Iris
stdpp
Commits
0ec18c14
Commit
0ec18c14
authored
Sep 03, 2014
by
Robbert Krebbers
Browse files
Repeat function on streams.
parent
2e1b8a41
Changes
1
Hide whitespace changes
Inline
Side-by-side
theories/streams.v
View file @
0ec18c14
...
...
@@ -28,6 +28,7 @@ Global Instance stream_fmap : FMap stream := λ A B f,
Fixpoint
stake
{
A
}
(
n
:
nat
)
(
s
:
stream
A
)
:
=
match
n
with
0
=>
[]
|
S
n
=>
shead
s
::
stake
n
(
stail
s
)
end
.
CoFixpoint
srepeat
{
A
}
(
x
:
A
)
:
stream
A
:
=
x
:
.
:
srepeat
x
.
Section
stream_properties
.
Context
{
A
:
Type
}.
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new 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