Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Contribute to GitLab
Sign in
Toggle navigation
C
cpdt
Project
Project
Details
Activity
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
research
cpdt
Commits
af840414
Commit
af840414
authored
Jul 26, 2012
by
Adam Chlipala
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Pass through Generic, to incorporate new coqdoc features
parent
4035dcf8
Changes
1
Show whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
8 additions
and
0 deletions
+8
-0
Generic.v
src/Generic.v
+8
-0
No files found.
src/Generic.v
View file @
af840414
...
@@ -360,6 +360,10 @@ Eval cbv beta iota delta -[append] in fun A (pr : A -> string) =>
...
@@ -360,6 +360,10 @@ Eval cbv beta iota delta -[append] in fun A (pr : A -> string) =>
]]
]]
*
)
*
)
(
*
begin
hide
*
)
Definition
append
'
:=
append
.
(
*
end
hide
*
)
(
**
Some
of
these
simplified
terms
seem
overly
complex
because
we
have
turned
off
simplification
of
calls
to
[
append
]
,
which
is
what
uses
of
the
[
++
]
operator
desugar
to
.
Selective
[
++
]
simplification
would
combine
adjacent
string
literals
,
yielding
more
or
less
the
code
we
would
write
manually
to
implement
this
printing
scheme
.
*
)
(
**
Some
of
these
simplified
terms
seem
overly
complex
because
we
have
turned
off
simplification
of
calls
to
[
append
]
,
which
is
what
uses
of
the
[
++
]
operator
desugar
to
.
Selective
[
++
]
simplification
would
combine
adjacent
string
literals
,
yielding
more
or
less
the
code
we
would
write
manually
to
implement
this
printing
scheme
.
*
)
...
@@ -642,6 +646,10 @@ Theorem map_id : forall T dt
...
@@ -642,6 +646,10 @@ Theorem map_id : forall T dt
induction
r
;
crush
.
induction
r
;
crush
.
(
*
begin
hide
*
)
Definition
pred
'
:=
pred
.
(
*
end
hide
*
)
(
**
The
base
case
is
discharged
automatically
,
and
the
inductive
case
looks
like
this
,
where
[
H
]
is
the
outer
IH
(
for
induction
over
[
T
]
values
)
and
[
IHn
]
is
the
inner
IH
(
for
induction
over
the
recursive
arguments
)
.
(
**
The
base
case
is
discharged
automatically
,
and
the
inductive
case
looks
like
this
,
where
[
H
]
is
the
outer
IH
(
for
induction
over
[
T
]
values
)
and
[
IHn
]
is
the
inner
IH
(
for
induction
over
the
recursive
arguments
)
.
[[
[[
H
:
forall
i
:
fin
(
S
n
)
,
H
:
forall
i
:
fin
(
S
n
)
,
...
...
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