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
Iris
Iris
Commits
d7d23b5e
Commit
d7d23b5e
authored
Aug 05, 2016
by
Robbert Krebbers
Browse files
Remove duplicate iVs and iVsIntro tactic.
parent
a94cfec9
Changes
1
Hide whitespace changes
Inline
Side-by-side
proofmode/tactics.v
View file @
d7d23b5e
...
...
@@ -874,19 +874,6 @@ Ltac iSimplifyEq := repeat (
||
simplify_eq
/=).
(** * View shifts *)
Tactic
Notation
"iVsIntro"
:
=
eapply
tac_vs_intro
;
[
let
P
:
=
match
goal
with
|-
FromVs
?P
_
=>
P
end
in
apply
_
||
fail
"iVsIntro:"
P
"not a viewshift"
|].
Tactic
Notation
"iVsCore"
constr
(
H
)
:
=
eapply
tac_vs_elim
with
_
H
_
_
_
_;
[
env_cbv
;
reflexivity
||
fail
"iVs:"
H
"not found"
|
let
P
:
=
match
goal
with
|-
ElimVs
?P
_
_
_
=>
P
end
in
let
Q
:
=
match
goal
with
|-
ElimVs
_
_
_
?Q
=>
Q
end
in
apply
_
||
fail
"iVs: cannot eliminate"
H
":"
P
"in"
Q
|
env_cbv
;
reflexivity
|].
Tactic
Notation
"iVs"
open_constr
(
lem
)
:
=
iDestructCore
lem
as
(
fun
H
=>
iVsCore
H
;
last
iDestruct
H
as
"?"
).
Tactic
Notation
"iVs"
open_constr
(
lem
)
"as"
constr
(
pat
)
:
=
...
...
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