Prove2Me
Navigate
DiscoverCollectionsFormalpediaBlogsUsersMomentumMy Missions+
Prove2Me
⌕
Log in
← Formalpedia

Definitions for Framed bicategories and monoidal fibrations

Definition
QAlgorithms_Papers_Independent_Intakethird100_P60

by Gohan · Nov 1, 2026 · Mathlib 0df444a (Lean v4.33.1)

prove2quantum

The objects the formalized statements of Framed bicategories and monoidal fibrations (arXiv:0706.1286) are stated in. Each was checked against the paper by a blind read-back and a moderator.

  • DoubleData: The operations of a pseudo double category (Definition 2.1, PDF pp. 5–6). The vertical category and both horizontal dimensions have independent universes. The laws are specified separately by DoubleCoherence. The right frame of a composite is that of its second factor, as in the typed diagram on PDF p. 6; the displayed R(M odot N)=RM on PDF p. 5 is an apparent typographical error.
  • DoubleData.seq: Composition of globular cells, transporting identity frames (PDF p. 6).
  • DoubleCoherence: All pseudo double category axioms: vertical category laws, the two functors, interchange, invertible globular constraints natural for ALL squares, pentagon, and triangle (Definition 2.1 and conventions, PDF pp. 5–6).
  • IsCartesian: The universal lifting property for the JOINT frame functor, not a single frame projection (Definition 3.1, PDF pp. 9–10; explicit square form pp. 13–14).
  • IsOpcartesian: Dual universal lifting property for the joint frame functor (PDF pp. 12–14).
  • IsFrameFibration: Existence of every joint cartesian lift (Definition 3.1 and §4, PDF pp. 10, 13).
  • IsFrameOpfibration: Existence of every joint opcartesian lift (PDF pp. 12–13).
  • Companion: Companion with both identities, including unitors in the horizontal zigzag (4.2)–(4.4), PDF p. 15; Definition A.1, PDF pp. 71–72.
  • Conjoint: Conjoint with both identities, dual to the companion (PDF pp. 15, 71–72).
  • HasCompanions: Every vertical arrow admits a companion (PDF p. 72).
  • HasConjoints: Every vertical arrow admits a conjoint (PDF p. 72).
  • IsFramed: Nonalgebraic framing; the chosen characterization is (L,R) a fibration (Definition 4.8, PDF p. 17). Coherence is separately required in the theorem binders.
  • PseudoConnectionPair: Arbitrary chosen companions on a possibly non-strict double category, called a pseudo connection pair in Appendix A (PDF p. 72).
  • PseudoOpConnectionPair: Arbitrary chosen conjoints, called a pseudo op-connection pair in Appendix A (PDF p. 72); no strict horizontal composition is imposed.
  • IsDualPair: Both triangle identities for specified evaluation and coevaluation cells (Definition 5.2, PDF p. 20).
  • baseCoevaluation: Canonical coevaluation from the two base-change unit cells (Proposition 5.3, diagram across PDF pp. 20–21).
  • baseEvaluation: Canonical evaluation from the two base-change counit cells (Proposition 5.3, PDF p. 21).
  • thinDoubleData: A thin test double category over any vertical category; all horizontal arrows and all squares are unique. Used only to check the local interfaces.
  • thinDoubleCoherence: Sanity check: the complete coherence package is satisfiable, including for empty vertical categories (the source imposes no nonemptiness).
Definition code
import Mathlib

/-!
Statements from Shulman, arXiv:0706.1286v2. PDF page numbers are used throughout.
The local square presentation retains weak horizontal composition and strict vertical
composition. HEq in the laws only suppresses transports along category identity and
associativity equalities; it does not identify horizontal composites as objects.
-/

namespace QAlgorithms.Papers.Independent.Intakethird100.P60

open CategoryTheory

universe u v w x

/-- The operations of a pseudo double category (Definition 2.1, PDF pp. 5–6).
The vertical category and both horizontal dimensions have independent universes.
The laws are specified separately by `DoubleCoherence`. The right frame of a
composite is that of its second factor, as in the typed diagram on PDF p. 6;
the displayed R(M odot N)=RM on PDF p. 5 is an apparent typographical error. -/
structure DoubleData (V : Type u) [Category.{v} V] where
  H : V → V → Type w
  Cell : {A B C D : V} → (A ⟶ C) → (B ⟶ D) → H A B → H C D → Type x
  unit : (A : V) → H A A
  mul : {A B C : V} → H A B → H B C → H A C
  idCell : {A B : V} → (M : H A B) → Cell (𝟙 A) (𝟙 B) M M
  vcomp : {A B C D E F : V} → {f : A ⟶ C} → {g : B ⟶ D} →
    {h : C ⟶ E} → {k : D ⟶ F} → {M : H A B} → {N : H C D} →
    {P : H E F} → Cell f g M N → Cell h k N P → Cell (f ≫ h) (g ≫ k) M P
  unitCell : {A B : V} → (f : A ⟶ B) → Cell f f (unit A) (unit B)
  hcomp : {A B C D E F : V} → {f : A ⟶ D} → {g : B ⟶ E} →
    {h : C ⟶ F} → {M : H A B} → {N : H B C} → {P : H D E} →
    {Q : H E F} → Cell f g M P → Cell g h N Q → Cell f h (mul M N) (mul P Q)
  assoc : {A B C D : V} → (M : H A B) → (N : H B C) → (P : H C D) →
    Cell (𝟙 A) (𝟙 D) (mul (mul M N) P) (mul M (mul N P))
  assocInv : {A B C D : V} → (M : H A B) → (N : H B C) → (P : H C D) →
    Cell (𝟙 A) (𝟙 D) (mul M (mul N P)) (mul (mul M N) P)
  left : {A B : V} → (M : H A B) → Cell (𝟙 A) (𝟙 B) (mul (unit A) M) M
  leftInv : {A B : V} → (M : H A B) → Cell (𝟙 A) (𝟙 B) M (mul (unit A) M)
  right : {A B : V} → (M : H A B) → Cell (𝟙 A) (𝟙 B) (mul M (unit B)) M
  rightInv : {A B : V} → (M : H A B) → Cell (𝟙 A) (𝟙 B) M (mul M (unit B))

/-- Composition of globular cells, transporting identity frames (PDF p. 6). -/
def DoubleData.seq {V : Type u} [Category.{v} V] (D : DoubleData.{u,v,w,x} V)
    {A B : V} {M N P : D.H A B}
    (a : D.Cell (𝟙 A) (𝟙 B) M N) (b : D.Cell (𝟙 A) (𝟙 B) N P) :
    D.Cell (𝟙 A) (𝟙 B) M P := by
  simpa only [Category.id_comp] using D.vcomp a b

/-- All pseudo double category axioms: vertical category laws, the two functors,
interchange, invertible globular constraints natural for ALL squares, pentagon,
and triangle (Definition 2.1 and conventions, PDF pp. 5–6). -/
structure DoubleCoherence {V : Type u} [Category.{v} V] (D : DoubleData.{u,v,w,x} V) : Prop where
  vassoc : ∀ {A B C E F G I J : V} {f : A ⟶ C} {g : B ⟶ E}
    {h : C ⟶ F} {k : E ⟶ G} {l : F ⟶ I} {m : G ⟶ J}
    {M : D.H A B} {N : D.H C E} {P : D.H F G} {Q : D.H I J}
    (a : D.Cell f g M N) (b : D.Cell h k N P) (c : D.Cell l m P Q),
    HEq (D.vcomp (D.vcomp a b) c) (D.vcomp a (D.vcomp b c))
  vidLeft : ∀ {A B C E : V} {f : A ⟶ C} {g : B ⟶ E}
    {M : D.H A B} {N : D.H C E} (a : D.Cell f g M N),
    HEq (D.vcomp (D.idCell M) a) a
  vidRight : ∀ {A B C E : V} {f : A ⟶ C} {g : B ⟶ E}
    {M : D.H A B} {N : D.H C E} (a : D.Cell f g M N),
    HEq (D.vcomp a (D.idCell N)) a
  unitId : ∀ A, D.unitCell (𝟙 A) = D.idCell (D.unit A)
  unitComp : ∀ {A B C : V} (f : A ⟶ B) (g : B ⟶ C),
    D.unitCell (f ≫ g) = D.vcomp (D.unitCell f) (D.unitCell g)
  hid : ∀ {A B C : V} (M : D.H A B) (N : D.H B C),
    D.hcomp (D.idCell M) (D.idCell N) = D.idCell (D.mul M N)
  interchange : ∀ {A B C E F G I J K : V}
    {f : A ⟶ E} {g : B ⟶ F} {h : C ⟶ G}
    {i : E ⟶ I} {j : F ⟶ J} {k : G ⟶ K}
    {M : D.H A B} {N : D.H B C} {P : D.H E F} {Q : D.H F G}
    {R : D.H I J} {S : D.H J K}
    (a : D.Cell f g M P) (b : D.Cell g h N Q)
    (c : D.Cell i j P R) (d : D.Cell j k Q S),
    D.vcomp (D.hcomp a b) (D.hcomp c d) = D.hcomp (D.vcomp a c) (D.vcomp b d)
  assocIsoLeft : ∀ {A B C E : V} (M : D.H A B) (N : D.H B C) (P : D.H C E),
    D.seq (D.assoc M N P) (D.assocInv M N P) = D.idCell (D.mul (D.mul M N) P)
  assocIsoRight : ∀ {A B C E : V} (M : D.H A B) (N : D.H B C) (P : D.H C E),
    D.seq (D.assocInv M N P) (D.assoc M N P) = D.idCell (D.mul M (D.mul N P))
  leftIsoLeft : ∀ {A B : V} (M : D.H A B),
    D.seq (D.left M) (D.leftInv M) = D.idCell (D.mul (D.unit A) M)
  leftIsoRight : ∀ {A B : V} (M : D.H A B),
    D.seq (D.leftInv M) (D.left M) = D.idCell M
  rightIsoLeft : ∀ {A B : V} (M : D.H A B),
    D.seq (D.right M) (D.rightInv M) = D.idCell (D.mul M (D.unit B))
  rightIsoRight : ∀ {A B : V} (M : D.H A B),
    D.seq (D.rightInv M) (D.right M) = D.idCell M
  assocNatural : ∀ {A B C E F G I J : V}
    {f : A ⟶ F} {g : B ⟶ G} {h : C ⟶ I} {k : E ⟶ J}
    {M : D.H A B} {N : D.H B C} {P : D.H C E}
    {Q : D.H F G} {R : D.H G I} {S : D.H I J}
    (a : D.Cell f g M Q) (b : D.Cell g h N R) (c : D.Cell h k P S),
    HEq (D.vcomp (D.hcomp (D.hcomp a b) c) (D.assoc Q R S))
      (D.vcomp (D.assoc M N P) (D.hcomp a (D.hcomp b c)))
  leftNatural : ∀ {A B C E : V} {f : A ⟶ C} {g : B ⟶ E}
    {M : D.H A B} {N : D.H C E} (a : D.Cell f g M N),
    HEq (D.vcomp (D.hcomp (D.unitCell f) a) (D.left N)) (D.vcomp (D.left M) a)
  rightNatural : ∀ {A B C E : V} {f : A ⟶ C} {g : B ⟶ E}
    {M : D.H A B} {N : D.H C E} (a : D.Cell f g M N),
    HEq (D.vcomp (D.hcomp a (D.unitCell g)) (D.right N)) (D.vcomp (D.right M) a)
  pentagon : ∀ {A B C E F : V} (M : D.H A B) (N : D.H B C)
    (P : D.H C E) (Q : D.H E F),
    D.seq (D.seq (D.hcomp (D.assoc M N P) (D.idCell Q)) (D.assoc M (D.mul N P) Q))
      (D.hcomp (D.idCell M) (D.assoc N P Q)) =
    D.seq (D.assoc (D.mul M N) P Q) (D.assoc M N (D.mul P Q))
  triangle : ∀ {A B C : V} (M : D.H A B) (N : D.H B C),
    D.seq (D.assoc M (D.unit B) N) (D.hcomp (D.idCell M) (D.left N)) =
      D.hcomp (D.right M) (D.idCell N)

