aboutsummaryrefslogtreecommitdiffhomepage
path: root/ide/utf8.v
blob: 98c2e96381fd9930c90b3d39f2a031f3d3ab9ba9 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
(* Logic *)
Notation "∀ x : t , P" := (x:t)P (at level 1, x,t,P at level 10).
Notation "∀ x y : t , P" := (x:t)(y:t)P (at level 1, x,y,t,P at level 10).
Notation "∀ x y z : t , P" := (x:t)(y:t)(z:t) P (at level 1, x,y,z,t,P at level 10).
Notation "∀ x y z u : t , P" := (x:t)(y:t)(z:t)(u:t)P (at level 1, x,y,z,u,t,P at level 10).

Notation "∃ x : t , P" := (EXT x:t|P) (at level 1, x,t,P at level 10).
Notation "x ∨ y" := (x \/ y) (at level 1, y at level 10).
Notation "x ∧ y" := (x /\ y) (at level 1, y at level 10).
Notation "x → y" := (x -> y) (at level 1, y at level 10).
Notation "x ↔ y" := (x <-> y) (at level 1, y at level 10).
Notation "⌉ x" := (~x) (at level 1, x at level 10).

(* Abstraction *)
Notation  "'λ' x : T , y" := ([x:T] y) (at level 1, x,T,y at level 10).
Notation  "'λ' x := T , y" := ([x:=T] y) (at level 1, x,T,y at level 10).

(* Arithmetic *)
Notation "x ≤ y" := (le x y) (at level 3, y at level 10).
Notation "x ≥ y" := (ge x y) (at level 3, y at level 10).

(* Require ZArith.
   Notation "x ≤ y" := (Zle x y) (at level 1, y at level 10).*)