Update cubical
This commit is contained in:
parent
50f51db4fc
commit
19103e1678
|
@ -1 +1 @@
|
|||
Subproject commit 159c519936afcfb72afe5c1528637dd0f0a7303a
|
||||
Subproject commit 2fa05f70edfc59f205be9af2227996bdd6084948
|
|
@ -759,7 +759,7 @@ module _ {ℓa ℓb : Level} {ℂ : Category ℓa ℓb} where
|
|||
Monoidal→Kleisli = proj₁ Monoidal≃Kleisli
|
||||
|
||||
Kleisli→Monoidal : K.Monad → M.Monad
|
||||
Kleisli→Monoidal = reverse Monoidal≃Kleisli
|
||||
Kleisli→Monoidal = inverse Monoidal≃Kleisli
|
||||
|
||||
forth : voe-2-3-1 → voe-2-3-2
|
||||
forth = voe-2-3-2-fromMonad ∘f Monoidal→Kleisli ∘f voe-2-3-1.toMonad
|
||||
|
|
Loading…
Reference in a new issue