diff options
| author |  herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-10-21 10:20:21 +0000 |
|---|---|---|
| committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-10-21 10:20:21 +0000 |
| commit | 95e57d12129cf96373e0acc7eb6e126aefae80fb (patch) | |
| tree | ed0fa6d713745383908b288b59d8d1e9fc2c86b6 /theories/Init | |
| parent | bc033392f56d9ddaa3b86e2ecf6274f0aa46f239 (diff) | |
Prise en compte des délimiteurs dans les motifs de Cases
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3164 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/Init')
| -rw-r--r-- | theories/Init/PeanoSyntax.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/theories/Init/PeanoSyntax.v b/theories/Init/PeanoSyntax.v index ddef41751..3a2b63a37 100644 --- a/theories/Init/PeanoSyntax.v +++ b/theories/Init/PeanoSyntax.v @@ -93,7 +93,7 @@ Grammar constr constr0 := | natural_nat110 [ "(" "110" ")" ] -> [ 'N: 110 ' ] . -Grammar constr pattern := +Grammar constr pattern : cases_pattern := natural_pat0 [ "(" "0" ")" ] -> [ 'N: 0 ' ] | natural_pat1 [ "(" "1" ")" ] -> [ 'N: 1 ' ] | natural_pat2 [ "(" "2" ")" ] -> [ 'N: 2 ' ] |