bsc-leon-vatthauer/Distributive/Bundle.agda

22 lines
No EOL
646 B
Agda
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

{-# OPTIONS --without-K --safe #-}
open import Categories.Category
open import Categories.Category.Cartesian
open import Categories.Category.BinaryProducts
open import Categories.Category.Cocartesian
open import Distributive.Core using (Distributive)
import Categories.Morphism as M
module Distributive.Bundle where
open import Level
record DistributiveCategory o e : Set (suc (o e)) where
field
U : Category o e
cartesian : Cartesian U
cocartesian : Cocartesian U
distributive : Distributive U cartesian cocartesian
open Category U public
open Distributive distributive public