/-- The universal lifting property for the JOINT frame functor, not a single
frame projection (Definition 3.1, PDF pp. 9–10; explicit square form pp. 13–14). -/
def IsCartesian {V : Type u} [Category.{v} V] (D : DoubleData.{u,v,w,x} V)
    {A B C E : V} {f : A ⟶ C} {g : B ⟶ E} {M : D.H A B} {N : D.H C E}
    (a : D.Cell f g M N) : Prop :=
  ∀ (P Q : V) (h : P ⟶ A) (k : Q ⟶ B) (T : D.H P Q)
    (b : D.Cell (h ≫ f) (k ≫ g) T N),
    ∃! c : D.Cell h k T M, D.vcomp c a = b

/-- Dual universal lifting property for the joint frame functor (PDF pp. 12–14). -/
def IsOpcartesian {V : Type u} [Category.{v} V] (D : DoubleData.{u,v,w,x} V)
    {A B C E : V} {f : A ⟶ C} {g : B ⟶ E} {M : D.H A B} {N : D.H C E}
    (a : D.Cell f g M N) : Prop :=
  ∀ (P Q : V) (h : C ⟶ P) (k : E ⟶ Q) (T : D.H P Q)
    (b : D.Cell (f ≫ h) (g ≫ k) M T),
    ∃! c : D.Cell h k N T, D.vcomp a c = b

/-- Existence of every joint cartesian lift (Definition 3.1 and §4, PDF pp. 10, 13). -/
def IsFrameFibration {V : Type u} [Category.{v} V] (D : DoubleData.{u,v,w,x} V) : Prop :=
  ∀ (A B C E : V) (f : A ⟶ C) (g : B ⟶ E) (N : D.H C E),
    ∃ (M : D.H A B) (a : D.Cell f g M N), IsCartesian D a

/-- Existence of every joint opcartesian lift (PDF pp. 12–13). -/
def IsFrameOpfibration {V : Type u} [Category.{v} V] (D : DoubleData.{u,v,w,x} V) : Prop :=
  ∀ (A B C E : V) (f : A ⟶ C) (g : B ⟶ E) (M : D.H A B),
    ∃ (N : D.H C E) (a : D.Cell f g M N), IsOpcartesian D a

/-- Companion with both identities, including unitors in the horizontal zigzag
(4.2)–(4.4), PDF p. 15; Definition A.1, PDF pp. 71–72. -/
structure Companion {V : Type u} [Category.{v} V] (D : DoubleData.{u,v,w,x} V)
    {A B : V} (f : A ⟶ B) (M : D.H A B) where
  counit : D.Cell f (𝟙 B) M (D.unit B)
  unit : D.Cell (𝟙 A) f (D.unit A) M
  vertical : HEq (D.vcomp unit counit) (D.unitCell f)
  horizontal : D.seq (D.seq (D.leftInv M) (D.hcomp unit counit)) (D.right M) = D.idCell M

/-- Conjoint with both identities, dual to the companion (PDF pp. 15, 71–72). -/
structure Conjoint {V : Type u} [Category.{v} V] (D : DoubleData.{u,v,w,x} V)
    {A B : V} (f : A ⟶ B) (N : D.H B A) where
  counit : D.Cell (𝟙 B) f N (D.unit B)
  unit : D.Cell f (𝟙 A) (D.unit A) N
  vertical : HEq (D.vcomp unit counit) (D.unitCell f)
  horizontal : D.seq (D.seq (D.rightInv N) (D.hcomp counit unit)) (D.left N) = D.idCell N

/-- Every vertical arrow admits a companion (PDF p. 72). -/
def HasCompanions {V : Type u} [Category.{v} V] (D : DoubleData.{u,v,w,x} V) : Prop :=
  ∀ (A B : V) (f : A ⟶ B), ∃ M : D.H A B, Nonempty (Companion D f M)

/-- Every vertical arrow admits a conjoint (PDF p. 72). -/
def HasConjoints {V : Type u} [Category.{v} V] (D : DoubleData.{u,v,w,x} V) : Prop :=
  ∀ (A B : V) (f : A ⟶ B), ∃ N : D.H B A, Nonempty (Conjoint D f N)

/-- Nonalgebraic framing; the chosen characterization is (L,R) a fibration
(Definition 4.8, PDF p. 17). Coherence is separately required in the theorem binders. -/
def IsFramed {V : Type u} [Category.{v} V] (D : DoubleData.{u,v,w,x} V) : Prop :=
  IsFrameFibration D

/-- Arbitrary chosen companions on a possibly non-strict double category,
called a pseudo connection pair in Appendix A (PDF p. 72). -/
structure PseudoConnectionPair {V : Type u} [Category.{v} V] (D : DoubleData.{u,v,w,x} V) where
  arrow : {A B : V} → (A ⟶ B) → D.H A B
  comparison : {A B : V} → (f : A ⟶ B) → Companion D f (arrow f)

/-- Arbitrary chosen conjoints, called a pseudo op-connection pair in
Appendix A (PDF p. 72); no strict horizontal composition is imposed. -/
structure PseudoOpConnectionPair {V : Type u} [Category.{v} V] (D : DoubleData.{u,v,w,x} V) where
  arrow : {A B : V} → (A ⟶ B) → D.H B A
  comparison : {A B : V} → (f : A ⟶ B) → Conjoint D f (arrow f)

/-- Both triangle identities for specified evaluation and coevaluation cells
(Definition 5.2, PDF p. 20). -/
def IsDualPair {V : Type u} [Category.{v} V] (D : DoubleData.{u,v,w,x} V)
    {A B : V} (M : D.H A B) (N : D.H B A)
    (eta : D.Cell (𝟙 A) (𝟙 A) (D.unit A) (D.mul M N))
    (eps : D.Cell (𝟙 B) (𝟙 B) (D.mul N M) (D.unit B)) : Prop :=
  D.seq (D.seq (D.seq (D.seq (D.leftInv M) (D.hcomp eta (D.idCell M)))
    (D.assoc M N M)) (D.hcomp (D.idCell M) eps)) (D.right M) = D.idCell M ∧
  D.seq (D.seq (D.seq (D.seq (D.rightInv N) (D.hcomp (D.idCell N) eta))
    (D.assocInv N M N)) (D.hcomp eps (D.idCell N))) (D.left N) = D.idCell N

/-- Canonical coevaluation from the two base-change unit cells
(Proposition 5.3, diagram across PDF pp. 20–21). -/
def baseCoevaluation {V : Type u} [Category.{v} V] (D : DoubleData.{u,v,w,x} V)
    {A B : V} {f : A ⟶ B} {M : D.H A B} {N : D.H B A}
    (c : Companion D f M) (j : Conjoint D f N) :
    D.Cell (𝟙 A) (𝟙 A) (D.unit A) (D.mul M N) :=
  D.seq (D.leftInv (D.unit A)) (D.hcomp c.unit j.unit)

/-- Canonical evaluation from the two base-change counit cells
(Proposition 5.3, PDF p. 21). -/
def baseEvaluation {V : Type u} [Category.{v} V] (D : DoubleData.{u,v,w,x} V)
    {A B : V} {f : A ⟶ B} {M : D.H A B} {N : D.H B A}
    (c : Companion D f M) (j : Conjoint D f N) :
    D.Cell (𝟙 B) (𝟙 B) (D.mul N M) (D.unit B) :=
  D.seq (D.hcomp j.counit c.counit) (D.left (D.unit B))

/-- A thin test double category over any vertical category; all horizontal
arrows and all squares are unique. Used only to check the local interfaces. -/
def thinDoubleData (V : Type u) [Category.{v} V] : DoubleData.{u,v,0,0} V where
  H := fun _ _ => PUnit
  Cell := fun {A B C E} _ _ _ _ => PUnit
  unit := fun _ => PUnit.unit
  mul := fun _ _ => PUnit.unit
  idCell := fun _ => PUnit.unit
  vcomp := fun _ _ => PUnit.unit
  unitCell := fun _ => PUnit.unit
  hcomp := fun _ _ => PUnit.unit
  assoc := fun _ _ _ => PUnit.unit
  assocInv := fun _ _ _ => PUnit.unit
  left := fun _ => PUnit.unit
  leftInv := fun _ => PUnit.unit
  right := fun _ => PUnit.unit
  rightInv := fun _ => PUnit.unit

/-- Sanity check: the complete coherence package is satisfiable, including
for empty vertical categories (the source imposes no nonemptiness). -/
def thinDoubleCoherence (V : Type u) [Category.{v} V] : DoubleCoherence (thinDoubleData V) := by
  constructor <;> intros <;> dsimp only [thinDoubleData, DoubleData.seq] <;> first
  | exact Subsingleton.elim _ _
  | exact heq_of_eq (Subsingleton.elim _ _)

example (V : Type u) [Category.{v} V] (A B : V) :
    (thinDoubleData V).mul (A := A) (B := B) (C := B)
      (PUnit.unit : (thinDoubleData V).H A B)
      ((thinDoubleData V).unit B) = PUnit.unit := rfl

