Mercurial > hg > Members > kono > Proof > category
diff monoidal.agda @ 781:340708e8d54f
fix for 2.5.4.2
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Fri, 08 Mar 2019 17:46:59 +0900 |
parents | e5850e68be22 |
children |
line wrap: on
line diff
--- a/monoidal.agda Mon Oct 08 16:48:27 2018 +0900 +++ b/monoidal.agda Fri Mar 08 17:46:59 2019 +0900 @@ -274,6 +274,8 @@ -- Data.Product as a Tensor Product for Monoidal Category -- +open import Relation.Binary.PropositionalEquality hiding ( [_] ) + SetsTensorProduct : {c : Level} → Functor ( Sets {c} × Sets {c} ) (Sets {c}) SetsTensorProduct = record { FObj = λ x → proj₁ x * proj₂ x