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
Joshua Yanovski
iris-coq
Commits
2aa6cd0c
Commit
2aa6cd0c
authored
Feb 15, 2017
by
Robbert Krebbers
Browse files
Make (e)auto enter proofmode when we are not already in it.
parent
0eac7a8c
Changes
1
Hide whitespace changes
Inline
Side-by-side
theories/proofmode/tactics.v
View file @
2aa6cd0c
...
...
@@ -1407,9 +1407,12 @@ Tactic Notation "iMod" open_constr(lem) "as" "%" simple_intropattern(pat) :=
(
*
Make
sure
that
by
and
done
solve
trivial
things
in
proof
mode
*
)
Hint
Extern
0
(
of_envs
_
⊢
_
)
=>
by
iPureIntro
.
Hint
Extern
0
(
of_envs
_
⊢
_
)
=>
iAssumption
.
Hint
Extern
0
(
of_envs
_
⊢
_
)
=>
progress
iIntros
.
Hint
Resolve
uPred
.
internal_eq_refl
'
.
(
*
Maybe
make
an
[
iReflexivity
]
tactic
*
)
(
*
For
iIntros
we
do
not
check
whether
we
are
in
proof
mode
because
we
actually
want
it
to
enter
proof
mode
when
we
are
not
already
in
it
.
*
)
Hint
Extern
0
(
_
⊢
_
)
=>
progress
iIntros
.
Hint
Extern
1
(
of_envs
_
⊢
_
∧
_
)
=>
iSplit
.
Hint
Extern
1
(
of_envs
_
⊢
_
∗
_
)
=>
iSplit
.
Hint
Extern
1
(
of_envs
_
⊢
▷
_
)
=>
iNext
.
...
...
@@ -1420,4 +1423,4 @@ Hint Extern 1 (of_envs _ ⊢ ◇ _) => iModIntro.
Hint
Extern
1
(
of_envs
_
⊢
_
∨
_
)
=>
iLeft
.
Hint
Extern
1
(
of_envs
_
⊢
_
∨
_
)
=>
iRight
.
Hint
Extern
2
(
coq_tactics
.
of_envs
_
⊢
_
∗
_
)
=>
progress
iFrame
:
iFrame
.
Hint
Extern
2
(
of_envs
_
⊢
_
∗
_
)
=>
progress
iFrame
:
iFrame
.
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