example (V : Type u) [Category.{v} V] (A B : V) (f : A ⟶ B) :
    Companion (thinDoubleData V) f PUnit.unit :=
  ⟨PUnit.unit, PUnit.unit, HEq.rfl, rfl⟩

example (V : Type u) [Category.{v} V] (A B : V) (f : A ⟶ B) :
    Conjoint (thinDoubleData V) f PUnit.unit :=
  ⟨PUnit.unit, PUnit.unit, HEq.rfl, rfl⟩

example (V : Type u) [Category.{v} V] (A B : V) :
    IsDualPair (thinDoubleData V) (A := A) (B := B)
      (PUnit.unit : (thinDoubleData V).H A B)
      PUnit.unit PUnit.unit PUnit.unit := ⟨rfl, rfl⟩

example (V : Type u) [Category.{v} V] : IsFrameFibration (thinDoubleData V) := by
  intro A B C E f g N
  refine ⟨PUnit.unit, PUnit.unit, ?_⟩
  intro P Q h k T b
  refine ⟨PUnit.unit, ?_, ?_⟩
  · dsimp only [thinDoubleData]
    exact Subsingleton.elim _ _
  · intro c hc
    dsimp only [thinDoubleData]
    exact Subsingleton.elim _ _

example (V : Type u) [Category.{v} V] : IsFrameOpfibration (thinDoubleData V) := by
  intro A B C E f g M
  refine ⟨PUnit.unit, PUnit.unit, ?_⟩
  intro P Q h k T b
  refine ⟨PUnit.unit, ?_, ?_⟩
  · dsimp only [thinDoubleData]
    exact Subsingleton.elim _ _
  · intro c hc
    dsimp only [thinDoubleData]
    exact Subsingleton.elim _ _

end QAlgorithms.Papers.Independent.Intakethird100.P60
Source
Framed bicategories and monoidal fibrations, arXiv:0706.1286v2, https://arxiv.org/abs/0706.1286v2
Read-back

What the Lean code literally says, in plain math · gpt-6.1-sol

QAlgorithms.Papers.Independent.Intakethird100.P60.Companion

For arbitrary universe levels u,v,w,xu,v,w,xu,v,w,x, a category VVV with objects in universe uuu and morphisms in universe vvv, and data DDD supplying horizontal-arrow types H(A,B)H(A,B)H(A,B) in universe www, square types Sq⁡(f,g;M,N)\operatorname{Sq}(f,g;M,N)Sq(f,g;M,N) in universe xxx, horizontal units IAI_AIA​, horizontal products ∗*∗, identity squares 1M1_M1M​, vertical composition ;;;, horizontal composition □\Box□, unit squares Uf∈Sq⁡(f,f;IA,IB)U_f\in\operatorname{Sq}(f,f;I_A,I_B)Uf​∈Sq(f,f;IA​,IB​), and associativity and unit comparison squares in both directions, fix any objects A,BA,BA,B, morphism f:A→Bf:A\to Bf:A→B, and M∈H(A,B)M\in H(A,B)M∈H(A,B). This structure consists of a square ε∈Sq⁡(f,1B;M,IB)\varepsilon\in\operatorname{Sq}(f,1_B;M,I_B)ε∈Sq(f,1B​;M,IB​), a square η∈Sq⁡(1A,f;IA,M)\eta\in\operatorname{Sq}(1_A,f;I_A,M)η∈Sq(1A​,f;IA​,M), a heterogeneous equality between the vertical composite η;ε\eta;\varepsilonη;ε and UfU_fUf​, and the equation

(λˉM;(η□ε));ρM=1M.\bigl(\bar\lambda_M;(\eta\mathbin{\Box}\varepsilon)\bigr);\rho_M=1_M.(λˉM​;(η□ε));ρM​=1M​.

Here λˉM∈Sq⁡(1A,1B;M,IA∗M)\bar\lambda_M\in\operatorname{Sq}(1_A,1_B;M,I_A*M)λˉM​∈Sq(1A​,1B​;M,IA​∗M) and ρM∈Sq⁡(1A,1B;M∗IB,M)\rho_M\in\operatorname{Sq}(1_A,1_B;M*I_B,M)ρM​∈Sq(1A​,1B​;M∗IB​,M) are the supplied comparison squares; η□ε\eta\mathbin{\Box}\varepsilonη□ε is the supplied horizontal composite from IA∗MI_A*MIA​∗M to M∗IBM*I_BM∗IB​ with identity side morphisms. Each semicolon means composition in the displayed order; in the displayed equation, the composites of identity side morphisms are simplified to identities. Heterogeneous equality allows the vertical equation to compare terms whose displayed dependent types are not definitionally identical. No other coherence equations for DDD are assumed, and the objects A,BA,BA,B may coincide; defining this structure does not assert that it is inhabited for every f,Mf,Mf,M.

QAlgorithms.Papers.Independent.Intakethird100.P60.Conjoint

For arbitrary universe levels u,v,w,xu,v,w,xu,v,w,x, a category VVV with objects in universe uuu and morphisms in universe vvv, and data DDD supplying horizontal-arrow types H(A,B)H(A,B)H(A,B) in universe www, square types Sq⁡(f,g;M,N)\operatorname{Sq}(f,g;M,N)Sq(f,g;M,N) in universe xxx, horizontal units IAI_AIA​, horizontal products ∗*∗, identity squares 1M1_M1M​, vertical composition ;;;, horizontal composition □\Box□, unit squares Uf∈Sq⁡(f,f;IA,IB)U_f\in\operatorname{Sq}(f,f;I_A,I_B)Uf​∈Sq(f,f;IA​,IB​), and associativity and unit comparison squares in both directions, fix any objects A,BA,BA,B, morphism f:A→Bf:A\to Bf:A→B, and N∈H(B,A)N\in H(B,A)N∈H(B,A). This structure consists of a square ε∈Sq⁡(1B,f;N,IB)\varepsilon\in\operatorname{Sq}(1_B,f;N,I_B)ε∈Sq(1B​,f;N,IB​), a square η∈Sq⁡(f,1A;IA,N)\eta\in\operatorname{Sq}(f,1_A;I_A,N)η∈Sq(f,1A​;IA​,N), a heterogeneous equality between the vertical composite η;ε\eta;\varepsilonη;ε and UfU_fUf​, and the equation

(ρˉN;(ε□η));λN=1N.\bigl(\bar\rho_N;(\varepsilon\mathbin{\Box}\eta)\bigr);\lambda_N=1_N.(ρˉ​N​;(ε□η));λN​=1N​.

Here ρˉN∈Sq⁡(1B,1A;N,N∗IA)\bar\rho_N\in\operatorname{Sq}(1_B,1_A;N,N*I_A)ρˉ​N​∈Sq(1B​,1A​;N,N∗IA​) and λN∈Sq⁡(1B,1A;IB∗N,N)\lambda_N\in\operatorname{Sq}(1_B,1_A;I_B*N,N)λN​∈Sq(1B​,1A​;IB​∗N,N) are the supplied comparison squares; ε□η\varepsilon\mathbin{\Box}\etaε□η is the supplied horizontal composite from N∗IAN*I_AN∗IA​ to IB∗NI_B*NIB​∗N with identity side morphisms. Each semicolon means composition in the displayed order; in the displayed equation, the composites of identity side morphisms are simplified to identities. Heterogeneous equality allows the vertical equation to compare terms whose displayed dependent types are not definitionally identical. No other coherence equations for DDD are assumed, and the objects A,BA,BA,B may coincide; defining this structure does not assert that it is inhabited for every f,Nf,Nf,N.

QAlgorithms.Papers.Independent.Intakethird100.P60.DoubleCoherence

For arbitrary universe levels u,v,w,xu,v,w,xu,v,w,x, let VVV be a category with objects in universe uuu and morphisms in universe vvv, and let DDD supply horizontal-arrow types H(A,B)H(A,B)H(A,B) in universe www and square types Sq⁡(f,g;M,N)\operatorname{Sq}(f,g;M,N)Sq(f,g;M,N) in universe xxx, where f:A→Cf:A\to Cf:A→C, g:B→Eg:B\to Eg:B→E, M∈H(A,B)M\in H(A,B)M∈H(A,B), and N∈H(C,E)N\in H(C,E)N∈H(C,E). Write IA∈H(A,A)I_A\in H(A,A)IA​∈H(A,A) for the supplied horizontal unit, M∗NM*NM∗N for the supplied horizontal product, 1M1_M1M​ for its identity square, a;ba;ba;b for vertical composition in the order aaa then bbb, a□ba\mathbin{\Box}ba□b for horizontal composition, and Uf∈Sq⁡(f,f;IA,IB)U_f\in\operatorname{Sq}(f,f;I_A,I_B)Uf​∈Sq(f,f;IA​,IB​) for the supplied square associated to f:A→Bf:A\to Bf:A→B. Write αM,N,P:(M∗N)∗P→M∗(N∗P)\alpha_{M,N,P}:(M*N)*P\to M*(N*P)αM,N,P​:(M∗N)∗P→M∗(N∗P) and αˉM,N,P\bar\alpha_{M,N,P}αˉM,N,P​ for the supplied comparison in the reverse direction, and write λM:IA∗M→M\lambda_M:I_A*M\to MλM​:IA​∗M→M, λˉM:M→IA∗M\bar\lambda_M:M\to I_A*MλˉM​:M→IA​∗M, ρM:M∗IB→M\rho_M:M*I_B\to MρM​:M∗IB​→M, and ρˉM:M→M∗IB\bar\rho_M:M\to M*I_Bρˉ​M​:M→M∗IB​; these comparison arrows are squares with identity side morphisms. In equations involving only identity-side squares, ;;; means vertical composition with the identity side composites simplified. Let ≐\doteq≐ denote heterogeneous equality, which allows equality to be expressed when the displayed dependent types are not definitionally identical; ordinary === denotes equality within the same type. This proposition consists of all the following universally quantified equations. For every eight objects A,B,C,E,F,G,I,JA,B,C,E,F,G,I,JA,B,C,E,F,G,I,J, morphisms f:A→Cf:A\to Cf:A→C, g:B→Eg:B\to Eg:B→E, h:C→Fh:C\to Fh:C→F, k:E→Gk:E\to Gk:E→G, l:F→Il:F\to Il:F→I, m:G→Jm:G\to Jm:G→J, horizontal elements M∈H(A,B)M\in H(A,B)M∈H(A,B), N∈H(C,E)N\in H(C,E)N∈H(C,E), P∈H(F,G)P\in H(F,G)P∈H(F,G), Q∈H(I,J)Q\in H(I,J)Q∈H(I,J), and squares a∈Sq⁡(f,g;M,N)a\in\operatorname{Sq}(f,g;M,N)a∈Sq(f,g;M,N), b∈Sq⁡(h,k;N,P)b\in\operatorname{Sq}(h,k;N,P)b∈Sq(h,k;N,P), c∈Sq⁡(l,m;P,Q)c\in\operatorname{Sq}(l,m;P,Q)c∈Sq(l,m;P,Q), one has (a;b);c≐a;(b;c)(a;b);c\doteq a;(b;c)(a;b);c≐a;(b;c). For every four objects A,B,C,EA,B,C,EA,B,C,E, morphisms f:A→Cf:A\to Cf:A→C, g:B→Eg:B\to Eg:B→E, elements M∈H(A,B)M\in H(A,B)M∈H(A,B), N∈H(C,E)N\in H(C,E)N∈H(C,E), and square a∈Sq⁡(f,g;M,N)a\in\operatorname{Sq}(f,g;M,N)a∈Sq(f,g;M,N), one has 1M;a≐a1_M;a\doteq a1M​;a≐a and a;1N≐aa;1_N\doteq aa;1N​≐a. For every object AAA, U1A=1IAU_{1_A}=1_{I_A}U1A​​=1IA​​; for every three objects A,B,CA,B,CA,B,C and morphisms f:A→Bf:A\to Bf:A→B, g:B→Cg:B\to Cg:B→C, Ug∘f=Uf;UgU_{g\circ f}=U_f;U_gUg∘f​=Uf​;Ug​; and for every M∈H(A,B)M\in H(A,B)M∈H(A,B), N∈H(B,C)N\in H(B,C)N∈H(B,C), 1M□1N=1M∗N1_M\mathbin{\Box}1_N=1_{M*N}1M​□1N​=1M∗N​. For every nine objects A,B,C,E,F,G,I,J,KA,B,C,E,F,G,I,J,KA,B,C,E,F,G,I,J,K, morphisms f:A→Ef:A\to Ef:A→E, g:B→Fg:B\to Fg:B→F, h:C→Gh:C\to Gh:C→G, i:E→Ii:E\to Ii:E→I, j:F→Jj:F\to Jj:F→J, k:G→Kk:G\to Kk:G→K, horizontal elements M∈H(A,B)M\in H(A,B)M∈H(A,B), N∈H(B,C)N\in H(B,C)N∈H(B,C), P∈H(E,F)P\in H(E,F)P∈H(E,F), Q∈H(F,G)Q\in H(F,G)Q∈H(F,G), R∈H(I,J)R\in H(I,J)R∈H(I,J), S∈H(J,K)S\in H(J,K)S∈H(J,K), and squares a∈Sq⁡(f,g;M,P)a\in\operatorname{Sq}(f,g;M,P)a∈Sq(f,g;M,P), b∈Sq⁡(g,h;N,Q)b\in\operatorname{Sq}(g,h;N,Q)b∈Sq(g,h;N,Q), c∈Sq⁡(i,j;P,R)c\in\operatorname{Sq}(i,j;P,R)c∈Sq(i,j;P,R), d∈Sq⁡(j,k;Q,S)d\in\operatorname{Sq}(j,k;Q,S)d∈Sq(j,k;Q,S), one has

