Dependent products of large monoids

Content created by Louis Wasserman.

Created on 2026-03-06.
Last modified on 2026-03-06.

module group-theory.dependent-products-large-monoids where
Imports
open import foundation.function-extensionality
open import foundation.identity-types
open import foundation.universe-levels

open import group-theory.dependent-products-large-semigroups
open import group-theory.large-monoids
open import group-theory.large-semigroups

Idea

The dependent product of a family of large monoids is a large monoid.

Definition

module _
  {α : Level  Level}
  {β : Level  Level  Level}
  {l0 : Level}
  (A : UU l0)
  (M : (a : A)  Large-Monoid α β)
  where

  large-semigroup-Π-Large-Monoid :
    Large-Semigroup  l  l0  α l)  l1 l2  l0  β l1 l2)
  large-semigroup-Π-Large-Monoid =
    Π-Large-Semigroup
      ( A)
      ( λ a  large-semigroup-Large-Monoid (M a))

  type-Π-Large-Monoid : (l : Level)  UU (l0  α l)
  type-Π-Large-Monoid l = (a : A)  type-Large-Monoid (M a) l

  unit-Π-Large-Monoid : type-Π-Large-Monoid lzero
  unit-Π-Large-Monoid a = unit-Large-Monoid (M a)

  mul-Π-Large-Monoid :
    {l1 l2 : Level} 
    type-Π-Large-Monoid l1  type-Π-Large-Monoid l2 
    type-Π-Large-Monoid (l1  l2)
  mul-Π-Large-Monoid = mul-Large-Semigroup large-semigroup-Π-Large-Monoid

  abstract
    left-unit-law-mul-Π-Large-Monoid :
      {l : Level} (f : type-Π-Large-Monoid l) 
      mul-Π-Large-Monoid unit-Π-Large-Monoid f  f
    left-unit-law-mul-Π-Large-Monoid f =
      eq-htpy  a  left-unit-law-mul-Large-Monoid (M a) (f a))

    right-unit-law-mul-Π-Large-Monoid :
      {l : Level} (f : type-Π-Large-Monoid l) 
      mul-Π-Large-Monoid f unit-Π-Large-Monoid  f
    right-unit-law-mul-Π-Large-Monoid f =
      eq-htpy  a  right-unit-law-mul-Large-Monoid (M a) (f a))

  Π-Large-Monoid : Large-Monoid  l  l0  α l)  l1 l2  l0  β l1 l2)
  Π-Large-Monoid =
    make-Large-Monoid
      ( large-semigroup-Π-Large-Monoid)
      ( unit-Π-Large-Monoid)
      ( left-unit-law-mul-Π-Large-Monoid)
      ( right-unit-law-mul-Π-Large-Monoid)

Recent changes