diff options
| author | herbelin | 2004-12-09 13:33:08 +0000 |
|---|---|---|
| committer | herbelin | 2004-12-09 13:33:08 +0000 |
| commit | b882fc5097c81071cfb0edf3a78cee10f3570c23 (patch) | |
| tree | f8cf5b281ecc2f202dd45046e8358a690f7db81f /test-suite/output/Notations.v | |
| parent | a883ee41b89a8a1190ca52bcfd856516afa77b4d (diff) | |
Ajout suffixe 8 pour test en nouvelle syntaxe
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@6446 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'test-suite/output/Notations.v')
| -rw-r--r-- | test-suite/output/Notations.v | 22 |
1 files changed, 0 insertions, 22 deletions
diff --git a/test-suite/output/Notations.v b/test-suite/output/Notations.v deleted file mode 100644 index e5b469dba7..0000000000 --- a/test-suite/output/Notations.v +++ /dev/null @@ -1,22 +0,0 @@ -(* Submitted by Roland Zumkeller *) - -Notation "a ? b ; c" := (if a then b else c) (at level 10). - -Check (true ? 0 ; 1). -Check if true as x return (if x then nat else bool) then 0 else true. - -Notation "'proj1' t" := (let (a,_) := t in a) (at level 1). - -Check (fun e : nat * nat => proj1 e). - -Notation "'decomp' a 'as' x , y 'in' b" := (let (x,y) := a in b) (at level 1). - -Check (decomp (true,true) as t, u in (t,u)). - -(* Submitted by Roland Zumkeller *) - -Notation "! A" := (forall _:nat, A) (at level 60). - -Check ! (0=0). -Check forall n, n=0. -Check forall n:nat, 0=0. |