(a□b);(c□d)=(a;c)□(b;d).(a\mathbin{\Box}b);(c\mathbin{\Box}d)=(a;c)\mathbin{\Box}(b;d).(a□b);(c□d)=(a;c)□(b;d).

For every four objects A,B,C,EA,B,C,EA,B,C,E and M∈H(A,B)M\in H(A,B)M∈H(A,B), N∈H(B,C)N\in H(B,C)N∈H(B,C), P∈H(C,E)P\in H(C,E)P∈H(C,E), both equations

αM,N,P;αˉM,N,P=1(M∗N)∗P,αˉM,N,P;αM,N,P=1M∗(N∗P)\alpha_{M,N,P};\bar\alpha_{M,N,P}=1_{(M*N)*P}, \qquad \bar\alpha_{M,N,P};\alpha_{M,N,P}=1_{M*(N*P)}αM,N,P​;αˉM,N,P​=1(M∗N)∗P​,αˉM,N,P​;αM,N,P​=1M∗(N∗P)​

hold. For every pair of objects A,BA,BA,B and M∈H(A,B)M\in H(A,B)M∈H(A,B), all four equations

λM;λˉM=1IA∗M,λˉM;λM=1M,ρM;ρˉM=1M∗IB,ρˉM;ρM=1M\lambda_M;\bar\lambda_M=1_{I_A*M},\qquad \bar\lambda_M;\lambda_M=1_M,\qquad \rho_M;\bar\rho_M=1_{M*I_B},\qquad \bar\rho_M;\rho_M=1_MλM​;λˉM​=1IA​∗M​,λˉM​;λM​=1M​,ρM​;ρˉ​M​=1M∗IB​​,ρˉ​M​;ρM​=1M​

hold. For every eight objects A,B,C,E,F,G,I,JA,B,C,E,F,G,I,JA,B,C,E,F,G,I,J, morphisms f:A→Ff:A\to Ff:A→F, g:B→Gg:B\to Gg:B→G, h:C→Ih:C\to Ih:C→I, k:E→Jk:E\to Jk:E→J, elements M∈H(A,B)M\in H(A,B)M∈H(A,B), N∈H(B,C)N\in H(B,C)N∈H(B,C), P∈H(C,E)P\in H(C,E)P∈H(C,E), Q∈H(F,G)Q\in H(F,G)Q∈H(F,G), R∈H(G,I)R\in H(G,I)R∈H(G,I), S∈H(I,J)S\in H(I,J)S∈H(I,J), and squares a∈Sq⁡(f,g;M,Q)a\in\operatorname{Sq}(f,g;M,Q)a∈Sq(f,g;M,Q), b∈Sq⁡(g,h;N,R)b\in\operatorname{Sq}(g,h;N,R)b∈Sq(g,h;N,R), c∈Sq⁡(h,k;P,S)c\in\operatorname{Sq}(h,k;P,S)c∈Sq(h,k;P,S), one has

((a□b)□c);αQ,R,S≐αM,N,P;(a□(b□c)).((a\mathbin{\Box}b)\mathbin{\Box}c);\alpha_{Q,R,S} \doteq \alpha_{M,N,P};(a\mathbin{\Box}(b\mathbin{\Box}c)).((a□b)□c);αQ,R,S​≐αM,N,P​;(a□(b□c)).

For every four objects A,B,C,EA,B,C,EA,B,C,E, morphisms f:A→Cf:A\to Cf:A→C, g:B→Eg:B\to Eg:B→E, elements M∈H(A,B)M\in H(A,B)M∈H(A,B), N∈H(C,E)N\in H(C,E)N∈H(C,E), and square a∈Sq⁡(f,g;M,N)a\in\operatorname{Sq}(f,g;M,N)a∈Sq(f,g;M,N), one has

(Uf□a);λN≐λM;a,(a□Ug);ρN≐ρM;a.(U_f\mathbin{\Box}a);\lambda_N\doteq\lambda_M;a, \qquad (a\mathbin{\Box}U_g);\rho_N\doteq\rho_M;a.(Uf​□a);λN​≐λM​;a,(a□Ug​);ρN​≐ρM​;a.

For every five objects A,B,C,E,FA,B,C,E,FA,B,C,E,F and M∈H(A,B)M\in H(A,B)M∈H(A,B), N∈H(B,C)N\in H(B,C)N∈H(B,C), P∈H(C,E)P\in H(C,E)P∈H(C,E), Q∈H(E,F)Q\in H(E,F)Q∈H(E,F), one has

((αM,N,P□1Q);αM,N∗P,Q);(1M□αN,P,Q)=αM∗N,P,Q;αM,N,P∗Q.\bigl((\alpha_{M,N,P}\mathbin{\Box}1_Q);\alpha_{M,N*P,Q}\bigr); (1_M\mathbin{\Box}\alpha_{N,P,Q}) = \alpha_{M*N,P,Q};\alpha_{M,N,P*Q}.((αM,N,P​□1Q​);αM,N∗P,Q​);(1M​□αN,P,Q​)=αM∗N,P,Q​;αM,N,P∗Q​.

Finally, for every three objects A,B,CA,B,CA,B,C and M∈H(A,B)M\in H(A,B)M∈H(A,B), N∈H(B,C)N\in H(B,C)N∈H(B,C), one has

αM,IB,N;(1M□λN)=ρM□1N.\alpha_{M,I_B,N};(1_M\mathbin{\Box}\lambda_N) = \rho_M\mathbin{\Box}1_N.αM,IB​,N​;(1M​□λN​)=ρM​□1N​.

All object choices may include repetitions; each requirement ranges over every inhabitant of the specified types, and a universally quantified requirement has no instances when one of its required input types is empty.

QAlgorithms.Papers.Independent.Intakethird100.P60.DoubleData

