diff options
author | pboutill <pboutill@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2011-05-03 13:16:18 +0000 |
---|---|---|
committer | pboutill <pboutill@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2011-05-03 13:16:18 +0000 |
commit | a917945130f1e6b0b68cf842a64e1f42c1314666 (patch) | |
tree | c00b917f47b119e8779a6ffebbc9ff07e77a3292 /theories | |
parent | abe412ec08ea56a325cf73a304a0f1d6b237984c (diff) |
As many notation for for vectors as for List.
Tiny doc of mli-doc
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14089 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories')
-rw-r--r-- | theories/Vectors/VectorDef.v | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/theories/Vectors/VectorDef.v b/theories/Vectors/VectorDef.v index cac37ae28..777e68b45 100644 --- a/theories/Vectors/VectorDef.v +++ b/theories/Vectors/VectorDef.v @@ -314,8 +314,9 @@ Module VectorNotations. Notation "[]" := [] : vector_scope. Notation "h :: t" := (h :: t) (at level 60, right associativity) : vector_scope. - +Notation " [ x ] " := (x :: []) : vector_scope. +Notation " [ x ; .. ; y ] " := (cons _ x _ .. (cons _ y _ (nil _)) ..) : vector_scope +. Notation "v [@ p ]" := (nth v p) (at level 1, format "v [@ p ]") : vector_scope. - Open Scope vector_scope. End VectorNotations. |