mirror of
https://github.com/luau-lang/luau.git
synced 2024-11-15 22:35:43 +08: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 ()
|