For any universe levels u,v,w,xu,v,w,xu,v,w,x and any type VVV in universe uuu equipped with a category structure whose morphism types lie in universe vvv, this structure consists of the following data. For every pair of objects A,BA,BA,B, there is a type H(A,B)H(A,B)H(A,B) in universe www; for every four objects A,B,C,DA,B,C,DA,B,C,D, morphisms f:A→Cf:A\to Cf:A→C, g:B→Dg:B\to Dg:B→D, and elements M∈H(A,B)M\in H(A,B)M∈H(A,B), N∈H(C,D)N\in H(C,D)N∈H(C,D), there is a type of squares Sq⁡(f,g;M,N)\operatorname{Sq}(f,g;M,N)Sq(f,g;M,N) in universe xxx. There are chosen elements IA∈H(A,A)I_A\in H(A,A)IA​∈H(A,A) for every object AAA, and products M∗N∈H(A,C)M*N\in H(A,C)M∗N∈H(A,C) for every M∈H(A,B)M\in H(A,B)M∈H(A,B), N∈H(B,C)N\in H(B,C)N∈H(B,C). Every M∈H(A,B)M\in H(A,B)M∈H(A,B) has a chosen identity square 1M∈Sq⁡(1A,1B;M,M)1_M\in\operatorname{Sq}(1_A,1_B;M,M)1M​∈Sq(1A​,1B​;M,M). For arbitrary objects A,B,C,D,E,FA,B,C,D,E,FA,B,C,D,E,F, morphisms f:A→Cf:A\to Cf:A→C, g:B→Dg:B\to Dg:B→D, h:C→Eh:C\to Eh:C→E, k:D→Fk:D\to Fk:D→F, horizontal elements M∈H(A,B)M\in H(A,B)M∈H(A,B), N∈H(C,D)N\in H(C,D)N∈H(C,D), P∈H(E,F)P\in H(E,F)P∈H(E,F), and squares a∈Sq⁡(f,g;M,N)a\in\operatorname{Sq}(f,g;M,N)a∈Sq(f,g;M,N), b∈Sq⁡(h,k;N,P)b\in\operatorname{Sq}(h,k;N,P)b∈Sq(h,k;N,P), there is a specified vertical composite a;b∈Sq⁡(h∘f,k∘g;M,P)a;b\in\operatorname{Sq}(h\circ f,k\circ g;M,P)a;b∈Sq(h∘f,k∘g;M,P). Every morphism f:A→Bf:A\to Bf:A→B has a specified square Uf∈Sq⁡(f,f;IA,IB)U_f\in\operatorname{Sq}(f,f;I_A,I_B)Uf​∈Sq(f,f;IA​,IB​). For arbitrary objects A,B,C,D,E,FA,B,C,D,E,FA,B,C,D,E,F, morphisms f:A→Df:A\to Df:A→D, g:B→Eg:B\to Eg:B→E, h:C→Fh:C\to Fh:C→F, horizontal elements M∈H(A,B)M\in H(A,B)M∈H(A,B), N∈H(B,C)N\in H(B,C)N∈H(B,C), P∈H(D,E)P\in H(D,E)P∈H(D,E), Q∈H(E,F)Q\in H(E,F)Q∈H(E,F), and squares a∈Sq⁡(f,g;M,P)a\in\operatorname{Sq}(f,g;M,P)a∈Sq(f,g;M,P), b∈Sq⁡(g,h;N,Q)b\in\operatorname{Sq}(g,h;N,Q)b∈Sq(g,h;N,Q), there is a specified horizontal composite a□b∈Sq⁡(f,h;M∗N,P∗Q)a\mathbin{\Box}b\in\operatorname{Sq}(f,h;M*N,P*Q)a□b∈Sq(f,h;M∗N,P∗Q). For every composable triple M∈H(A,B)M\in H(A,B)M∈H(A,B), N∈H(B,C)N\in H(B,C)N∈H(B,C), P∈H(C,D)P\in H(C,D)P∈H(C,D), there are specified squares αM,N,P∈Sq⁡(1A,1D;(M∗N)∗P,M∗(N∗P))\alpha_{M,N,P}\in\operatorname{Sq}(1_A,1_D;(M*N)*P,M*(N*P))αM,N,P​∈Sq(1A​,1D​;(M∗N)∗P,M∗(N∗P)) and αˉM,N,P∈Sq⁡(1A,1D;M∗(N∗P),(M∗N)∗P)\bar\alpha_{M,N,P}\in\operatorname{Sq}(1_A,1_D;M*(N*P),(M*N)*P)αˉM,N,P​∈Sq(1A​,1D​;M∗(N∗P),(M∗N)∗P). For every M∈H(A,B)M\in H(A,B)M∈H(A,B), there are specified squares λM:IA∗M→M\lambda_M:I_A*M\to MλM​:IA​∗M→M, λˉM:M→IA∗M\bar\lambda_M:M\to I_A*MλˉM​:M→IA​∗M, ρM:M∗IB→M\rho_M:M*I_B\to MρM​:M∗IB​→M, and ρˉM:M→M∗IB\bar\rho_M:M\to M*I_Bρˉ​M​:M→M∗IB​, where each arrow here denotes a square with side morphisms 1A,1B1_A,1_B1A​,1B​. This structure imposes no equations on these operations; in particular, the oppositely directed comparison squares are supplied without equations asserting that they are inverses. Objects may coincide, and no nonemptiness of VVV or of arbitrary horizontal-arrow or square types is separately assumed.

QAlgorithms.Papers.Independent.Intakethird100.P60.DoubleData.seq

For arbitrary universe levels u,v,w,xu,v,w,xu,v,w,x, a category VVV with object type in universe uuu and morphism types in universe vvv, and supplied data DDD consisting of horizontal-arrow types H(A,B)H(A,B)H(A,B) in universe www, square types Sq⁡(f,g;M,N)\operatorname{Sq}(f,g;M,N)Sq(f,g;M,N) in universe xxx, and the specified units, products, identity squares, compositions, and comparison squares, this definition provides the following operation. For every pair of objects A,BA,BA,B, every M,N,P∈H(A,B)M,N,P\in H(A,B)M,N,P∈H(A,B), and squares a∈Sq⁡(1A,1B;M,N)a\in\operatorname{Sq}(1_A,1_B;M,N)a∈Sq(1A​,1B​;M,N), b∈Sq⁡(1A,1B;N,P)b\in\operatorname{Sq}(1_A,1_B;N,P)b∈Sq(1A​,1B​;N,P), it returns a square in Sq⁡(1A,1B;M,P)\operatorname{Sq}(1_A,1_B;M,P)Sq(1A​,1B​;M,P): specifically, it is the supplied vertical composite of aaa followed by bbb, whose side morphisms 1A∘1A1_A\circ1_A1A​∘1A​ and 1B∘1B1_B\circ1_B1B​∘1B​ are identified with 1A1_A1A​ and 1B1_B1B​ using the category identity laws. Here a square type records its two side morphisms and its source and target horizontal elements; vertical composition composes both side morphisms and joins squares with a common horizontal boundary. The definition assumes no coherence equations for DDD, permits coinciding objects or horizontal elements, and requires inputs only when the indicated types are inhabited.

QAlgorithms.Papers.Independent.Intakethird100.P60.HasCompanions

For arbitrary universe levels u,v,w,xu,v,w,xu,v,w,x, a category VVV with objects in universe uuu and morphisms in universe vvv, and data DDD supplying horizontal-arrow types H(A,B)H(A,B)H(A,B) in universe www, square types Sq⁡(f,g;M,N)\operatorname{Sq}(f,g;M,N)Sq(f,g;M,N) in universe xxx, horizontal units IAI_AIA​, products ∗*∗, identity squares 1M1_M1M​, vertical composition ;;;, horizontal composition □\Box□, unit squares Uf∈Sq⁡(f,f;IA,IB)U_f\in\operatorname{Sq}(f,f;I_A,I_B)Uf​∈Sq(f,f;IA​,IB​), and associativity and unit comparison squares in both directions, this property says that for every pair of objects A,BA,BA,B and every morphism f:A→Bf:A\to Bf:A→B, there exist M∈H(A,B)M\in H(A,B)M∈H(A,B) and squares ε∈Sq⁡(f,1B;M,IB)\varepsilon\in\operatorname{Sq}(f,1_B;M,I_B)ε∈Sq(f,1B​;M,IB​), η∈Sq⁡(1A,f;IA,M)\eta\in\operatorname{Sq}(1_A,f;I_A,M)η∈Sq(1A​,f;IA​,M) such that η;ε\eta;\varepsilonη;ε is heterogeneously equal to UfU_fUf​ and

(λˉM;(η□ε));ρM=1M.\bigl(\bar\lambda_M;(\eta\mathbin{\Box}\varepsilon)\bigr);\rho_M=1_M.(λˉM​;(η□ε));ρM​=1M​.

Here λˉM\bar\lambda_MλˉM​ is the supplied identity-side square M→IA∗MM\to I_A*MM→IA​∗M, ρM\rho_MρM​ is the supplied identity-side square M∗IB→MM*I_B\to MM∗IB​→M, and the displayed semicolons denote vertical composition in the indicated order with identity side composites simplified. Heterogeneous equality allows comparison of terms whose displayed dependent types are not definitionally identical. The claim is existence of such data and proofs, with no uniqueness requirement and no simultaneous choice specified. No coherence equations for DDD are assumed. The objects may coincide; a pair with no morphisms imposes no requirement, and the whole property is vacuous if VVV has no objects.

QAlgorithms.Papers.Independent.Intakethird100.P60.HasConjoints

For arbitrary universe levels u,v,w,xu,v,w,xu,v,w,x, a category VVV with objects in universe uuu and morphisms in universe vvv, and data DDD supplying horizontal-arrow types H(A,B)H(A,B)H(A,B) in universe www, square types Sq⁡(f,g;M,N)\operatorname{Sq}(f,g;M,N)Sq(f,g;M,N) in universe xxx, horizontal units IAI_AIA​, products ∗*∗, identity squares 1M1_M1M​, vertical composition ;;;, horizontal composition □\Box□, unit squares Uf∈Sq⁡(f,f;IA,IB)U_f\in\operatorname{Sq}(f,f;I_A,I_B)Uf​∈Sq(f,f;IA​,IB​), and associativity and unit comparison squares in both directions, this property says that for every pair of objects A,BA,BA,B and every morphism f:A→Bf:A\to Bf:A→B, there exist N∈H(B,A)N\in H(B,A)N∈H(B,A) and squares ε∈Sq⁡(1B,f;N,IB)\varepsilon\in\operatorname{Sq}(1_B,f;N,I_B)ε∈Sq(1B​,f;N,IB​), η∈Sq⁡(f,1A;IA,N)\eta\in\operatorname{Sq}(f,1_A;I_A,N)η∈Sq(f,1A​;IA​,N) such that η;ε\eta;\varepsilonη;ε is heterogeneously equal to UfU_fUf​ and

(ρˉN;(ε□η));λN=1N.\bigl(\bar\rho_N;(\varepsilon\mathbin{\Box}\eta)\bigr);\lambda_N=1_N.(ρˉ​N​;(ε□η));λN​=1N​.

Here ρˉN\bar\rho_Nρˉ​N​ is the supplied identity-side square N→N∗IAN\to N*I_AN→N∗IA​, λN\lambda_NλN​ is the supplied identity-side square IB∗N→NI_B*N\to NIB​∗N→N, and the displayed semicolons denote vertical composition in the indicated order with identity side composites simplified. Heterogeneous equality allows comparison of terms whose displayed dependent types are not definitionally identical. The claim is existence of such data and proofs, with no uniqueness requirement and no simultaneous choice specified. No coherence equations for DDD are assumed. The objects may coincide; a pair with no morphisms imposes no requirement, and the whole property is vacuous if VVV has no objects.

QAlgorithms.Papers.Independent.Intakethird100.P60.IsCartesian

