2014-09-17 21:39:05 +00:00
|
|
|
definition Prop : Type.{1} := Type.{0}
|
2014-06-18 16:14:50 +00:00
|
|
|
variable N : Type.{1}
|
2014-07-22 16:43:18 +00:00
|
|
|
variable and : Prop → Prop → Prop
|
2014-07-01 23:55:41 +00:00
|
|
|
infixr `∧`:35 := and
|
2014-07-22 16:43:18 +00:00
|
|
|
variable le : N → N → Prop
|
|
|
|
variable lt : N → N → Prop
|
2014-07-03 23:38:49 +00:00
|
|
|
variable f : N → N
|
|
|
|
variable add : N → N → N
|
|
|
|
infixl `+`:65 := add
|
2014-06-18 16:14:50 +00:00
|
|
|
precedence `≤`:50
|
|
|
|
precedence `<`:50
|
|
|
|
infixl ≤ := le
|
|
|
|
infixl < := lt
|
2014-07-03 23:38:49 +00:00
|
|
|
notation A ≤ B:prev ≤ C:prev := A ≤ B ∧ B ≤ C
|
|
|
|
notation A ≤ B:prev < C:prev := A ≤ B ∧ B < C
|
|
|
|
notation A < B:prev ≤ C:prev := A < B ∧ B ≤ C
|
2014-06-18 16:14:50 +00:00
|
|
|
variables a b c d e : N
|
2014-07-03 23:38:49 +00:00
|
|
|
check a ≤ b ≤ f c + b ∧ a < b
|
2014-06-18 16:14:50 +00:00
|
|
|
check a ≤ d
|
|
|
|
check a < b ≤ c
|
|
|
|
check a ≤ b < c
|
|
|
|
check a < b
|