diff options
| author | Jacques Comeaux <jacquesrcomeaux@protonmail.com> | 2025-12-09 13:25:39 -0600 |
|---|---|---|
| committer | Jacques Comeaux <jacquesrcomeaux@protonmail.com> | 2025-12-09 13:25:39 -0600 |
| commit | 6272b4e84650b9833a53239b354770e0deba7b9a (patch) | |
| tree | d69dfd53369f4630fe9e8beceabad3ac55a1dc0e /Functor/Monoidal/Instance/Nat/Circ.agda | |
| parent | 3c62ac510f286f228c9993fe6c37abdcad9e1fb2 (diff) | |
Add shorter name for singleton setoid
Diffstat (limited to 'Functor/Monoidal/Instance/Nat/Circ.agda')
| -rw-r--r-- | Functor/Monoidal/Instance/Nat/Circ.agda | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Functor/Monoidal/Instance/Nat/Circ.agda b/Functor/Monoidal/Instance/Nat/Circ.agda index 0e2d3eb..1b45a75 100644 --- a/Functor/Monoidal/Instance/Nat/Circ.agda +++ b/Functor/Monoidal/Instance/Nat/Circ.agda @@ -14,7 +14,7 @@ open import Category.Monoidal.Instance.Nat using (Nat,+,0) open import Categories.Category.Construction.Monoids using (Monoids) open import Categories.Category.Instance.Nat using (Nat; Nat-Cocartesian) open import Categories.Category.Monoidal.Bundle using (SymmetricMonoidalCategory) -open import Categories.Category.Instance.SingletonSet using (SingletonSetoid) +open import Data.Setoid.Unit using (⊤ₛ) open import Categories.Category.Monoidal.Instance.Setoids using (Setoids-Cartesian) open import Categories.Category.Cartesian using (Cartesian) open Cartesian (Setoids-Cartesian {suc 0ℓ} {suc 0ℓ}) using (products) @@ -54,7 +54,7 @@ module MultisetOf,++,[] = SymmetricMonoidalFunctor MultisetOf,++,[] open SymmetricMonoidalFunctor -ε⇒ : SingletonSetoid ⟶ₛ Circuitₛ 0 +ε⇒ : ⊤ₛ ⟶ₛ Circuitₛ 0 ε⇒ = mkCircuitₛ ∙ MultisetOf,++,[].ε open Cocartesian Nat-Cocartesian using (-+-) |