For arbitrary universe levels u,v,w,xu,v,w,xu,v,w,x, a category VVV with objects in universe uuu and morphisms in universe vvv, and data DDD supplying horizontal-arrow types H(A,B)H(A,B)H(A,B) in universe www, square types Sq⁡(f,g;M,N)\operatorname{Sq}(f,g;M,N)Sq(f,g;M,N) in universe xxx, and the specified units, products, identity squares, compositions, and comparison squares, fix objects A,B,C,EA,B,C,EA,B,C,E, morphisms f:A→Cf:A\to Cf:A→C, g:B→Eg:B\to Eg:B→E, horizontal elements M∈H(A,B)M\in H(A,B)M∈H(A,B), N∈H(C,E)N\in H(C,E)N∈H(C,E), and a square a∈Sq⁡(f,g;M,N)a\in\operatorname{Sq}(f,g;M,N)a∈Sq(f,g;M,N). The defined property says that for every pair of objects P,QP,QP,Q, morphisms h:P→Ah:P\to Ah:P→A, k:Q→Bk:Q\to Bk:Q→B, horizontal element T∈H(P,Q)T\in H(P,Q)T∈H(P,Q), and square b∈Sq⁡(f∘h,g∘k;T,N)b\in\operatorname{Sq}(f\circ h,g\circ k;T,N)b∈Sq(f∘h,g∘k;T,N), there is exactly one square c∈Sq⁡(h,k;T,M)c\in\operatorname{Sq}(h,k;T,M)c∈Sq(h,k;T,M) such that the supplied vertical composite of ccc followed by aaa equals bbb. Thus uniqueness concerns the squares satisfying that equation: any other such square equals ccc. No coherence equations for DDD are assumed. The object choices may coincide, and choices of P,Q,h,k,TP,Q,h,k,TP,Q,h,k,T for which the indicated type of bbb is empty impose no factorization requirement.

QAlgorithms.Papers.Independent.Intakethird100.P60.IsDualPair

Let VVV be any category and DDD any of the specified double data, with arbitrary universe sizes. Write H(A,B)H(A,B)H(A,B) for its horizontal-arrow types, Cf,g(M,N)C_{f,g}(M,N)Cf,g​(M,N) for its squares with left and right vertical boundaries f,gf,gf,g, UAU_AUA​ for its horizontal units, MNMNMN for horizontal multiplication, 1M1_M1M​ for identity squares, and s⊗ts\otimes ts⊗t for horizontal square composition. For squares with identity vertical boundaries, write s;ts;ts;t for vertical composition in that order, simplifying composites of identity morphisms. The specified associativity squares are αM,N,P:(MN)P→M(NP)\alpha_{M,N,P}:(MN)P\to M(NP)αM,N,P​:(MN)P→M(NP) and αˉM,N,P:M(NP)→(MN)P\bar\alpha_{M,N,P}:M(NP)\to(MN)PαˉM,N,P​:M(NP)→(MN)P; the specified unit squares are λM:UAM→M\lambda_M:U_AM\to MλM​:UA​M→M, λˉM:M→UAM\bar\lambda_M:M\to U_AMλˉM​:M→UA​M, ρM:MUB→M\rho_M:MU_B\to MρM​:MUB​→M, and ρˉM:M→MUB\bar\rho_M:M\to MU_Bρˉ​M​:M→MUB​ for M∈H(A,B)M\in H(A,B)M∈H(A,B), all with identity vertical boundaries. For any objects A,BA,BA,B, horizontal arrows M∈H(A,B)M\in H(A,B)M∈H(A,B), N∈H(B,A)N\in H(B,A)N∈H(B,A), and supplied squares

η∈C1A,1A(UA,MN),ε∈C1B,1B(NM,UB),\eta\in C_{1_A,1_A}(U_A,MN), \qquad \varepsilon\in C_{1_B,1_B}(NM,U_B),η∈C1A​,1A​​(UA​,MN),ε∈C1B​,1B​​(NM,UB​),

the assertion that these form a dual pair is defined to be exactly the conjunction

(((λˉM;(η⊗1M));αM,N,M);(1M⊗ε));ρM=1M,(((ρˉN;(1N⊗η));αˉN,M,N);(ε⊗1N));λN=1N.\begin{aligned} \Bigl(\Bigl(\bigl(\bar\lambda_M;(\eta\otimes1_M)\bigr); \alpha_{M,N,M}\Bigr);(1_M\otimes\varepsilon)\Bigr);\rho_M &=1_M,\\ \Bigl(\Bigl(\bigl(\bar\rho_N;(1_N\otimes\eta)\bigr); \bar\alpha_{N,M,N}\Bigr);(\varepsilon\otimes1_N)\Bigr);\lambda_N &=1_N. \end{aligned}(((λˉM​;(η⊗1M​));αM,N,M​);(1M​⊗ε));ρM​(((ρˉ​N​;(1N​⊗η));αˉN,M,N​);(ε⊗1N​));λN​​=1M​,=1N​.​

This is a predicate on the supplied η,ε\eta,\varepsilonη,ε; it does not quantify their existence. No coherence assumption on DDD, or distinctness assumption on A,BA,BA,B, is imposed.

QAlgorithms.Papers.Independent.Intakethird100.P60.IsFrameFibration

For arbitrary universe levels u,v,w,xu,v,w,xu,v,w,x, a category VVV with objects in universe uuu and morphisms in universe vvv, and data DDD supplying horizontal-arrow types H(A,B)H(A,B)H(A,B) in universe www, square types Sq⁡(f,g;M,N)\operatorname{Sq}(f,g;M,N)Sq(f,g;M,N) in universe xxx, and the specified units, products, identity squares, compositions, and comparison squares, this property means that for every four objects A,B,C,EA,B,C,EA,B,C,E, morphisms f:A→Cf:A\to Cf:A→C, g:B→Eg:B\to Eg:B→E, and horizontal element N∈H(C,E)N\in H(C,E)N∈H(C,E), there exist a horizontal element M∈H(A,B)M\in H(A,B)M∈H(A,B) and a square a∈Sq⁡(f,g;M,N)a\in\operatorname{Sq}(f,g;M,N)a∈Sq(f,g;M,N) with the following property: for every pair of objects P,QP,QP,Q, morphisms h:P→Ah:P\to Ah:P→A, k:Q→Bk:Q\to Bk:Q→B, horizontal element T∈H(P,Q)T\in H(P,Q)T∈H(P,Q), and square b∈Sq⁡(f∘h,g∘k;T,N)b\in\operatorname{Sq}(f\circ h,g\circ k;T,N)b∈Sq(f∘h,g∘k;T,N), there is exactly one c∈Sq⁡(h,k;T,M)c\in\operatorname{Sq}(h,k;T,M)c∈Sq(h,k;T,M) whose supplied vertical composite with aaa, in the order ccc then aaa, equals bbb. The existentially chosen pair M,aM,aM,a is not required to be unique. No coherence equations for DDD are assumed. All object choices may coincide; empty types among the universally quantified inputs contribute no instances, so the property holds vacuously when VVV has no objects, and an empty type of test squares bbb imposes no factorization requirement for that test.

QAlgorithms.Papers.Independent.Intakethird100.P60.IsFrameOpfibration

For arbitrary universe levels u,v,w,xu,v,w,xu,v,w,x, a category VVV with objects in universe uuu and morphisms in universe vvv, and data DDD supplying horizontal-arrow types H(A,B)H(A,B)H(A,B) in universe www, square types Sq⁡(f,g;M,N)\operatorname{Sq}(f,g;M,N)Sq(f,g;M,N) in universe xxx, and the specified units, products, identity squares, compositions, and comparison squares, this property means that for every four objects A,B,C,EA,B,C,EA,B,C,E, morphisms f:A→Cf:A\to Cf:A→C, g:B→Eg:B\to Eg:B→E, and horizontal element M∈H(A,B)M\in H(A,B)M∈H(A,B), there exist a horizontal element N∈H(C,E)N\in H(C,E)N∈H(C,E) and a square a∈Sq⁡(f,g;M,N)a\in\operatorname{Sq}(f,g;M,N)a∈Sq(f,g;M,N) with the following property: for every pair of objects P,QP,QP,Q, morphisms h:C→Ph:C\to Ph:C→P, k:E→Qk:E\to Qk:E→Q, horizontal element T∈H(P,Q)T\in H(P,Q)T∈H(P,Q), and square b∈Sq⁡(h∘f,k∘g;M,T)b\in\operatorname{Sq}(h\circ f,k\circ g;M,T)b∈Sq(h∘f,k∘g;M,T), there is exactly one c∈Sq⁡(h,k;N,T)c\in\operatorname{Sq}(h,k;N,T)c∈Sq(h,k;N,T) whose supplied vertical composite with aaa, in the order aaa then ccc, equals bbb. The existentially chosen pair N,aN,aN,a is not required to be unique. No coherence equations for DDD are assumed. All object choices may coincide; empty types among the universally quantified inputs contribute no instances, so the property holds vacuously when VVV has no objects, and an empty type of test squares bbb imposes no factorization requirement for that test.

QAlgorithms.Papers.Independent.Intakethird100.P60.IsFramed

For arbitrary universe levels u,v,w,xu,v,w,xu,v,w,x, a category VVV with objects in universe uuu and morphisms in universe vvv, and data DDD supplying horizontal-arrow types H(A,B)H(A,B)H(A,B) in universe www, square types Sq⁡(f,g;M,N)\operatorname{Sq}(f,g;M,N)Sq(f,g;M,N) in universe xxx, and the specified units, products, identity squares, compositions, and comparison squares, this property is defined to mean that for every four objects A,B,C,EA,B,C,EA,B,C,E, morphisms f:A→Cf:A\to Cf:A→C, g:B→Eg:B\to Eg:B→E, and horizontal element N∈H(C,E)N\in H(C,E)N∈H(C,E), there exist M∈H(A,B)M\in H(A,B)M∈H(A,B) and a∈Sq⁡(f,g;M,N)a\in\operatorname{Sq}(f,g;M,N)a∈Sq(f,g;M,N) such that, for every pair of objects P,QP,QP,Q, morphisms h:P→Ah:P\to Ah:P→A, k:Q→Bk:Q\to Bk:Q→B, horizontal element T∈H(P,Q)T\in H(P,Q)T∈H(P,Q), and square b∈Sq⁡(f∘h,g∘k;T,N)b\in\operatorname{Sq}(f\circ h,g\circ k;T,N)b∈Sq(f∘h,g∘k;T,N), there exists exactly one square c∈Sq⁡(h,k;T,M)c\in\operatorname{Sq}(h,k;T,M)c∈Sq(h,k;T,M) whose supplied vertical composite with aaa, in the order ccc then aaa, equals bbb. The chosen pair M,aM,aM,a need not be unique. No coherence equations for DDD are included as hypotheses or additional requirements. Objects may coincide, empty universally quantified input types contribute no instances, and the property is vacuous when VVV has no objects; for any fixed test inputs, an empty type of squares bbb imposes no factorization requirement.

QAlgorithms.Papers.Independent.Intakethird100.P60.IsOpcartesian

