mirror of
https://github.com/luau-lang/luau.git
synced 2024-12-13 13:30:40 +00:00
10 lines
157 B
Agda
10 lines
157 B
Agda
|
module Properties.Contradiction where
|
||
|
|
||
|
data ⊥ : Set where
|
||
|
|
||
|
¬ : Set → Set
|
||
|
¬ A = A → ⊥
|
||
|
|
||
|
CONTRADICTION : ∀ {A : Set} → ⊥ → A
|
||
|
CONTRADICTION ()
|