michael/lean2
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

feat(library/init/nat.lean): add notation <= and >= for nat

Browse source
This commit is contained in:
Jeremy Avigad 2015-05-17 12:57:48 +10:00
parent 7bde8193fe
commit 6dc1cfca3c
1 changed files with 2 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
library/init/nat.lean
View file

@ -21,6 +21,7 @@ namespace nat
definition le [reducible] (a b : nat) : Prop := a < succ b definition le [reducible] (a b : nat) : Prop := a < succ b
notation a <= b := le a b
notation a ≤ b := le a b notation a ≤ b := le a b
definition pred (a : nat) : nat := definition pred (a : nat) : nat :=
@ -251,6 +252,7 @@ namespace nat
definition decidable_ge [instance] : decidable_rel ge := definition decidable_ge [instance] : decidable_rel ge :=
_ _
notation a >= b := ge a b
notation a ≥ b := ge a b notation a ≥ b := ge a b
-- add is defined in init.num -- add is defined in init.num