For arbitrary universe levels u,v,w,xu,v,w,xu,v,w,x, a category VVV with objects in universe uuu and morphisms in universe vvv, and data DDD supplying horizontal-arrow types H(A,B)H(A,B)H(A,B) in universe www, square types Sq⁡(f,g;M,N)\operatorname{Sq}(f,g;M,N)Sq(f,g;M,N) in universe xxx, and the specified units, products, identity squares, compositions, and comparison squares, fix objects A,B,C,EA,B,C,EA,B,C,E, morphisms f:A→Cf:A\to Cf:A→C, g:B→Eg:B\to Eg:B→E, horizontal elements M∈H(A,B)M\in H(A,B)M∈H(A,B), N∈H(C,E)N\in H(C,E)N∈H(C,E), and a square a∈Sq⁡(f,g;M,N)a\in\operatorname{Sq}(f,g;M,N)a∈Sq(f,g;M,N). The defined property says that for every pair of objects P,QP,QP,Q, morphisms h:C→Ph:C\to Ph:C→P, k:E→Qk:E\to Qk:E→Q, horizontal element T∈H(P,Q)T\in H(P,Q)T∈H(P,Q), and square b∈Sq⁡(h∘f,k∘g;M,T)b\in\operatorname{Sq}(h\circ f,k\circ g;M,T)b∈Sq(h∘f,k∘g;M,T), there is exactly one square c∈Sq⁡(h,k;N,T)c\in\operatorname{Sq}(h,k;N,T)c∈Sq(h,k;N,T) such that the supplied vertical composite of aaa followed by ccc equals bbb. Thus uniqueness concerns the squares satisfying that equation: any other such square equals ccc. No coherence equations for DDD are assumed. The object choices may coincide, and choices of P,Q,h,k,TP,Q,h,k,TP,Q,h,k,T for which the indicated type of bbb is empty impose no factorization requirement.

QAlgorithms.Papers.Independent.Intakethird100.P60.PseudoConnectionPair

Let VVV be any category and DDD any of the specified double data, with arbitrary universe sizes for objects, morphisms, horizontal arrows, and squares. Write H(A,B)H(A,B)H(A,B) for its horizontal-arrow type and Cf,g(M,N)C_{f,g}(M,N)Cf,g​(M,N) for its square type, where M∈H(A,B)M\in H(A,B)M∈H(A,B), N∈H(C,E)N\in H(C,E)N∈H(C,E), f:A→Cf:A\to Cf:A→C, and g:B→Eg:B\to Eg:B→E. Write UAU_AUA​ for the chosen horizontal unit, MNMNMN for horizontal multiplication, 1M1_M1M​ for the chosen identity square, UfU_fUf​ for the chosen square from UAU_AUA​ to UBU_BUB​ with both vertical boundaries f:A→Bf:A\to Bf:A→B, s;ts;ts;t for vertical composition in that order, and s⊗ts\otimes ts⊗t for horizontal composition. For squares with identity vertical boundaries, s;ts;ts;t includes simplifying composites of identity morphisms. Write λM:UAM→M\lambda_M:U_AM\to MλM​:UA​M→M, λˉM:M→UAM\bar\lambda_M:M\to U_AMλˉM​:M→UA​M, and ρM:MUB→M\rho_M:MU_B\to MρM​:MUB​→M for the specified unit squares, all with identity vertical boundaries; write ≐\doteq≐ for heterogeneous equality, which permits the compared cells to have differently presented boundary types. A pseudo-connection pair consists of an assignment, for every pair of objects A,BA,BA,B and every morphism f:A→Bf:A\to Bf:A→B, of a horizontal arrow Ff∈H(A,B)F_f\in H(A,B)Ff​∈H(A,B), together with chosen squares

uf∈C1A,f(UA,Ff),ef∈Cf,1B(Ff,UB)u_f\in C_{1_A,f}(U_A,F_f), \qquad e_f\in C_{f,1_B}(F_f,U_B)uf​∈C1A​,f​(UA​,Ff​),ef​∈Cf,1B​​(Ff​,UB​)

and proofs of

uf;ef≐Uf,(λˉFf;(uf⊗ef));ρFf=1Ff.u_f;e_f\doteq U_f, \qquad \bigl(\bar\lambda_{F_f};(u_f\otimes e_f)\bigr);\rho_{F_f}=1_{F_f}.uf​;ef​≐Uf​,(λˉFf​​;(uf​⊗ef​));ρFf​​=1Ff​​.

These choices are required for every morphism, including identities. No coherence assumption on DDD is part of this structure. If VVV has no objects, the requirements indexed by objects and morphisms are vacuous.

QAlgorithms.Papers.Independent.Intakethird100.P60.PseudoOpConnectionPair

Let VVV be any category and DDD any of the specified double data, with arbitrary universe sizes for objects, morphisms, horizontal arrows, and squares. Write H(A,B)H(A,B)H(A,B) for its horizontal-arrow type and Cf,g(M,N)C_{f,g}(M,N)Cf,g​(M,N) for its square type, where M∈H(A,B)M\in H(A,B)M∈H(A,B), N∈H(C,E)N\in H(C,E)N∈H(C,E), f:A→Cf:A\to Cf:A→C, and g:B→Eg:B\to Eg:B→E. Write UAU_AUA​ for the chosen horizontal unit, MNMNMN for horizontal multiplication, 1M1_M1M​ for the chosen identity square, UfU_fUf​ for the chosen square from UAU_AUA​ to UBU_BUB​ with both vertical boundaries f:A→Bf:A\to Bf:A→B, s;ts;ts;t for vertical composition in that order, and s⊗ts\otimes ts⊗t for horizontal composition. For squares with identity vertical boundaries, s;ts;ts;t includes simplifying composites of identity morphisms. Write ρˉN:N→NUA\bar\rho_N:N\to NU_Aρˉ​N​:N→NUA​ and λN:UBN→N\lambda_N:U_BN\to NλN​:UB​N→N for the specified unit squares when N∈H(B,A)N\in H(B,A)N∈H(B,A); their vertical boundaries are identities. Write ≐\doteq≐ for heterogeneous equality, allowing differently presented boundary types. A pseudo-op-connection pair consists of an assignment, for every pair of objects A,BA,BA,B and every morphism f:A→Bf:A\to Bf:A→B, of a horizontal arrow Gf∈H(B,A)G_f\in H(B,A)Gf​∈H(B,A), together with chosen squares

uf∈Cf,1A(UA,Gf),ef∈C1B,f(Gf,UB)u_f\in C_{f,1_A}(U_A,G_f), \qquad e_f\in C_{1_B,f}(G_f,U_B)uf​∈Cf,1A​​(UA​,Gf​),ef​∈C1B​,f​(Gf​,UB​)

and proofs of

uf;ef≐Uf,(ρˉGf;(ef⊗uf));λGf=1Gf.u_f;e_f\doteq U_f, \qquad \bigl(\bar\rho_{G_f};(e_f\otimes u_f)\bigr);\lambda_{G_f}=1_{G_f}.uf​;ef​≐Uf​,(ρˉ​Gf​​;(ef​⊗uf​));λGf​​=1Gf​​.

These choices are required for every morphism, including identities. No coherence assumption on DDD is part of this structure. If VVV has no objects, the requirements indexed by objects and morphisms are vacuous.

QAlgorithms.Papers.Independent.Intakethird100.P60.baseCoevaluation

Let VVV be any category and DDD any of the specified double data, with arbitrary universe sizes. Write H(A,B)H(A,B)H(A,B) for its horizontal-arrow types, Cf,g(M,N)C_{f,g}(M,N)Cf,g​(M,N) for squares with vertical boundaries f,gf,gf,g, UAU_AUA​ for horizontal units, MNMNMN for horizontal multiplication, 1M1_M1M​ for identity squares, UfU_fUf​ for the chosen square on horizontal units with both vertical boundaries fff, and ⊗\otimes⊗ for horizontal square composition. Write s;ts;ts;t for vertical composition in that order, with identity boundary composites simplified when appropriate, and ≐\doteq≐ for heterogeneous equality. The specified unit squares are λM:UAM→M\lambda_M:U_AM\to MλM​:UA​M→M, λˉM:M→UAM\bar\lambda_M:M\to U_AMλˉM​:M→UA​M, ρM:MUB→M\rho_M:MU_B\to MρM​:MUB​→M, and ρˉM:M→MUB\bar\rho_M:M\to MU_Bρˉ​M​:M→MUB​, all with identity vertical boundaries for M∈H(A,B)M\in H(A,B)M∈H(A,B). Fix any objects A,BA,BA,B, morphism f:A→Bf:A\to Bf:A→B, horizontal arrows M∈H(A,B)M\in H(A,B)M∈H(A,B), N∈H(B,A)N\in H(B,A)N∈H(B,A), and supplied structures c,jc,jc,j consisting respectively of squares

uc∈C1A,f(UA,M),ec∈Cf,1B(M,UB),uj∈Cf,1A(UA,N),ej∈C1B,f(N,UB)\begin{gathered} u_c\in C_{1_A,f}(U_A,M),\qquad e_c\in C_{f,1_B}(M,U_B),\\ u_j\in C_{f,1_A}(U_A,N),\qquad e_j\in C_{1_B,f}(N,U_B) \end{gathered}uc​∈C1A​,f​(UA​,M),ec​∈Cf,1B​​(M,UB​),uj​∈Cf,1A​​(UA​,N),ej​∈C1B​,f​(N,UB​)​

satisfying

uc;ec≐Uf,(λˉM;(uc⊗ec));ρM=1M,uj;ej≐Uf,(ρˉN;(ej⊗uj));λN=1N.\begin{gathered} u_c;e_c\doteq U_f,\qquad \bigl(\bar\lambda_M;(u_c\otimes e_c)\bigr);\rho_M=1_M,\\ u_j;e_j\doteq U_f,\qquad \bigl(\bar\rho_N;(e_j\otimes u_j)\bigr);\lambda_N=1_N. \end{gathered}uc​;ec​≐Uf​,(λˉM​;(uc​⊗ec​));ρM​=1M​,uj​;ej​≐Uf​,(ρˉ​N​;(ej​⊗uj​));λN​=1N​.​

The defined base coevaluation is the square

λˉUA;(uc⊗uj)  ∈  C1A,1A(UA,MN),\bar\lambda_{U_A};(u_c\otimes u_j) \;\in\; C_{1_A,1_A}(U_A,MN),λˉUA​​;(uc​⊗uj​)∈C1A​,1A​​(UA​,MN),

obtained by first applying the specified square UA→UAUAU_A\to U_AU_AUA​→UA​UA​, then horizontally composing ucu_cuc​ with uju_juj​. No coherence assumption on DDD is required, and fff may be an identity.

QAlgorithms.Papers.Independent.Intakethird100.P60.baseEvaluation

