mirror of
https://github.com/Smaug123/agdaproofs
synced 2025-10-09 05:48:41 +00:00
11 lines
297 B
Agda
11 lines
297 B
Agda
{-# OPTIONS --safe --warning=error --without-K #-}
|
|
|
|
open import LogicalFormulae
|
|
open import Agda.Primitive using (Level; lzero; lsuc; _⊔_)
|
|
|
|
module DecidableSet where
|
|
|
|
record DecidableSet {a : _} (A : Set a) : Set a where
|
|
field
|
|
eq : (a b : A) → ((a ≡ b) || ((a ≡ b) → False))
|