我在鍛鍊。這似乎是一個簡單的事情（簡化，以顯示該問題顯然是在名單分裂）： infixr 4 _::_ _++_ _==_
data _==_ {A : Set} : (x : A) -> (y : A) -> Set where
refl : (x : A) -> x == x
data List (A : Set) : Set where
nil :
我想對比兩種樣式來爲Agda中的代數結構聲明新的記錄類型。 繼標準阿格達包Algebra使用的樣式，人們可以如下定義BoundedJoinSemilattice： record IsBoundedJoinSemilattice {a ℓ} {A : Set a}
(_≈_ : Rel A ℓ) (_∨_ : Op₂ A) (⊥ : A) : Set (a Level.⊔ ℓ
限定記錄時 考慮下面的代碼： module UnresolvedMeta where
record Test (M : Set) : Set1 where
field
_≈_ : M -> M -> Set
_⊕_ : M -> M -> M
assoc⊕ : ∀ {r s t} -> ((r ⊕ s) ⊕ t) ≈ (r ⊕ (s ⊕ t
的背景是由按鍵有序的有限地圖的數據類型，如本previous question提到： open import Function
open import Relation.Binary renaming (IsEquivalence to IsEq)
open import Relation.Binary.PropositionalEquality as P using (_≡_)
modu
假設我有一個值x : A，我想定義一個只包含x的集合。 這是我的嘗試： open import Data.Product
open import Relation.Binary.PropositionalEquality
-- Singleton x is the set that only contains x. Its values are tuples containing
-- a
一些輸入： module error where
open import Data.Nat as ℕ
open import Level
open import Data.Vec
open import Data.Vec.N-ary
此功能從類型矢量和結果類型構造函數類型： N-Ary-from-Vec : {α γ : Level} {l : ℕ} -