2014-11-22 08:15:51 +00:00
|
|
|
|
import logic data.num data.nat.basic
|
2014-10-19 15:40:56 +00:00
|
|
|
|
open num
|
|
|
|
|
|
constant b : num
|
|
|
|
|
|
check b + b + b
|
|
|
|
|
|
check true ∧ false ∧ true
|
|
|
|
|
|
check (true ∧ false) ∧ true
|
|
|
|
|
|
check 2 + (2 + 2)
|
|
|
|
|
|
check (2 + 2) + 2
|
|
|
|
|
|
check 1 = (2 + 3)*2
|
|
|
|
|
|
check 2 + 3 * 2 = 3 * 2 + 2
|
|
|
|
|
|
check (true ∨ false) = (true ∨ false) ∧ true
|
|
|
|
|
|
check true ∧ (false ∨ true)
|
|
|
|
|
|
constant A : Type₁
|
|
|
|
|
|
constant a : A
|
|
|
|
|
|
notation 1 := a
|
|
|
|
|
|
check a
|
|
|
|
|
|
open nat
|
|
|
|
|
|
check ℕ → ℕ
|
