{-# 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
        distributive : Distributive U

    open Category U public
    open Distributive distributive public