diff options
| author |  Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2015-06-23 16:59:01 +0200 |
|---|---|---|
| committer | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2015-08-02 19:13:51 +0200 |
| commit | b78d86d50727af61e0c4417cf2ef12cbfc73239d (patch) | |
| tree | ef4f01a7c15159794651a849f9f05cfc6a4658b4 /theories/Init/Specif.v | |
| parent | 979de570714d340aaab7a6e99e08d46aa616e7da (diff) | |
Adding a notation { x & P } for { x : _ & P }.
Diffstat (limited to 'theories/Init/Specif.v')
| -rw-r--r-- | theories/Init/Specif.v | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/theories/Init/Specif.v b/theories/Init/Specif.v index 1384901b7..ecdbef7f6 100644 --- a/theories/Init/Specif.v +++ b/theories/Init/Specif.v @@ -48,6 +48,8 @@ Notation "{ x | P & Q }" := (sig2 (fun x => P) (fun x => Q)) : type_scope. Notation "{ x : A | P }" := (sig (A:=A) (fun x => P)) : type_scope. Notation "{ x : A | P & Q }" := (sig2 (A:=A) (fun x => P) (fun x => Q)) : type_scope. +Notation "{ x & P }" := (sigT (fun x => P)) : type_scope. +Notation "{ x & P & Q }" := (sigT2 (fun x => P) (fun x => Q)) : type_scope. Notation "{ x : A & P }" := (sigT (A:=A) (fun x => P)) : type_scope. Notation "{ x : A & P & Q }" := (sigT2 (A:=A) (fun x => P) (fun x => Q)) : type_scope. |