From 6272b4e84650b9833a53239b354770e0deba7b9a Mon Sep 17 00:00:00 2001 From: Jacques Comeaux Date: Tue, 9 Dec 2025 13:25:39 -0600 Subject: Add shorter name for singleton setoid --- Data/System.agda | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Data/System.agda') diff --git a/Data/System.agda b/Data/System.agda index 5d5e484..d71c2a8 100644 --- a/Data/System.agda +++ b/Data/System.agda @@ -8,10 +8,10 @@ import Relation.Binary.Properties.Preorder as PreorderProperties import Relation.Binary.Reasoning.Setoid as ≈-Reasoning open import Categories.Category using (Category) -open import Categories.Category.Instance.SingletonSet using () renaming (SingletonSetoid to ⊤ₛ) open import Data.Circuit.Value using (Monoid) open import Data.Nat using (ℕ) open import Data.Setoid using (_⇒ₛ_; ∣_∣) +open import Data.Setoid.Unit using (⊤ₛ) open import Data.System.Values Monoid using (Values; _≋_; module ≋; <ε>) open import Function using (Func; _⟨$⟩_; flip) open import Function.Construct.Constant using () renaming (function to Const) -- cgit v1.2.3