13 lines
268 B
Agda
13 lines
268 B
Agda
|
module 2023-11-27-asdf where
|
||
|
|
||
|
open import Relation.Binary.Core
|
||
|
open import Relation.Binary.Definitions
|
||
|
open import Relation.Binary.PropositionalEquality as Eq
|
||
|
|
||
|
postulate
|
||
|
S1 : Set
|
||
|
base : S1
|
||
|
loop : base ≡ base
|
||
|
|
||
|
asdf : (c : S1)
|
||
|
→ ((x : A) → x ≡ c)
|