diff options
| author | Florent Hivert | 2016-11-17 01:33:36 +0100 |
|---|---|---|
| committer | Florent Hivert | 2016-11-17 01:33:36 +0100 |
| commit | 84cc11db01159b17a8dcf4d02dbe0549067d228f (patch) | |
| tree | 964ee247bbf305022235217e716578a37be0bf62 /mathcomp/ssrtest/tacnotationpattern.v | |
| parent | 5daf14d44b9cd22c6b51b2b23b4eebe5f3aee79f (diff) | |
| parent | 23e57fb47874331c5feaace883513b7abecdff28 (diff) | |
Merge remote-tracking branch 'upstream/master' into fixdoc
Diffstat (limited to 'mathcomp/ssrtest/tacnotationpattern.v')
| -rw-r--r-- | mathcomp/ssrtest/tacnotationpattern.v | 14 |
1 files changed, 0 insertions, 14 deletions
diff --git a/mathcomp/ssrtest/tacnotationpattern.v b/mathcomp/ssrtest/tacnotationpattern.v deleted file mode 100644 index 13de4bc..0000000 --- a/mathcomp/ssrtest/tacnotationpattern.v +++ /dev/null @@ -1,14 +0,0 @@ -Require Import mathcomp.ssreflect.ssreflect. -Tactic Notation "at" ssrpatternarg(p) tactic(t) - := - ssrpattern p; let top := fresh in intro top; - t top; try unfold top in * |- *; try clear top. - -Goal forall x y, x + y = 4. -intros. -at [RHS] (fun top => remember top as E eqn:E_def). -match goal with -| |- x + y = E => idtac -| |- _ => fail -end. -Admitted. |