mirror of
https://github.com/achlipala/frap.git
synced 2024-11-10 00:07:51 +00:00
SepCancel: adapt for Coq versions
This commit is contained in:
parent
2dc04da2b9
commit
47fd9a8abf
1 changed files with 17 additions and 1 deletions
18
SepCancel.v
18
SepCancel.v
|
@ -308,7 +308,23 @@ Module Make(Import S : SEP).
|
||||||
reflexivity.
|
reflexivity.
|
||||||
Qed.
|
Qed.
|
||||||
|
|
||||||
Definition try_me_first (_ : hprop) := True.
|
Module Type TRY_ME_FIRST.
|
||||||
|
Parameter try_me_first : hprop -> Prop.
|
||||||
|
|
||||||
|
Axiom try_me_first_easy : forall p, try_me_first p.
|
||||||
|
End TRY_ME_FIRST.
|
||||||
|
|
||||||
|
Module TMF : TRY_ME_FIRST.
|
||||||
|
Definition try_me_first (_ : hprop) := True.
|
||||||
|
|
||||||
|
Theorem try_me_first_easy : forall p, try_me_first p.
|
||||||
|
Proof.
|
||||||
|
constructor.
|
||||||
|
Qed.
|
||||||
|
End TMF.
|
||||||
|
|
||||||
|
Import TMF.
|
||||||
|
Export TMF.
|
||||||
|
|
||||||
Ltac cancel1 :=
|
Ltac cancel1 :=
|
||||||
match goal with
|
match goal with
|
||||||
|
|
Loading…
Reference in a new issue