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
Marianna Rapoport
iris-coq
Commits
d436e40c
Commit
d436e40c
authored
Feb 16, 2016
by
Ralf Jung
Browse files
avoid by in tactics (as advised by Robbert)
parent
df7a0a33
Changes
1
Hide whitespace changes
Inline
Side-by-side
heap_lang/wp_tactics.v
View file @
d436e40c
...
...
@@ -4,12 +4,12 @@ Import uPred.
Ltac
wp_strip_later
:
=
match
goal
with
|
|-
∀
_
,
_
=>
let
H
:
=
fresh
in
intro
H
;
wp_strip_later
;
revert
H
|
|-
_
⊑
▷
_
=>
etransitivity
;
[|
by
apply
later_intro
]
|
|-
_
⊑
▷
_
=>
etransitivity
;
[|
solve
[
apply
later_intro
]
]
end
.
Ltac
wp_bind
K
:
=
lazymatch
eval
hnf
in
K
with
|
[]
=>
idtac
|
_
=>
etransitivity
;
[|
by
apply
(
wp_bind
K
)]
;
simpl
|
_
=>
etransitivity
;
[|
solve
[
apply
(
wp_bind
K
)
]
]
;
simpl
end
.
Ltac
wp_finish
:
=
let
rec
go
:
=
...
...
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