diff options
| author |  gareuselesinge <gareuselesinge@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2011-11-21 17:03:52 +0000 |
|---|---|---|
| committer | gareuselesinge <gareuselesinge@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2011-11-21 17:03:52 +0000 |
| commit | ed06a90f16fcf7d45672bbddf42efe4cc0efd4d4 (patch) | |
| tree | 51889eb68a73e054d999494a6f50013dd99d711e /theories/Logic/ExtensionalityFacts.v | |
| parent | 41744ad1706fc5f765430c63981bf437345ba9fe (diff) | |
theories/, plugins/ and test-suite/ ported to the Arguments vernacular
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14718 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/Logic/ExtensionalityFacts.v')
| -rw-r--r-- | theories/Logic/ExtensionalityFacts.v | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/theories/Logic/ExtensionalityFacts.v b/theories/Logic/ExtensionalityFacts.v index 421bbebcf..f5e71ef49 100644 --- a/theories/Logic/ExtensionalityFacts.v +++ b/theories/Logic/ExtensionalityFacts.v @@ -42,8 +42,8 @@ Record Delta A := { pi1:A; pi2:A; eq:pi1=pi2 }. Definition delta {A} (a:A) := {|pi1 := a; pi2 := a; eq := eq_refl a |}. -Implicit Arguments pi1 [[A]]. -Implicit Arguments pi2 [[A]]. +Arguments pi1 {A} _. +Arguments pi2 {A} _. Lemma diagonal_projs_same_behavior : forall A (x:Delta A), pi1 x = pi2 x. Proof. |