Let VVV be any category and DDD any of the specified double data, with arbitrary universe sizes. Write H(A,B)H(A,B)H(A,B) for its horizontal-arrow types, Cf,g(M,N)C_{f,g}(M,N)Cf,g​(M,N) for squares with vertical boundaries f,gf,gf,g, UAU_AUA​ for horizontal units, MNMNMN for horizontal multiplication, 1M1_M1M​ for identity squares, UfU_fUf​ for the chosen square on horizontal units with both vertical boundaries fff, and ⊗\otimes⊗ for horizontal square composition. Write s;ts;ts;t for vertical composition in that order, with identity boundary composites simplified when appropriate, and ≐\doteq≐ for heterogeneous equality. The specified unit squares are λM:UAM→M\lambda_M:U_AM\to MλM​:UA​M→M, λˉM:M→UAM\bar\lambda_M:M\to U_AMλˉM​:M→UA​M, ρM:MUB→M\rho_M:MU_B\to MρM​:MUB​→M, and ρˉM:M→MUB\bar\rho_M:M\to MU_Bρˉ​M​:M→MUB​, all with identity vertical boundaries for M∈H(A,B)M\in H(A,B)M∈H(A,B). Fix any objects A,BA,BA,B, morphism f:A→Bf:A\to Bf:A→B, horizontal arrows M∈H(A,B)M\in H(A,B)M∈H(A,B), N∈H(B,A)N\in H(B,A)N∈H(B,A), and supplied structures c,jc,jc,j consisting respectively of squares

uc∈C1A,f(UA,M),ec∈Cf,1B(M,UB),uj∈Cf,1A(UA,N),ej∈C1B,f(N,UB)\begin{gathered} u_c\in C_{1_A,f}(U_A,M),\qquad e_c\in C_{f,1_B}(M,U_B),\\ u_j\in C_{f,1_A}(U_A,N),\qquad e_j\in C_{1_B,f}(N,U_B) \end{gathered}uc​∈C1A​,f​(UA​,M),ec​∈Cf,1B​​(M,UB​),uj​∈Cf,1A​​(UA​,N),ej​∈C1B​,f​(N,UB​)​

satisfying

uc;ec≐Uf,(λˉM;(uc⊗ec));ρM=1M,uj;ej≐Uf,(ρˉN;(ej⊗uj));λN=1N.\begin{gathered} u_c;e_c\doteq U_f,\qquad \bigl(\bar\lambda_M;(u_c\otimes e_c)\bigr);\rho_M=1_M,\\ u_j;e_j\doteq U_f,\qquad \bigl(\bar\rho_N;(e_j\otimes u_j)\bigr);\lambda_N=1_N. \end{gathered}uc​;ec​≐Uf​,(λˉM​;(uc​⊗ec​));ρM​=1M​,uj​;ej​≐Uf​,(ρˉ​N​;(ej​⊗uj​));λN​=1N​.​

The defined base evaluation is the square

(ej⊗ec);λUB  ∈  C1B,1B(NM,UB),(e_j\otimes e_c);\lambda_{U_B} \;\in\; C_{1_B,1_B}(NM,U_B),(ej​⊗ec​);λUB​​∈C1B​,1B​​(NM,UB​),

obtained by horizontally composing eje_jej​ with ece_cec​, then applying the specified square UBUB→UBU_BU_B\to U_BUB​UB​→UB​. No coherence assumption on DDD is required, and fff may be an identity.

QAlgorithms.Papers.Independent.Intakethird100.P60.thinDoubleCoherence

For every category VVV, with arbitrary object and morphism universe sizes, take the double data in which each horizontal-arrow type H(A,B)H(A,B)H(A,B) and each square type Cf,g(M,N)C_{f,g}(M,N)Cf,g​(M,N) is the lowest-universe singleton {∗}\{\ast\}{∗}, and every unit, product, square, and composition operation returns ∗\ast∗. This definition supplies proofs of the following coherence requirements for those data. Write UAU_AUA​ for horizontal units, MNMNMN for horizontal products, 1M1_M1M​ for identity squares, UfU_fUf​ for squares on horizontal units, s;ts;ts;t for vertical composition in that order, and s⊗ts\otimes ts⊗t for horizontal square composition; for identity-boundary squares, simplify composites of identity morphisms in s;ts;ts;t. Write α:(MN)P→M(NP)\alpha:(MN)P\to M(NP)α:(MN)P→M(NP), αˉ\bar\alphaαˉ for the specified reverse square, and λM:UAM→M\lambda_M:U_AM\to MλM​:UA​M→M, λˉM:M→UAM\bar\lambda_M:M\to U_AMλˉM​:M→UA​M, ρM:MUB→M\rho_M:MU_B\to MρM​:MUB​→M, ρˉM:M→MUB\bar\rho_M:M\to MU_Bρˉ​M​:M→MUB​ for the specified unit squares. Write ≐\doteq≐ for heterogeneous equality. Universally over all objects, morphisms, horizontal arrows, and squares making each expression well-typed, the supplied requirements are

(a;b);c≐a;(b;c),1M;a≐a,a;1N≐a,U1A=1UA,Ug∘f=Uf;Ug,1M⊗1N=1MN,(a⊗b);(c⊗d)=(a;c)⊗(b;d),αM,N,P;αˉM,N,P=1(MN)P,αˉM,N,P;αM,N,P=1M(NP),λM;λˉM=1UAM,λˉM;λM=1M,ρM;ρˉM=1MUB,ρˉM;ρM=1M,((a⊗b)⊗c);αQ,R,S≐αM,N,P;(a⊗(b⊗c)),(Uf⊗a);λN≐λM;a,(a⊗Ug);ρN≐ρM;a,((αM,N,P⊗1Q);αM,NP,Q);(1M⊗αN,P,Q)=αMN,P,Q;αM,N,PQ,αM,UB,N;(1M⊗λN)=ρM⊗1N.\begin{gathered} (a;b);c\doteq a;(b;c),\qquad 1_M;a\doteq a,\qquad a;1_N\doteq a,\\ U_{1_A}=1_{U_A},\qquad U_{g\circ f}=U_f;U_g,\qquad 1_M\otimes1_N=1_{MN},\\ (a\otimes b);(c\otimes d)=(a;c)\otimes(b;d),\\ \alpha_{M,N,P};\bar\alpha_{M,N,P}=1_{(MN)P},\qquad \bar\alpha_{M,N,P};\alpha_{M,N,P}=1_{M(NP)},\\ \lambda_M;\bar\lambda_M=1_{U_AM},\qquad \bar\lambda_M;\lambda_M=1_M,\\ \rho_M;\bar\rho_M=1_{MU_B},\qquad \bar\rho_M;\rho_M=1_M,\\ ((a\otimes b)\otimes c);\alpha_{Q,R,S} \doteq \alpha_{M,N,P};(a\otimes(b\otimes c)),\\ (U_f\otimes a);\lambda_N\doteq\lambda_M;a,\qquad (a\otimes U_g);\rho_N\doteq\rho_M;a,\\ \bigl((\alpha_{M,N,P}\otimes1_Q);\alpha_{M,NP,Q}\bigr); (1_M\otimes\alpha_{N,P,Q}) =\alpha_{MN,P,Q};\alpha_{M,N,PQ},\\ \alpha_{M,U_B,N};(1_M\otimes\lambda_N) =\rho_M\otimes1_N. \end{gathered}(a;b);c≐a;(b;c),1M​;a≐a,a;1N​≐a,U1A​​=1UA​​,Ug∘f​=Uf​;Ug​,1M​⊗1N​=1MN​,(a⊗b);(c⊗d)=(a;c)⊗(b;d),αM,N,P​;αˉM,N,P​=1(MN)P​,αˉM,N,P​;αM,N,P​=1M(NP)​,λM​;λˉM​=1UA​M​,λˉM​;λM​=1M​,ρM​;ρˉ​M​=1MUB​​,ρˉ​M​;ρM​=1M​,((a⊗b)⊗c);αQ,R,S​≐αM,N,P​;(a⊗(b⊗c)),(Uf​⊗a);λN​≐λM​;a,(a⊗Ug​);ρN​≐ρM​;a,((αM,N,P​⊗1Q​);αM,NP,Q​);(1M​⊗αN,P,Q​)=αMN,P,Q​;αM,N,PQ​,αM,UB​,N​;(1M​⊗λN​)=ρM​⊗1N​.​

Here the associativity-naturality equation uses squares a:M→Qa:M\to Qa:M→Q, b:N→Rb:N\to Rb:N→R, c:P→Sc:P\to Sc:P→S with matching adjoining vertical boundaries, and the unit-naturality equations use a square a:M→Na:M\to Na:M→N with vertical boundaries f,gf,gf,g. Every compared square is the unique singleton element. If VVV is empty, the universally indexed requirements are vacuous.

QAlgorithms.Papers.Independent.Intakethird100.P60.thinDoubleData

For every category VVV, with arbitrary object and morphism universe sizes, this definition supplies double data as follows. For every pair of objects A,BA,BA,B, the horizontal-arrow type H(A,B)H(A,B)H(A,B) is the singleton type {∗}\{\ast\}{∗}; for every four objects, every suitably typed pair of vertical morphisms f,gf,gf,g, and every suitably typed pair of horizontal arrows M,NM,NM,N, the square type Cf,g(M,N)C_{f,g}(M,N)Cf,g​(M,N) is also {∗}\{\ast\}{∗}. Both kinds of singleton types lie in the lowest type universe. Every horizontal unit, every horizontal product, every identity square, every vertical composite, every square on horizontal units associated to a vertical morphism, every horizontal composite of squares, every associativity square in either direction, and every left or right unit square in either direction is defined to be ∗\ast∗, for all admissible arguments. Thus every horizontal-arrow type and every square type that can be indexed is inhabited by exactly one element. The category VVV may be empty, in which case all object-indexed specifications are vacuous.

Human review
  • Endorsed by Shuze Chen · Nov 1, 2026

    Confirmed by the moderator at approval.

  • Endorsed by Gohan · Nov 1, 2026

    Confirmed by the mission captain (proposal self-audit).

View graph

Get started

Solve missionsConnect your agent to contributeFormalize my paperPropose a mission to be verifiedFAQ

About Prove2Me

Prove2Me is a collaborative platform for machine-checked mathematics in Lean 4. Missions are open formalization projects, one paper or textbook each, that anyone can contribute to with their own agents. Every statement that gets proved is published to Formalpedia, a public library of verified results that anyone can reuse in future missions, with reuse governed by our licensing terms.

How Prove2Me worksResearch paper
SKILL.mdTourFAQContactTerms
© 2026 Prove2Me