aboutsummaryrefslogtreecommitdiff
path: root/Category/Cocomplete
diff options
context:
space:
mode:
authorJacques Comeaux <jacquesrcomeaux@protonmail.com>2025-04-23 10:09:32 -0500
committerJacques Comeaux <jacquesrcomeaux@protonmail.com>2025-04-23 10:09:32 -0500
commitf7afdb1823fe8d785849f817d022efa100007560 (patch)
tree34ebb6ee2b94c1ba8b0278f9d4458c62825fb3e5 /Category/Cocomplete
parentdf517e27a5a6d1740e7d982f3c01205d27aff347 (diff)
Category of decorated cospans is symmetric monoidal
Diffstat (limited to 'Category/Cocomplete')
-rw-r--r--Category/Cocomplete/Finitely/Bundle.agda1
-rw-r--r--Category/Cocomplete/Finitely/SymmetricMonoidal.agda4
2 files changed, 3 insertions, 2 deletions
diff --git a/Category/Cocomplete/Finitely/Bundle.agda b/Category/Cocomplete/Finitely/Bundle.agda
index 74f434f..8af8633 100644
--- a/Category/Cocomplete/Finitely/Bundle.agda
+++ b/Category/Cocomplete/Finitely/Bundle.agda
@@ -28,6 +28,7 @@ record FinitelyCocompleteCategory o ℓ e : Set (suc (o ⊔ ℓ ⊔ e)) where
; monoidal = monoidal
; symmetric = symmetric
}
+ {-# INJECTIVE_FOR_INFERENCE symmetricMonoidalCategory #-}
cocartesianCategory : CocartesianCategory o ℓ e
cocartesianCategory = record
diff --git a/Category/Cocomplete/Finitely/SymmetricMonoidal.agda b/Category/Cocomplete/Finitely/SymmetricMonoidal.agda
index 26813eb..2b66d19 100644
--- a/Category/Cocomplete/Finitely/SymmetricMonoidal.agda
+++ b/Category/Cocomplete/Finitely/SymmetricMonoidal.agda
@@ -4,11 +4,11 @@ open import Categories.Category.Core using (Category)
module Category.Cocomplete.Finitely.SymmetricMonoidal {o ℓ e} {𝒞 : Category o ℓ e} where
-open import Categories.Category.Cocomplete.Finitely using (FinitelyCocomplete)
+open import Categories.Category.Cocomplete.Finitely 𝒞 using (FinitelyCocomplete)
open import Categories.Category.Cocartesian 𝒞 using (module CocartesianMonoidal; module CocartesianSymmetricMonoidal)
-module FinitelyCocompleteSymmetricMonoidal (finCo : FinitelyCocomplete 𝒞) where
+module FinitelyCocompleteSymmetricMonoidal (finCo : FinitelyCocomplete) where
open FinitelyCocomplete finCo using (cocartesian)
open CocartesianMonoidal cocartesian using (+-monoidal) public