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
Janno
iris-coq
Commits
8ca8b776
Commit
8ca8b776
authored
Jun 21, 2018
by
Ralf Jung
Browse files
handle language.of_val in solve_into_val
parent
3961c1e8
Changes
1
Hide whitespace changes
Inline
Side-by-side
theories/heap_lang/tactics.v
View file @
8ca8b776
...
...
@@ -96,6 +96,7 @@ Ltac of_expr e :=
let
e1
:
=
of_expr
e1
in
let
e2
:
=
of_expr
e2
in
constr
:
(
FAA
e1
e2
)
|
to_expr
?e
=>
e
|
of_val
?v
=>
constr
:
(
Val
v
(
of_val
v
)
(
to_of_val
v
))
|
language
.
of_val
?v
=>
constr
:
(
Val
v
(
of_val
v
)
(
to_of_val
v
))
|
_
=>
match
goal
with
|
H
:
to_val
e
=
Some
?v
|-
_
=>
constr
:
(
Val
v
e
H
)
|
H
:
Closed
[]
e
|-
_
=>
constr
:
(@
ClosedExpr
e
H
)
...
...
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