Synthetic 1-Categories in Directed Type Theory

Abstract

The field of directed type theory seeks to design type theories capable of reasoning synthetically about (higher) categories, by generalizing the symmetric identity types of Martin-Löf Type Theory to asymmetric hom-types. We articulate the directed type theory of the category model, with appropriate modalities for keeping track of variances and a powerful directed-J rule capable of proving results about arbitrary terms of hom-types; we put this rule to use in making several constructions in synthetic 1-category theory. Because this theory is expressed entirely in terms of generalized algebraic theories, we know automatically that this directed type theory admits a syntax model and is the first step towards directed higher observational type theory.

1 Introduction

One exciting aspect of the emergent field of homotopy type theory (HoTT) [28] is the observation that types are $\infty$-groupoids [29]. Homotopy type theory can be understood as a synthetic theory of $\infty$-groupoids: all the higher structure is generated by the simple rules for manipulating identity types in Martin-Löf Type Theory [21, 22], permitting efficient reasoning with these complex structures.

Not long after homotopy type theory was established, the search for directed homotopy type theory—a synthetic theory of (higher) categories—began. In a directed type theory, the identity types of ordinary Martin-Löf Type Theory (which are provably symmetric in the theory, i.e. a witness $p\colon\mathsf{Id}(t,t^{\prime})$ can be turned into $p^{-1}\colon\mathsf{Id}(t^{\prime},t)$) are replaced by asymmetric hom-types. However, building a type theory to effectively work with these hom-types is beset by difficulties, in particular the need to carefully track the variances of terms. A common feature of many approaches to directed type theory (e.g. [20, 24, 23]) is to track these variances by adopting some kind of modal typing discipline. However, no consensus ever emerged for exactly how to do this. More recent approaches to directed type theory (such as the work of Riehl and Shulman [25]) avoid these issues by adopting a more indirect approach inspired by simplicial spaces, at the cost of a more elaborate, multi-layered theory.

A possible new approach to directed type theory seems to be on the horizon, drawing from the recent development of higher observational type theory [5, 4]. Higher observational type theory, or H.O.T.T., seeks to strike a balance between the properties of “Book HoTT” (as originally articulated in [28]) and cubical type theory [10], particularly with regards to the central axiom of HoTT, Voevodsky’s univalence axiom. In Book HoTT, identity types are defined inductively, which results in the univalence axiom being impossible to compute with—complicating a key attribute of HoTT, its amenability to computer formalization. Cubical type theory rectifies this situation by instead defining identity types in terms of a special interval type, and adding enough machinery to make univalence computable as a theorem rather than an axiom (though at the expense of Book HoTT’s intuitive simplicity). Higher observational type theory seeks to build homotopy type theory around observational identities, in particular turning univalence into a definition, preserving both the computational and intuitive character of homotopy type theory. H.O.T.T.’s definitional univalence suggests a clear directed analogue, making directed higher observational type theory an appealing prospect. Though H.O.T.T. remains to be fully worked out, it’s clear that second-order generalized algebraic theories (SOGATs) [27, 26, 7, 17] provide the appropriate setting for formulating this theory, as the language of SOGATs provide a higher-order abstract syntax ideal for handling formal languages with variable binders.

Ordinary (first-order) generalized algebraic theories (GATs) [8] have played a prominent role in the semantics of type theory: Dybjer’s categories with families (CwFs) [11] are a GAT articulating the basic mechanics of type theory, and provide a highly flexible and modular approach to interpreting type theories. Articulating the semantics of type theory as a GAT comes with numerous advantages: the universal algebraic features of GATs—such as homomorphisms, displayed models, products and coproducts of models, free and cofree models—are well-understood [18]. In particular, every GAT has an initial model, the syntax model, which can be constructed as a quotient inductive-inductive type [16]. Finally, GATs have the advantage of being (relatively) straightforward to formalize, as they make all the relevant operations and equations explicit. Anticipating SOGAT and higher observational treatments of directed type theory, we begin by articulating directed type theory as a generalized algebraic theory.

1.1 Related Work

The present work draws most closely from Hofmann and Streicher’s work on the groupoid model [15]; in particular, we develop a directed analogue of the groupoid model—the category model—and adapt the groupoid models main constructs (dependent types and identity types) to the directed setting. We also closely follow the kind of metatheoretic arguments made there, and develop a directed analogue of their universe extensionality, an early articulation of univalence. We also draw from the closely-related setoid model of [13, 2].

Among directed type theories, the present work draws some constructs from the theory of Licata and Harper [20], particularly their treatment of the opposite category construction as a modality on contexts and context extension, as well as their treatment of $\Pi$-types in the directed setting. Our directed J-rule for eliminating hom-types is similar to one of the eliminators given by North [23], though with the critical difference mentioned below. Our theory, like North’s, is “1-dimensional” in the sense of Licata-Harper in that we maintain judgmental equality as a symmetric notion, as opposed to “2-dimensional” theories [20, 24, 1] which introduce a theory of directed reductions. All these theories adopt a modal typing discipline for handling variances, as do we, unlike the theories of [25, 19, 31] and [30], which adopt approaches akin to simplicial and cubical type theories, respectively.

The commonality between the setoid, groupoid, preorder, and category model described in Section 2 is made much more general [18, 16], where it is shown that any GAT gives rise to a CwF of algebras, algebra morphisms, displayed algebras, and sections. The modal features of the present work are most likely instances of the modal type theory of [12].

1.2 Contribution and Organization

We articulate a directed type theory satisfying the following constraints.

1. It is presented as a generalized algebraic theory.

2. It is 1-dimensional in the sense of Licata-Harper: there are no ‘directed reductions’ introduced judgmentally.

3. It is deeply-polarized: there is a modal typing discipline to keep track of variances, which operates not just on types but on contexts, substitutions, and context extension.

4. The directed J-rule (directed path induction) permits reasoning about arbitrary terms of hom-types.

5. Hom-types can be iterated, expressing synthetic higher categorical structure (though in the present work we only consider 1-category theoretic structure).

To our knowledge, there is no existing type theory satisfying all these criteria.

Starting with Section 2, we adopt a semantics-driven approach by investigating a particular model, the category model and abstracting its key features into a series of abstract notions of model (Section 3). These notions are all GATs (indeed, CwFs with additional structure), and therefore each give rise to a syntax model. Our main notion is that of a Directed CwF (DCwF), a generalized algebraic theory of directed types with adequate polarity structure to properly track variances.

Achieving (4) while maintaining a modal typing discipline requires a novel approach. In the typing rules of existing directed type theories (including ours), the endpoint terms $t$ and $t^{\prime}$ of a hom-type $\mathsf{Hom}(t,t^{\prime})$ are assigned opposite variances: $t$ negative and $t^{\prime}$ positive. However, this poses a difficulty for typing the identity morphism $\mathsf{refl}_{t}\colon\mathsf{Hom}(t,t)$ since $t$ must assume both variances. North [23] solves this by restricting $t$ to be a term of a core type (interpreted semantically by groupoids), but the consequent J-rule only operates on hom-terms with a core endpoint, not arbitrary ones. Our solution instead uses groupoid contexts rather than groupoid types.

In Section 4, we show that this is a viable framework for conducting synthetic category theory. In this section, we adopt an informal style reminiscent of [28], showing how this theory can be operated and how the groupoid context can be carefully maintained by a simple syntactic rule. We use our directed J-rule to give several basic constructions in synthetic (1-)category theory.

Finally, we consider the directed universe of sets in the category model, which serves as the category of sets. The existence of a directed universe allows us to make the metatheoretic argument that the syntax of DCwFs cannot prove the symmetry of hom-types (i.e. this is a genuinely directed type theory) or the uniqueness of homs (analogous to Hofmann and Streicher’s proof that the groupoid model refutes the uniqueness of identity proofs). We conclude by sketching several possible routes for further study.

1.3 Metatheory and Notation

Throughout, we work in an informal type-theoretic metatheory, using pseudo-Agda notation to specify GATs, make category-theoretic constructions, and define terms in the syntax of Directed CwFs. We use the notations

$$(x\colon X)\to P(x)\qquad\text{and}\qquad(x\colon X)\times P(x)$$

for the dependent function and dependent sum types, respectively. When defining dependent functions, we’ll enclose arguments in curly brackets to indicate that they’re implicit. Any variables appearing free are also assumed to be implicitly universally quantified. We sometimes use underscores to indicate where the arguments to a function are written. When defining an instance $T$ of a construct given as a record type, we’ll often omit the names of specific components, referring to all of them as just $T$ (matching the category-theoretic convention of referring to both the object- and morphism-parts of a functor $F$ by just $F$).

We use $=$ to mean definitional or judgmental equality in our metatheory, whereas $\equiv$ means propositional equality (though there’s no reason they couldn’t coincide, i.e. in an extensional metatheory). We tacitly make use of appropriate extensionality principles (particularly function extensionality) for both notions of equality, and the uniqueness of identity proofs for $\equiv$. We write $\mathsf{Prop}$ for the type of h-propositions in our metatheory, i.e. those $P$ such that $p\equiv p^{\prime}$ for all $p,p^{\prime}\colon P$.

We assume basic familiarity with category theory. The set of objects of a category $\Gamma$ is denoted $\left|\Gamma\right|$, the set of $\Gamma$-morphisms from $\gamma_{0}$ to $\gamma_{1}$ is denoted $\Gamma\>[\gamma_{0},\gamma_{1}]$, and identities are written as $\mathsf{id}$. The discrete groupoid/category on a set $X$ is the category whose objects are elements of $X$ and whose morphisms from $x_{0}$ to $x_{1}$ are inhabitants of the identity type $x_{0}\equiv x_{1}$. The opposite category construction is understood to be definitionally involutive, i.e. $\left|\Gamma^{\mathrm{op}}\right|$ is defined to be $\left|\Gamma\right|$ and $\Gamma^{\mathrm{op}}\>[\gamma_{0},\gamma_{1}]$ is defined to be $\Gamma\>[\gamma_{1},\gamma_{0}]$, and thus

$$(\Gamma^{\mathrm{op}})^{\mathrm{op}}=\Gamma.$$

2 The Category Interpretation of Type Theory

As mentioned, generalized algebraic theories (GATs) are a desirable formalism for expressing models of type theory, particularly when modelling numerous extensions to a ‘basic’ type theory. When a theory is given as a GAT, all operations and equations are made clear and explicit, making it easier to compare and contrast similar theories. The theory of (originally defined by Dybjer [11]) present the fundamental operations of type theory—contexts, variables, terms, types, and substitutions—encoded as a GAT; upon this basic framework, an endless variety of different type theories can be studied.

⬇

record CwF : Set where

field

-- Category of contexts

Con : Set

Sub : Con → Con → Set

id : Sub Γ Γ

$\_\!\_$$\_\!\_$∘__ : Sub Δ Γ → Sub Θ Δ → Sub Θ Γ

-- The empty context (terminal object)

• : Con

! : (Γ : Con) → Sub Γ •

-- Presheaf of types

Ty : Con → Set

$\_\!\_$$\_\!\_$[$\_\!\_$$\_\!\_$] : Ty Γ → Sub Δ Γ → Ty Δ

-- Presheaf of terms

Tm : (Γ : Con) → Ty Γ → Set

$\_\!\_$$\_\!\_$[$\_\!\_$$\_\!\_$] : Tm(Γ,A) → (σ : Sub Δ Γ) → Tm(Δ, A[σ])

-- Context extension

$\_\!\_$$\_\!\_$▹__ : (Γ : Con) → Ty Γ → Con

⟨__,$\_\!\_$$\_\!\_$⟩ : (σ : Sub Δ Γ) × Tm(Δ, A[σ]) ≅ Sub Δ (Γ▹A) : (p∘__, v[$\_\!\_$$\_\!\_$])

Figure 1: Main components of a CwF

The main components of a CwF are given in Fig. 1: a category $\mathsf{Con}$ of contexts, whose morphisms are called substitutions; a presheaf $\mathsf{Ty}$ on $\mathsf{Con}$ and a dependent presheaf $\mathsf{Tm}$ over $\mathsf{Ty}$; and a context extension operation guaranteeing that $\mathsf{Tm}$ is locally representable (in the sense of [7]). The last line says that there is an isomorphism (natural in $\Delta$) between the type of pairs $(\sigma,t)$ with $\sigma\colon\mathsf{Sub}\;\Delta\;\Gamma$ and $t\colon\mathsf{Tm}(\Delta,A[\sigma])$ and the type of substitutions from $\Delta$ to $\Gamma\triangleright A$. The left-to-right direction of this isomorphism is denoted $\langle\_\!\_,\_\!\_\rangle$ and the opposite direction as $\mathsf{p}\circ\_\!\_,\mathsf{v}[\_\!\_]$, so

$$\tau\equiv\langle\mathsf{p}\circ\tau,\mathsf{v}[\tau]\rangle\qquad\text{and}\qquad\sigma\equiv\mathsf{p}\circ\langle\sigma,t\rangle\qquad\text{and}\qquad t\equiv\mathsf{v}[\langle\sigma,t\rangle]$$

for any $\sigma,t$ as above and $\tau\colon\mathsf{Sub}\;\Delta\;(\Gamma\triangleright A)$.

Two paradigm examples of CwFs are the setoid model of [13, 2] and the groupoid model of [15]. In the former, the contexts are setoids (i.e. sets equipped with equivalence relations), the types are families of setoids (functorially) indexed over their context setoid, and terms are given by the appropriate notion of section of their type (see the Coq formalization of [3] for a precise definition). The groupoid model is quite similar: contexts are groupoids, types are families of groupoids functorially indexed over their context groupoid, and terms are the appropriate notion of section. Indeed, we can view the groupoid model as generalizing the setoid model: a setoid can be viewed as a groupoid whose hom-sets are subsingletons (or propositions, in the terminology of [28]), sets with at most one element. In other words, the groupoid model is what results when the assumption of proof-irrelevance is dropped from the setoid model.

Both these models provide interpretations for numerous type formers, in particular the dependent types, identity types, and universes characteristic of Martin-Löf Type Theory [21, 22]. The difference in these models is reflected in the type theories they interpret: while both models permit arbitrary iteration of the identity type former (expressing identities between identities, and identities between identities between identities, and so on), these iterated identity types become trivial more quickly in the setoid model. More precisely, the setoid model validates the uniqueness of identity proofs principle, meaning that any two terms of an identity type, $p,q\colon\mathsf{Tm}(\Gamma,\mathsf{Id}(x,y))$ are themselves identical, $\mathsf{UIP}(p,q)\colon\mathsf{Tm}(\Gamma,\mathsf{Id}(p,q))$. The groupoid model famously violates this principle: in the type theory of the groupoid model, there are types (in particular, the universe of sets) which are not h-sets, i.e. they possess terms which are proved identical by multiple, distinct identity proofs.

This provides a roadmap for how we might develop a model of directed type theory. Since directed type theory can be described as “dependent type theory, but with asymmetric identity types”, this leads us to suspect that models of directed type theory will result if we simply drop the assumption of symmetry from the setoid and groupoid models. A setoid without symmetry is a preorder, and a groupoid without symmetry is a category. A close inspection of the definition of the groupoid model reveals that nothing in its interpretation of just the CwF structure requires symmetry (i.e. that morphisms are invertible), and thus we can define the preorder model of type theory and the category model of type theory. The category model is given by Fig. 2, minus the definition of context extension (which will be discussed more below). This is just a generalization of the groupoid model, obtained by dropping symmetry: contexts are categories (and substitutions are functors), types are families of categories, and terms are sections. We wont focus on the preorder model here, but leave it to future work to develop the directed analogue of setoid-model-specific considerations. Instead, we’ll highlight those features of the category model which are relevant for modelling directed type theory, before abstracting those features into the notion of a directed CwF in the next section.

⬇

Con = Cat

Sub Γ Δ = Cat\:[ Γ, Δ ]

• : Cat

• = 𝟙 -- the singleton category, with one object, *, and only the identity morphism

-- A : Ty Γ means A : Γ → Cat

record Ty (Γ : Con) : Set where

field

obj : |Γ| → Cat

map : Γ\:[ γ₀, γ₁ ] → Cat\:[ obj γ₀, obj γ₁ ]

fid : map (id_γ) ≡ id${}_{\textsf{obj}(\gamma)}$

fcomp : map (γ₁₂ ∘ γ₀₁) ≡ (map γ₁₂) ∘ (map γ₀₁)

record Tm (Γ : Con) (A : Ty Γ) : Set where

field

obj : (γ : |Γ|) → |A(γ)|

map : (γ₀₁ : Γ\:[ γ₀, γ₁ ]) → (A γ₁)\:[A γ₀₁ (obj γ₀), obj(γ₁)]

fid : map (id_γ) ≡ id${}_{\textsf{obj}(\gamma)}$

fcomp : map (γ₁₂ ∘ γ₀₁) ≡ (map γ₁₂) ∘ (A γ₁₂ (map γ₀₁))

Figure 2: The CwF structure of the category model, excluding context extension.

While the basic CwF structure of the groupoid model doesn’t require symmetry (i.e. that all morphisms are invertible), its interpretations of further type formers certainly do. After all, our hope is that by passing from the groupoid model to the category model, the symmetric identity types of the former will become asymmetric hom-types in the latter. Consider the semantics of the identity type former in the groupoid model. Here, and henceforth, we define a type (in this case $\mathsf{Id}(t,t^{\prime})$) by giving its object- and morphism-parts, which are denoted obj and map in Fig. 2, but here are both written as just $\mathsf{Id}(t,t^{\prime})$.

⬇

-- Taken from [15, Section 4.10]

Id : Tm(Γ, A) → Tm(Γ, A) → Ty Γ

(Id(t,t’)) γ = (A γ)\:[t γ, t’ γ] -- Discrete groupoid

(Id(t,t’)) (γ₀₁ : Γ[ γ₀ , γ₁ ]) : (A γ₀)\:[t γ₀, t’ γ₀] → (A γ₁)\:[t γ₁, t’ γ₁]

(Id(t,t’)) γ₀₁ x₀ = (t’ γ₀₁) ∘ (A γ₀₁ x₀) ∘ (t γ₀₁)⁻¹

Here, the fact that $A(\gamma_{1})$ is a groupoid is used in an essential way (we must take the inverse of $t^{\prime}(\gamma_{01})$), and hence this definition doesn’t work in the category model. But notice the following: the term $t$ is in the “negative” position (the domain) and the term $t^{\prime}$ is in the “positive” position. Fittingly, we only use the inverse of $t(\gamma_{01})$—never $t(\gamma_{01})$ itself—and only use $t^{\prime}(\gamma_{01})$ but not its inverse. This observation will provide the key to adapting this definition for the category model.

What is needed is for $t$ to be a contravariant term of type $A$, while keeping $t^{\prime}$ as covariant. This difference can be articulated in the category model, using a fundamental construct from category theory: opposite categories. A type $A\colon\mathsf{Ty}\;\Gamma$ in the category model consists of a family of categories $A(\gamma)$ for each object $\gamma\colon\left|\Gamma\right|$ and a functor $A(\gamma_{01})\colon\mathsf{Cat}\>[A(\gamma_{0}),A(\gamma_{1})]$ for each morphism $\gamma_{01}\colon\Gamma[\gamma_{0},\gamma_{1}]$. Given such a family of categories $A$, we can form a new family $A^{-}$, where $A^{-}(\gamma)$ is defined as the opposite category of $A(\gamma)$. This extends to the morphism part as well, because any functor $f\colon\mathsf{Cat}\>[C,D]$ can be viewed as a functor on their opposites, $f\colon\mathsf{Cat}\>[C^{\mathrm{op}},D^{\mathrm{op}}]$. Alternatively, we could view $A$ as a functor $\Gamma\to\mathsf{Cat}$, and define $A^{-}$ to be the composition of $A$ with the endofunctor $(\_\!\_)^{\mathrm{op}}\colon\mathsf{Cat}\to\mathsf{Cat}$. We can state generally that the category model validates the following rule:

$$A^{-}\colon\mathsf{Ty}\;\Gamma.A\colon\mathsf{Ty}\;\Gamma$$

If $t\colon\mathsf{Tm}(\Gamma,A^{-})$, this means that the object part of $t$ will still send objects $\gamma\colon\left|\Gamma\right|$ to objects of $A(\gamma)$, since $A(\gamma)$ and $A^{-}(\gamma)$ have the same objects. But observe the type of its morphism part:

$$t\colon(\gamma_{01}\colon\Gamma\>[\gamma_{0},\gamma_{1}])\to(A\;\gamma_{1})\>[t\;\gamma_{1},A\;\gamma_{01}\;(t\;\gamma_{0})].$$

This is precisely what we need to articulate the definition of hom-types in the category model: see Fig. 3. This definition is almost exactly the same as the semantics of $\mathsf{Id}$ in the groupoid model, but with $t$ changed to be a term of $A^{-}$, thus eliminating the need for the categories $A(\gamma_{i})$ to be groupoids. Here’s the hom-type formation, expressed as a rule:

$$\mathsf{Hom}(t,t^{\prime})\colon\mathsf{Ty}\;\Gamma.\lx@proof@logical@and t\colon\mathsf{Tm}(\Gamma,A^{-})t^{\prime}\colon\mathsf{Tm}(\Gamma,A)$$

The type annotation of $t$ as a “negative” term and the implicit annotation of $t^{\prime}$ as “positive” serve as a kind of modal typing discipline for keeping track of the variances of terms.

⬇

Hom : Tm(Γ, A⁻) → Tm(Γ, A) → Ty Γ

(Hom(t,t’)) γ = (A γ)\:[t γ, t’ γ] -- Discrete category

(Hom(t,t’)) (γ₀₁ : Γ[ γ₀ , γ₁ ]) : (A γ₀)\:[t γ₀, t’ γ₀] → (A γ₁)\:[t γ₁, t’ γ₁]

(Hom(t,t’)) γ₀₁ x₀ = (t’ γ₀₁) ∘ (A γ₀₁ x₀) ∘ (t γ₀₁)

Figure 3: Semantics of the $\mathsf{Hom}$-type former in the category model

For now, we just state the formation rule for hom-types; introducing and eliminating terms of hom-types will require more machinery. To see what kind of machinery, let’s instead consider dependent function types. Like with the formation of hom-types, $\Pi$-types involve positive and negative “variance”: a function is contravariant in its argument and covariant in its result. Therefore, as we might expect, the interpretation of $\Pi$-types in the groupoid model ([15, Section 4.6]) makes essential use of the invertability of morphisms in a groupoid. Again, it only comes into play when defining the morphism part of the interpretation: the object part (reproduced in Fig. 5) defines for each $\gamma\colon\left|\Gamma\right|$ an auxiliary type $B_{\gamma}$ in context $A(\gamma)$, and then specifies the category $\Pi(A,B)\;\gamma$ with terms $\theta\colon\mathsf{Tm}(A(\gamma),B_{\gamma})$ as objects. This works fine in the category model. However, defining the morphism part of $\Pi(A,B)$ requires a kind of negative variance deeper than the shallow contravariance of $A^{-}$: in the type $\mathsf{Hom}(t,t^{\prime})$ it was a term that occurred negatively ($t$), in the type $\Pi(A,B)$ it’s a type that occurs negatively.

To make sense of this, we must consider the opposite category operation, not just as acting on each $A(\gamma)$ in a family of categories over a context $\Gamma$, but as acting on the contexts themselves. In the category model, we have the following rules.

$$\Gamma^{-}\colon\mathsf{Con}\Gamma\colon\mathsf{Con}\qquad\sigma^{-}\colon\mathsf{Sub}\;\Delta^{-}\;\Gamma^{-}\sigma\colon\mathsf{Sub}\;\Delta\;\Gamma$$

That is, we can negate contexts and substitutions as well as types: $\Gamma^{-}$ is interpreted as $\Gamma^{\mathrm{op}}$, and this operation is (covariantly) lifted onto functors as before. Now consider the difference in the morphism parts of terms with these different kinds of variance.

⬇

-- t : Tm(Γ, A) where A : Ty Γ

t γ₀₁ : (A γ₁)\:[ A γ₀₁ (t γ₀), t γ₁ ]

-- t : Tm(Γ, A⁻) where A : Ty Γ

t γ₀₁ : (A γ₁)\:[ t γ₁, A γ₀₁ (t γ₀) ]

-- t : Tm(Γ⁻, A) where A : Ty Γ⁻

t γ₀₁ : (A γ₀)\:[ t γ₀, A γ₀₁ (t γ₁) ]

This is why we referred to this as “shallow” and “deep” negation: the difference between the first two is that we’ve flipped around each $A(\gamma)$, whereas in the third term, the dependence of $A$ on $\Gamma$ has itself been flipped around ($A$ is now contravariant, so $A\;\gamma_{01}$ takes objects of $A(\gamma_{1})$ to objects of $A(\gamma_{0})$). It is this latter kind of contravariance that describes $A$’s position in $\Pi(A,B)$.

We need another ingredient to state the $\Pi$-type formation rule: negative context extension. In the type $\Pi(A,B)$, $A$ appears negatively, i.e. we want $A$ to depend negatively on $\Gamma$, i.e. $A\colon\mathsf{Ty}(\Gamma^{-})$; but $B$ appears positively—we want $B$ to depend covariantly on $\Gamma$, plus a variable of type $A$. In the theory of CwFs, a type “depending on a variable” of another type is encoded by context extension. In the category model, we in fact have two context extension operations (see Fig. 4), corresponding to the two ways a type can depend on a context. The positive context extension operator, $\triangleright^{+}$, obeys the usual isomorphism discussed above. For the negative extension, the isomorphism becomes:

$$(\sigma\colon\mathsf{Sub}\;\Delta\;\Gamma)\times(\mathsf{Tm}(\Delta^{-},A[\sigma^{-}]^{-}))\cong\mathsf{Sub}\;\Delta\;(\Gamma\triangleright^{-}A)$$ (1)

for any $A\colon\mathsf{Ty}\;\Gamma^{-}$. We’ll write $\left\langle\_\!\_,_{-}\_\!\_\right\rangle$ for the left-to-right direction of this isomorphism, and write $\mathsf{p}_{-,A}\colon\mathsf{Sub}\;(\Gamma\triangleright^{-}A)\;\Gamma$ and $\mathsf{v}_{-,A}\colon\mathsf{Tm}((\Gamma\triangleright^{-}A)^{-},A[\mathsf{p}_{-,A}^{-}]^{-})$ for the data obtained from applying the right-to-left direction to the identity morphism on $\Gamma\triangleright^{-}A$. With this, we have everything needed to give the semantics of the $\Pi$-type former; this is done in Fig. 5. As expected for $\Pi$-types, we have an isomorphism between $\mathsf{Tm}(\Gamma,\Pi^{+}(A,B))$ and $\mathsf{Tm}(\Gamma\triangleright^{-}A,B)$, the application and lambda-abstraction rules. This is omitted here for reasons of space, but included in the appendix with accompanying calculations; see Fig. 13.

⬇

$\_\!\_$$\_\!\_$▹⁺__ : (Γ : Con) → Ty Γ → Con

∣Γ ▹⁺ A∣ = (γ : ∣Γ∣) × ∣A γ∣

(Γ ▹⁺ A)\:[ (γ₀, a₀) , (γ₁, a₁) ] = (γ₀₁ : Γ\:[ γ₀, γ₁ ]) × (A γ₁)\:[ A γ₀₁ a₀, a₁ ]

$\_\!\_$$\_\!\_$▹⁻__ : (Γ : Con) → Ty Γ⁻ → Con

∣Γ ▹⁻ A∣ = (γ : ∣Γ∣) × ∣A γ∣

(Γ ▹⁻ A)\:[ (γ₀, a₀) , (γ₁, a₁) ] = (γ₀₁ : Γ\:[ γ₀, γ₁ ]) × (A γ₁)\:[ a₀ , A γ₀₁ a₁ ]

Figure 4: Semantics of context extension in the category model

⬇

Π : (A : Ty Γ⁻) → Ty(Γ ▹⁻ A) → Ty Γ

|Π(A,B) γ| = Tm(A(γ), B_γ)

where

B_γ : Ty(A γ)

B_γ a = B(γ,a)

B_γ (x : (A γ)[ a , a’ ]) = B(id_γ,x)

record (Π(A,B) γ)[$\_\!\_$,$\_\!\_$] : (θ θ’ : Tm(A(γ), B_γ)) → Set where

component : (a : |A γ|) → (B(γ,a))\:[ θ a , θ’ a ]

naturality : (x : (A γ)\:[ a , a’ ]) → (θ’ x) ∘ B(γ,x)(component a) ≡ (component a’) ∘ (θ x)

Π(A,B) γ₀₁ : Tm(A(γ₀), B${}_{\gamma_{0}}$) → Tm(A(γ₁), B${}_{\gamma_{1}}$)

(Π(A,B) γ₀₁ θ₀) (a₁ : |A γ₁|) = B(γ₀₁, id${}_{\mathsf{A}\;\gamma_{01}\;a_{1}}$) (θ₀(A γ₀₁ a₁))

(Π(A,B) γ₀₁ θ₀) (x₁ : A γ₁\:[a₁ , a₁’]) = B(γ₀₁, id${}_{\mathsf{A}\;\gamma_{01}\;a_{1}^{\prime}}$) (θ₀(A γ₀₁ x₁))

Figure 5: Semantics of the $\Pi$-type former in the category model

Let’s now return to the key feature of directed type theory, hom-types. Above, we gave just the formation rule for hom-types, but said nothing of how to introduce or eliminate terms of this type. Stating the introduction rule, the term refl inhabiting $\mathsf{Hom}(t,t)$ for each term $t$ proves rather subtle. The difficulty stems from the mixed-variance problem mentioned in the introduction: since our formation rule demands the domain term $t$ be of type $A^{-}$ and the codomain term $t^{\prime}$ to be of type $A$, it’s not immediately clear how to make $\mathsf{Hom}(t,t)$ well-formed. There is, in general, no way to coerce terms of type $A$ into terms of type $A^{-}$ or vice versa, and we have no rule permitting us to use a term in both variances.

As mentioned in the introduction, the solution to this problem presented in [23] is to use core types. This solution consists of asserting a new type $A^{0}$ for each $A$, equipped with coercions $\mathsf{Tm}(\Gamma,A^{0})\to\mathsf{Tm}(\Gamma,A)$ and $\mathsf{Tm}(\Gamma,A^{0})\to\mathsf{Tm}(\Gamma,A^{-})$. Then, for a term $t\colon\mathsf{Tm}(\Gamma,A^{0})$, it makes sense to write $\mathsf{Hom}(t,t)$, as $t$ can be coerced to both the positive and negative modality, in order to fit the $\mathsf{Hom}$ formation rule. From there, a directed J-rule can be stated for eliminating hom terms. The issue with this solution is that it forces homs to have core endpoints: the directed J-rule can only be used to prove claims about homs anchored at a core term, and it’s not clear that proofs about arbitrary homs can be made. For the synthetic category-theoretic claims we study below, this will prove to be an unacceptable restriction.

A solution which avoids this shortcoming is revealed by considering hom-types in the empty context. In the empty context, a type $A$ is the same thing as a category, and a term of type $A$ is the same thing as an object of type $A$ (we silently coerce between $\mathbbm{1}\to X$ and $X$). So then there’s no difference between terms of type $A$ and terms of type $A^{-}$, since a category and its opposite have the same objects. Therefore, in the empty context, there is no mixed-variance problem, and we can state the introduction rule for $\mathsf{refl}_{t}$ simply by coercing $t$ to be positive and negative as needed.

This doesn’t extend to arbitrary contexts: as we saw above, terms $t\colon\mathsf{Tm}(\Gamma,A^{-})$ and $t^{\prime}\colon\mathsf{Tm}(\Gamma,A)$ have different morphism parts. But here’s the key observation: if $\Gamma$ is a groupoid, then we can still coerce between $A$ and $A^{-}$: given $t\colon\mathsf{Tm}(\Gamma,A^{-})$, we can obtain $-t\colon\mathsf{Tm}(\Gamma,A)$, and vice-versa. The definition is given in Fig. 6; there (and henceforth), we use $\Gamma\colon\mathsf{NeutCon}$ to indicate that $\Gamma$ is a groupoid, and therefore can invert $\Gamma$-morphisms as needed. So, rather than introduce a new type $A^{0}$ whose terms can be either positive or negative, we have instead have identified those contexts—neutral contexts—where terms of the familiar types $A$ and $A^{-}$ can be inter-converted. Given this, we can introduce refl:

$$\mathsf{refl}_{t}\colon\mathsf{Tm}(\Gamma,\mathsf{Hom}(t,-t)).\lx@proof@logical@and\Gamma\colon\mathsf{NeutCon}A\colon\mathsf{Ty}\;\Gamma t\colon\mathsf{Tm}(\Gamma,A^{-})$$

We only need to assert $\mathsf{refl}_{t}$ for $t$ of type $A^{-}$, because the analogous rule for $t^{\prime}$ of type $A$ can be derived: given $t^{\prime}\colon\mathsf{Tm}(\Gamma,A)$, we observe that $t^{\prime}=-(-t^{\prime})$, so $\mathsf{refl}_{-t^{\prime}}\colon\mathsf{Tm}(\Gamma,\mathsf{Hom}(-t^{\prime},t^{\prime}))$.

⬇

- : {Γ : NeutCon}{A : Ty Γ} → Tm(Γ,A) → Tm(Γ,A⁻)

-t’ γ = t’ γ

-t’ γ₀₁ = A γ₀₁ (t’(γ₀₁⁻¹))

- : {Γ : NeutCon}{A : Ty Γ} → Tm(Γ,A⁻) → Tm(Γ,A)

-t γ = t γ

-t γ₀₁ = A γ₀₁ (t(γ₀₁⁻¹))

Figure 6: Semantics of neutral-context coercion in the category model

Let’s conclude this section by giving an eliminator for our hom-type, known as the directed J-rule or directed path induction. Following [15, Section 4.10], we study directed path induction in the empty context first, which can then be extended to an arbitrary neutral context. Given $A\colon\mathsf{Ty}\bullet$ and $t\colon\mathsf{Tm}(\bullet,A^{-})$ and some $M\colon\mathsf{Ty}(\bullet\triangleright^{+}A\triangleright^{+}\mathsf{Hom}(t,\mathsf{v}))$, our goal is to be able to prove $M[t^{\prime},p]$ for arbitrary $t^{\prime}$ and $p$, just by supplying a term $m$ of $M[-t,\mathsf{refl}_{t}]$. Translated into the category model semantics: $A$ is a category, $t$ and $t^{\prime}$ are objects of $A$, $M$ is a functor from the coslice category $t/A$ into $\mathsf{Cat}$, $p$ is an $A$-morphism from $t$ to $t^{\prime}$, and $m$ is an object of the category $M(t,\mathsf{id}_{t})$. The key observation is that $p$ is then also a morphism in the coslice category from $(t,\mathsf{id})$ to $(t^{\prime},p)$.

Therefore,

$$M(p)\colon\mathsf{Cat}\>[M(t,\mathsf{id}_{t}),M(t^{\prime},p)]$$

and so the object part of this functor turns objects of $M(t,\mathsf{id}_{t})$ into objects of $M(t^{\prime},p)$, that is, it turns terms $m\colon\mathsf{Tm}(\bullet,M[-t,\mathsf{refl}])$ into terms

$$(\mathsf{J}_{t,M}\;m)\>[t^{\prime},p]\colon\mathsf{Tm}(\bullet,M[t^{\prime},p]).$$

And, since $M(\mathsf{id})$ is the identity functor, we have the $\beta$ law, saying that $\mathsf{J}_{t,M}\;m\>[-t,\mathsf{refl}_{t}]\equiv m$. The general law replaces $\bullet$ with an arbitrary neutral context:

$$\mathsf{J}_{t,M}\;m\;\colon\mathsf{Tm}(\Gamma\triangleright^{+}A\triangleright^{+}\mathsf{Hom}(t[\mathsf{p}_{A}],\mathsf{v}),M)\lx@proof@logical@and\begin{matrix}\Gamma\colon\mathsf{NeutCon}\\ t\colon\mathsf{Tm}(\Gamma,A^{-})\\ m\colon\mathsf{Tm}(\Gamma,M[-t,\mathsf{refl}_{t}])\end{matrix}\begin{matrix}A\colon\mathsf{Ty}\;\Gamma\\ M\colon\mathsf{Ty}(\Gamma\triangleright^{+}A\triangleright^{+}\mathsf{Hom}(t[\mathsf{p}_{A}],\mathsf{v}))\\ \ \end{matrix}$$ (2)

but the category model interpretation—see Fig. 7—essentially follows this same idea. If $M$ doesn’t need to depend on the term of type $\mathsf{Hom}(t,\mathsf{v})$, then we can instead use the simpler rule

$$\mathsf{J}_{t,M}\;m\;\colon\mathsf{Tm}(\Gamma\triangleright^{+}A\triangleright^{+}\mathsf{Hom}(t[\mathsf{p}_{A}],\mathsf{v}),M[\mathsf{p}_{\mathsf{Hom}(t[\mathsf{p}_{A}],\mathsf{v})}])\lx@proof@logical@and\begin{matrix}\Gamma\colon\mathsf{NeutCon}\\ t\colon\mathsf{Tm}(\Gamma,A^{-})\end{matrix}\begin{matrix}A\colon\mathsf{Ty}\;\Gamma\\ M\colon\mathsf{Ty}(\Gamma\triangleright^{+}A)\end{matrix}\begin{matrix}\\ m\colon\mathsf{Tm}(\Gamma,M[-t])\end{matrix}$$ (3)

Note that the dependence on $\mathsf{Hom}(t[\mathsf{p}_{A}],\mathsf{v})$ is preserved in the conclusion, even if $M$ ignores it. In Section 4 we put this rule to use in synthetic category theory constructions and proofs.

⬇

J : (t : Tm(Γ, A⁻)) → (M : Ty (Γ ▹⁺ A ▹⁺ Hom(t[p_A],v)))

→ Tm(Γ, M[-t,reflₜ]) → Tm(Γ ▹⁺ A ▹⁺ Hom(t[p_A],v), M)

(J${}_{\textsf{t,M}}$ m) : (γ : |Γ|) → (a : |A γ|) → (x : (A γ)\:[t γ , a]) → | M(γ, a, x) |

(J${}_{\textsf{t,M}}$ m) γ a x = M (id_γ, x, ρ) (m γ) -- ρ : x ∘ A id_γ id_tγ ∘ t id_γ ≡ x

(J${}_{\textsf{t,M}}$ m) : (γ₀₁ : Γ\:[γ₀,γ₁]) → (a₀₁ : Aγ₁\:[A γ₀₁ a₀, a₁]) → (φ₀₁ : a₀₁ ∘ (A γ₀₁ x₀) ∘ t(γ₀₁) ≡ x₁)

→ M(γ₁, a₁, x₁)[ M(γ₀₁,a₀₁,φ₀₁) ((J${}_{\textsf{t,M}}$ m) γ₀ a₀ x₀), ((J${}_{\textsf{t,M}}$ m) γ₁ a₁ x₁) ]

(J${}_{\textsf{t,M}}$ m) γ₀₁ a₀₁ ρ₀₁ = M (id${}_{\gamma_{1}}$, x₁, ρ₁) (m γ₀₁) -- ρ₁ : x₁ ∘ A id${}_{\gamma_{1}}$ id${}_{\mathsf{t}\gamma_{1}}$ ∘ t id${}_{\gamma_{1}}$ ≡ x₁

Jβ : (J${}_{\textsf{t,M}}$m)\:[-t,reflₜ] ≡ m

Figure 7: Semantics of directed path induction in the category model

3 Directed Categories with Families

The aim of the present work is not just to establish the category model as a suitable interpretation of directed type theory, but to abstract the category model to a general, abstract notion of ‘model’ of directed type theory. Specifically, we wish to present this model notion as a generalized algebraic theory, that is, as a CwF with further structure. We do so in several stages, progressively capturing more of the structure described in the previous section. In addition to making the complex and multifaceted notion of ‘directed CwF’ more digestible, this approach will also give us several intermediate notions, each of which is worthy of further study in its own right. First, we encapsulate the ‘negation’ structure.

Definition 3.1 (Polarized CwF).

A consists of a CwF $\mathcal{C}=(\mathsf{Con},\mathsf{Ty},\mathsf{Tm},\triangleright,\ldots)$ equipped with the following operations.

• An endofunctor $(\_\!\_)^{-}\colon\mathsf{Con}\to\mathsf{Con}$ such that $(\Gamma^{-})^{-}\equiv\Gamma$ and $(\sigma^{-})^{-}\equiv\sigma$ for all $\Gamma$ and $\sigma$

• A natural transformation $(\_\!\_)^{-}\colon\mathsf{Ty}\to\mathsf{Ty}$ such that $(A^{-})^{-}\equiv A$ for all $A$.

So a PCwF is just a CwF equipped with context-, substitution-, and type-negation involutions. The fact that the type-negation operation is a natural transformation just says that it is stable under substitution, i.e. $A[\sigma]^{-}\equiv A[\sigma^{-}]$. Now, notably absent from this definition is the negative context extension operation $\triangleright^{-}$; by this definition, a PCwF only has the positive one. This is because the negative operation is, in fact, definable: in the category model, the following equation holds for any $\Gamma$ and any $A\colon\mathsf{Ty}\;\Gamma$:

$$(\Gamma\triangleright^{+}A)^{-}=\Gamma^{-}\triangleright^{-}A^{-}.$$ (4)

Here we use the fact that $(\Gamma^{-})^{-}=\Gamma$, and hence $A\colon\mathsf{Ty}\;(\Gamma^{-})^{-}$, making the right-hand side well-formed. Consequently, we can turn this equation around to define negative context extension: for $A\colon\mathsf{Ty}(\Gamma^{-})$, let $\Gamma\triangleright^{-}A$ be $(\Gamma^{-}\triangleright^{+}A^{-})^{-}$. The isomorphism characterizing $\triangleright^{-}$ (Equation 1) can then be proved as a consequence of the one for $\triangleright^{+}$.

Also absent from Definition 3.1 is any mechanism connecting the context/substitution negation endofunctor to the type-negation operation. It’s unclear if this ought to be rectified, or if their connection is just a peculiarity of the category model. Not every CwF fits the same mold of “contexts are structures, types are families of structures”, so it’s not possible to require in general that the type-negation operation is just post-composition with the context-negation functor. There are suitably abstract ways of connecting the two—for instance, we can note that the category model is democratic in the sense of [9, Defn. 3] : there is an isomorphism $K$ between contexts $\Gamma$ and closed types; this isomorphism is compatible with both negation operations, in that $K(\Gamma^{-})=K(\Gamma)^{-}$. However, we don’t need need such strong assumptions for the results of Section 4, so we omit them from the general definition of PCwFs.

Of course, the category model and the preorder model are both examples of PCwFs, where the negation is the ‘opposite’ construction. But so are the groupoid and setoid models. Indeed, the groupoid model is a sub-PCwF of the category model: a groupoid $\Gamma$ is a category, and so it makes perfect sense to take the opposite category of $\Gamma$, obtaining $\Gamma^{-}$, which is also a groupoid. What makes the groupoid model a peculiar instance of a PCwF is that $\Gamma\cong\Gamma^{-}$ for every $\Gamma$, and $A(\gamma)\cong A^{-}(\gamma)$ for every $A$. It is what we’ll call a symmetric PCwF. The setoid model is also a symmetric PCwF, but strictly so: there, $\Gamma\equiv\Gamma^{-}$. The situation exemplified by the groupoid/category and setoid/preorder models—a symmetric sub-PCwF of another PCwF—is what we capture in our next notion.

Definition 3.2 (Neutral-Polarized CwF).

A $\mathcal{D}$ of a PCwF $\mathcal{C}$ consists of predicates $\mathsf{D}_{\mathsf{Con}}\colon\mathsf{Con}\to\mathsf{Prop}$ and $\mathsf{D}_{\mathsf{Ty}}\colon\{\Gamma\colon\mathsf{Con}\}\to\mathsf{Ty}\;\Gamma\to\mathsf{Prop}$ such that

• $\mathsf{D}_{\mathsf{Con}}\;\bullet$;

• if $\mathsf{D}_{\mathsf{Con}}(\Gamma)$, then $\mathsf{D}_{\mathsf{Con}}(\Gamma^{-})$;

• if $\mathsf{D}_{\mathsf{Ty}}(A)$, then $\mathsf{D}_{\mathsf{Ty}}(A^{-})$;

• if $A\colon\mathsf{Ty}\;\Gamma$ is such that $\mathsf{D}_{\mathsf{Ty}}(A)$, then $\mathsf{D}_{\mathsf{Ty}}(A[\sigma])$ for any $\sigma\colon\mathsf{Sub}\;\Delta\;\Gamma$; and

• if $\mathsf{D}_{\mathsf{Con}}(\Gamma)$ and $\mathsf{D}_{\mathsf{Ty}}(A)$, then $\mathsf{D}_{\mathsf{Con}}(\Gamma\triangleright A)$.

We indicate a sub-PCwF by $\mathcal{D}=(\mathsf{DCon},\mathsf{DTy})$ to indicate that $\mathsf{DCon}$ is the subcategory of $\mathsf{D}_{\mathsf{Con}}$-contexts, and $\mathsf{DTy}$ is the subpresheaf of $\mathsf{D}_{\mathsf{Ty}}$-types.

A consists of a PCwF $\mathcal{C}$ and a sub-PCwF $\mathcal{N}=(\mathsf{NeutCon},\mathsf{NeutTy})$ such that

• $\mathsf{NeutCon}$ is symmetric: every $\Gamma\colon\mathsf{NeutCon}$ comes equipped with an $e\colon\mathsf{Sub}\;\Gamma\;\Gamma^{-}$ such that $e^{-}\colon\mathsf{Sub}\;\Gamma^{-}\;\Gamma$ is an inverse of $e$; moreover, this isomorphism is natural in the sense that, for $\Delta,\Gamma\colon\mathsf{NeutCon}$ and $\sigma\colon\mathsf{Sub}\;\Delta\;\Gamma$, we have $\sigma\equiv e^{-}_{\Gamma}\circ\sigma^{-}\circ e_{\Delta}$;

• if either $\Gamma\colon\mathsf{NeutCon}$ and $A\colon\mathsf{Ty}\;\Gamma$ or $\Gamma\colon\mathsf{Con}$ and $A\colon\mathsf{NeutTy}\;\Gamma$, there are coercion operations $-\colon\mathsf{Tm}(\Gamma,A)\to\mathsf{Tm}(\Gamma,A^{-})$ and $-\colon\mathsf{Tm}(\Gamma,A^{-})\to\mathsf{Tm}(\Gamma,A)$ such that $-(-t)\equiv t$ for all $t$;

• for every $\Gamma\colon\mathsf{NeutCon}$ and $A\colon\mathsf{Ty}\Gamma^{-}$, there is an isomorphism

  $$(e\triangleright A)\colon\Gamma\triangleright^{+}A[e]\cong\Gamma\triangleright^{-}A$$

  such that

  • $\mathsf{p}_{-,A}\circ(e\triangleright A)\equiv\mathsf{p}_{A[e]}$

  • for every $\Delta,\Gamma\colon\mathsf{NeutCon}$, $\sigma\colon\mathsf{Sub}\;\Delta\;\Gamma$, $A\colon\mathsf{Ty}(\Gamma^{-})$ and every $a\colon\mathsf{Tm}(\Delta,A[e\circ\sigma])$,

    $$(e\triangleright A)\circ\left\langle\sigma,_{+}a\right\rangle\equiv\left\langle\sigma,_{-}-a[e^{-}]\right\rangle.$$

In the third bullet point, note that $A$ is not assumed to be in $\mathsf{NeutTy}\;\Gamma^{-}$; if it were, then $\Gamma^{-}\triangleright A\colon\mathsf{NeutCon}$ and then we could use the isomorphism $e$ for $\Gamma^{-}\triangleright A$ and the coercion operators to construct this. With $A$ being an arbitrary type, this is a genuine addition to the theory. The requirements of this point are somewhat ad-hoc: these were just the principles needed in Section 4 to be able to operate effectively with neutral contexts (and all are provable in the category model). Perhaps a more mature version of this theory will place more requirements on NPCwFs, but this is all the neutral-polar structure needed here.

Let us also note that a common feature in directed type theories (e.g. [24, 23]) is to include core types, i.e. an operation of the form $(\_\!\_)^{0}\colon\mathsf{Ty}\;\Gamma\to\mathsf{NeutTy}\;\Gamma$. In the category model, this is interpreted as applying the core groupoid construction to each category $A(\gamma)$, producing a family of groupoids indexed over $\Gamma$. We might as well have a deep version too, operating on contexts $(\_\!\_)^{0}\colon\mathsf{Con}\to\mathsf{NeutCon}$. We won’t need these features for the present work (and therefore don’t endeavor to axiomatize them), but, once again, it’s quite possible that it would be fruitful to add them in the future.

Recall that CwFs are not a single notion of model for a single type theory, but rather that CwFs encode the basic structural operations of type theory, upon which innumerable different type theories can be specified by defining the desired term- and type-formers. We have arrived at the same point in our development of a semantics for directed type theory: the notion of NPCwF consists solely of structural components, but nothing that actually allows for the construction of interesting types and terms. So let’s rectify this by giving the directed analogue of the standard core of undirected type theory: identity types, dependent types, and universes.

We start with the directed analogue of identity types, hom-types.

Definition 3.3 (Directed CwF).

A is a NPCwF equipped with the following structure:

• a type former

  $$\mathsf{Hom}\colon\{\Gamma\colon\mathsf{Con}\}\{A\colon\mathsf{Ty}\;\Gamma\}\to\mathsf{Tm}(\Gamma,A^{-})\to\mathsf{Tm}(\Gamma,A)\to\mathsf{Ty}\;\Gamma$$

  which is stable under substitution:

  $$\mathsf{Hom}(t,t^{\prime})[\sigma]\equiv\mathsf{Hom}(t[\sigma],t^{\prime}[\sigma]);$$

• in any $\Gamma\colon\mathsf{NeutCon}$, a term $\mathsf{refl}_{t}\colon\mathsf{Hom}(t,-t)$ for each term $t\colon\mathsf{Tm}(\Gamma,A^{-})$, also stable under substitution by $\sigma\colon\mathsf{Sub}\;\Delta\;\Gamma$ for $\Delta\colon\mathsf{NeutCon}$; and

• a term former $\mathsf{J}$ as given in Equation 2, also appropriately stable under substitution.

For any $\Gamma\colon\mathsf{Con}$ and $A\colon\mathsf{NeutTy}\;\Gamma$, write $\mathsf{Id}(t,t^{\prime})$ for $\mathsf{Hom}(t,t^{\prime})$.

The naming of $\mathsf{Hom}$ versus $\mathsf{Id}$ is suggestive: the types in a DCwF are supposed to function like synthetic categories (with $\mathsf{Hom}$ encoding their morphisms), and the neutral types are synthetic groupoids, whose homs are symmetric like an identity type. This point is best illustrated by the following claim.

Proposition 3.4.

Every DCwF has an operation

$$\mathsf{symm} \colon\{\Gamma\colon\mathsf{NeutCon}\}\{A\colon\mathsf{NeutTy}\}\{t\colon\mathsf{Tm}(\Gamma,A^{-})\}\{t^{\prime}\colon\mathsf{Tm}(\Gamma,A)\}$$

$$\to\mathsf{Tm}(\Gamma,\mathsf{Id}(t,t^{\prime}))\to\mathsf{Tm}(\Gamma,\mathsf{Id}(-t^{\prime},-t))$$

Proof 3.5.

By the following construction in the DCwF syntax:

⬇

symm : {Γ : NeutCon}{A : NeutTy Γ}{t : Tm(Γ, A⁻)}{t’ : Tm(Γ, A)}

→ Tm(Γ, Id(t, t’)) → Tm(Γ, Id(-t’, -t))

symm p = (J_t,S reflₜ)[ t’, p ]

where

S : Ty (Γ ▹ A)

S = Id(-v , -t)

This proof relies on the neutrality of $A$ in a very subtle, but critical way: in the definition of the type family $\mathsf{S}$, the variable term $\mathsf{v}\colon\mathsf{Tm}(\Gamma\triangleright A,A[\mathsf{p}_{A}])$ is negated, so that it is of type $A[\mathsf{p}_{A}]^{-}$ and therefore able to stand as the first argument to $\mathsf{Id}$. But this is only possible if $\Gamma\triangleright A\colon\mathsf{NeutCon}$ because term-negation is only defined in neutral contexts. This reasoning will prove important for the style of reasoning we employ in Section 4, so we isolate it as a principle.

Principle (Var Neg).

For $\Gamma\colon\mathsf{NeutCon}$, the variable term

$$\mathsf{v}\colon\mathsf{Tm}(\Gamma\triangleright^{+}A,A[\mathsf{p}_{A}])$$

can only be negated (i.e. forming $-\mathsf{v}$) if $A\colon\mathsf{NeutTy}\;\Gamma$ (and likewise for $\triangleright^{-}$).

In Section 5, we’ll argue that there’s no way to construct this symmetry term (for arbitrary DCwFs) if $A$ is not assumed to be neutral.

Before proceeding, it’s worth explaining what is “the DCwF syntax” mentioned in the proof above. This is where it becomes relevant that DCwFs are presented as generalized algebraic theories: as mentioned in the introduction, [16] proves that any GAT has an initial syntax model. Therefore, any construction done in the syntax model (such as the construction of $\mathsf{symm}$ above) can be interpreted into any DCwF. This is why a syntactic construction was adequate to prove a claim about all DCwFs in the foregoing proof. In the next section, our proofs will all be syntactic, and thereby apply to arbitrary DCwFs.

Let us make an important observation about the syntax of DCwFs. An important criterion for our theory is that hom-types can be iterated, that is, our syntax allows for the formation of homs between homs, and homs between homs between homs, and so on. The iteration of identity types is, after all, how homotopy type theory is able to serve as a synthetic language for higher groupoids; and since hom types are iterable in the DCwF syntax, it is a synthetic language for higher categories. However, a given model may be truncated, in that the higher structure may become trivial after a certain point. This is the case with the groupoid model: while its types do not all obey the uniqueness of identity proofs (UIP) principle and are therefore not mere h-sets, they do obey “UIP, one level up”: in the groupoid model, identity proofs of identity proofs are unique.

The same happens in the category model: in general, there may be terms $p\colon\mathsf{Tm}(\Gamma,\mathsf{Hom}(t,t^{\prime})^{-})$ and $q\colon\mathsf{Tm}(\Gamma,\mathsf{Hom}(t,t^{\prime}))$ but no term of type $\mathsf{Hom}(p,q)$. But if there is such a term, there is exactly one. So the (1-)category model, unsurprisingly, can only model 1-categories. But there’s another sense in which the category model structure trivializes “one level up”: all the hom-types are interpreted as discrete categories, which are necessarily groupoids. So, while $\mathsf{Hom}(t,t^{\prime})$ is still a synthetic category, it’s actually a synthetic setoid. This is appropriate for doing synthetic 1-category theory: it makes sense that the hom-types are trivial as categories: to do 1-category theoretic arguments, we wish to speak of identities between parallel morphisms, not further category-theoretic structure.

We encapsulate DCwFs like this into a definition for further study.

Definition 3.6.

A is a DCwF such that

• $\mathsf{Hom}(t,t^{\prime})$ is a neutral type for any terms $t,t^{\prime}$; and

• UIP holds for identities of hom-terms:

  $$\mathsf{UIP}^{1}\colon(\alpha\colon\mathsf{Tm}(\Gamma,\mathsf{Id}(p,q)^{-}))\to(\beta\colon\mathsf{Tm}(\Gamma,\mathsf{Id}(p,q)))\to\mathsf{Tm}(\Gamma,\mathsf{Id}(\alpha,\beta))$$

The numbering follows the well-known indexing of $(n,m)$-categories (see e.g. [6, Defn. 8]) to refer to $\infty$-categories where all parallel $k$-morphisms are equal when $k>n$ and all $k$-morphisms are invertible for $k>m$. We could define $(n,m)$-truncated DCwFs for arbitrary $n$ and $m$ (for instance, the preorder model would be $(0,1)$-truncated, the groupoid model $(1,0)$-truncated, etc.), but that would take us too far afield. For the present work, we will work with $(1,1)$-truncated DCwFs, and develop the theory of synthetic 1-category theory (i.e. synthetic $(1,1)$-category theory) in that language. The practical consequence of working in the syntax of $(1,1)$-truncated DCwFs is that we only have one “layer” of homs, and the type $\mathsf{Hom}(t,t^{\prime})$ itself is neutral, i.e. its homs are symmetric identity types.

To conclude this section, we state the $\Pi$-type former in PCwFs. This is just the appropriately-polarized analogue of [14, Defn. 3.15], and is approximately the same rule for $\Pi$-types in [20].

Definition 3.7.

A PCwF supports if it comes equipped with a type former

$$\Pi\colon(A\colon\mathsf{Ty}\;\Gamma^{-})\to\mathsf{Ty}(\Gamma\triangleright^{-}A)\to\mathsf{Ty}\;\Gamma$$

which is stable under substitution, along with a natural isomorphism

$${{{\sloppy\text{\leavevmode\lstinline{{\lst@@@set@language\lst@@@set@numbers\lst@@@set@frame\lst@@@set@rulecolor\lst@@@set@language\lst@@@set@frame{\@listingGroup{ltx_lst_identifier}{lam}}}}}}}\colon\mathsf{Tm}(\Gamma\triangleright^{-}A,B)\cong\mathsf{Tm}(\Gamma,\Pi(A,B))\colon{\sloppy\text{\leavevmode\lstinline{{\lst@@@set@language\lst@@@set@numbers\lst@@@set@frame\lst@@@set@rulecolor\lst@@@set@language\lst@@@set@frame{\@listingGroup{ltx_lst_identifier}{app}}}}}}}.$$

The $\beta$-law is that ${{{\sloppy\text{\leavevmode\lstinline{{\lst@@@set@language\lst@@@set@numbers\lst@@@set@frame\lst@@@set@rulecolor\lst@@@set@language\lst@@@set@frame{\@listingGroup{ltx_lst_identifier}{app}}}}}}}\circ{\sloppy\text{\leavevmode\lstinline{{\lst@@@set@language\lst@@@set@numbers\lst@@@set@frame\lst@@@set@rulecolor\lst@@@set@language\lst@@@set@frame{\@listingGroup{ltx_lst_identifier}{lam}}}}}}}\equiv\mathsf{id}$ and the $\eta$-law the other way around. The differences between polarized $\Pi$-types and the familiar $\Pi$-types of undirected type theory are pretty minimal when operating in neutral contexts: for instance, when instantiating to non-dependent functions $A\to B$, the application operator defined by $f\;\$\;t=(\mathsf{app}\;f)[\mathsf{id},_{-}t]$ has type

$$\_\!\_\$\_\!\_\colon\mathsf{Tm}(\Gamma,A\to B)\to\mathsf{Tm}(\Gamma^{-},A^{-})\to\mathsf{Tm}(\Gamma,B).$$

If $\Gamma\colon\mathsf{NeutCon}$, then we can take terms from $\mathsf{Tm}(\Gamma^{-},A)$, $\mathsf{Tm}(\Gamma,A[e])$ and $\mathsf{Tm}(\Gamma,A[e]^{-})$ and use the negation operator and the $e^{-}$ substitution to get into $\mathsf{Tm}(\Gamma^{-},A^{-})$ for the purposes of applying functions. In the next section, we push this bureaucracy into the background and proceed informally.

4 Synthetic Category Theory

In this section, we work in an arbitrary $(1,1)$-truncated DCwF with polarized $\Pi$-types by only working in the syntax. In the main body of the text, we’ll adopt an informal type theoretic style (inspired by [28]). We assume that we’re working in some neutral context $\Gamma$, though we don’t explicitly reference $\Gamma$. We’ll write $t\colon A$ to indicate $t\colon\mathsf{Tm}(\Gamma,A)$. In what follows, we’ll use the letters $p,q,r,s,t,u,v,w,f,g$ to name terms (of various types) in $\Gamma$, whereas the letters $x,y,z$ will be the names of variables obtained by extending $\Gamma$. We’ll have to be careful to abide by the variable negation rule:

Principle (Var Neg).

An expression $e$ can only be negated if all the variables occurring in it are of neutral types.

We suppress the distinction between $\Gamma$ and $\Gamma^{-}$, since we can substitute back and forth with $e$ behind the scenes, as needed. Negative context extension will just behave like positive extension by a negative type: recall that

$$\mathsf{v}_{-,A}\colon\mathsf{Tm}((\Gamma\triangleright^{-}A)^{-},A[\mathsf{p}_{-,A}^{-}]^{-})$$

i.e.

$$\mathsf{v}_{-,A}\colon\mathsf{Tm}(\Gamma^{-}\triangleright^{+}A^{-},A[\mathsf{p}_{A^{-}}]^{-})$$

so, if we’re suppressing the distinction between $\Gamma$ and $\Gamma^{-}$, then this is just a variable $x$ of $A^{-}$. Accordingly, we’ll apply functions like this:

$$f(t)\colon B(t)\lx@proof@logical@and f\colon\prod_{(x\colon A^{-})}B(x)t\colon A^{-}$$

and form them like this:

$$(\lambda(x\colon A^{-})\to e)\colon\prod_{x\colon A^{-}}B(x).x\colon A^{-}\vdash e\colon B(x)$$

Finally, here’s our principle of directed path induction:

Principle (Directed Path Induction).

For every $t\colon A^{-}$, if $M(x,y)$ is a type family depending on $x\colon A$ and $y\colon\mathsf{Hom}(t,x)$, then, for each

$$m\colon M(-t,\mathsf{refl}_{t}),$$

we get an

$$\mathsf{ind}_{M}(m,x,y)\colon M(x,y)$$

for all $x,y$.

So, for instance, the construction of symmetry above (the proof of Proposition 3.4) would be expressed informally as follows: given a neutral type $A$ and a term $t\colon A^{-}$, define a type family over $x\colon A,y\colon Id(t,x)$ by

$$S(x,y)=\mathsf{Id}(-x,-t)$$

We have not violated ( (Var Neg).) because $x\colon A$ and $A$ is neutral. We have a term of type $S(-t,\mathsf{refl}_{t})$, i.e. $\mathsf{Id}(t,-t)$, namely $\mathsf{refl}_{t}$. So therefore we get $S(x,y)$ for arbitrary $x,y$. If we have a particular $t^{\prime}\colon A$ and $p\colon\mathsf{Id}(t,t^{\prime})$, we can put

$$\mathsf{symm}\;p=\mathsf{ind}_{S}(\mathsf{refl}_{t},t^{\prime},p).$$

Again, we emphasize that it is ( (Var Neg).) which prevents this argument from working for non-neutral types, as desired. Below, we are more casual with our application of directed path induction (e.g. not defining the type family explicitly) in cases where ( (Var Neg).) is not a concern.

With that, we can proceed to the informal constructions. Along the way, the explicit constructions in the DCwF syntax are carried out in the accompanying figures.

4.1 Composition of Homs

Formal development: Fig. 8

As mentioned, a type $A$ in directed type theory is supposed to be a synthetic category. The terms $t:A$ represent objects, and the terms $p\colon\mathsf{Hom}(t,t^{\prime})$ represent morphisms. For this to truly be category theory, however, we must be able to compose morphisms. We’ll write composition in diagrammatic order: given $t,u\colon A^{-}$ and $v^{\prime}\colon A$, we should be able to compose $p\colon\mathsf{Hom}(t,-u)$ with $q\colon\mathsf{Hom}(u,v^{\prime})$ to get $p\cdot q\colon\mathsf{Hom}(t,v^{\prime})$. We do this by directed path induction on $q$, by putting

$$p\cdot\mathsf{refl}_{u}=p.$$

The $\mathsf{refl}$ terms serve as the identity morphisms of the category: by the above, we know that $p\cdot\mathsf{refl}_{u}\equiv p$, and thus $\mathsf{refl}_{p}\colon\mathsf{Id}(p\cdot\mathsf{refl}_{u},p)$. As for the other unit law, we must again use directed path induction: since

$$\mathsf{refl}_{u}\cdot\mathsf{refl}_{u}\equiv\mathsf{refl}_{u},$$

we have that $\mathsf{refl}_{\mathsf{refl}_{u}}\colon\mathsf{Id}(\mathsf{refl}_{u}\cdot\mathsf{refl}_{u},\mathsf{refl}_{u})$, and, by induction we get a term

$$\mathsf{r{-}unit}\;q=\mathsf{ind}(\mathsf{refl}_{\mathsf{refl}_{u}},v,q)\colon\mathsf{Id}(\mathsf{refl}_{u}\cdot q,q)$$

for each $q\colon\mathsf{Hom}(u,v^{\prime})$.

Finally, we get that the composition operation is associative. Given $t,u,v\colon A^{-}$ and $w^{\prime}\colon A$ as well as $p\colon\mathsf{Hom}(t,-u)$, $q\colon\mathsf{Hom}(u,-v)$, and $r\colon\mathsf{Hom}(v,w^{\prime})$, we construct

$$\mathsf{assoc}\;p\;q\;r\colon\mathsf{Id}(p\cdot(q\cdot r),(p\cdot q)\cdot r)$$

by directed path induction on $r$. If $r=\mathsf{refl}_{v}$, then $q\cdot r\equiv q$ and $(p\cdot q)\cdot r\equiv p\cdot q$. Thus, we have

$$\mathsf{refl}_{p\cdot q}\colon\mathsf{Id}(p\cdot(q\cdot\mathsf{refl}_{v}),(p\cdot q)\cdot\mathsf{refl}_{v})$$

and then the induction carries through, and we get $\mathsf{assoc}\;p\;q\;r$ as desired.

⬇

C : {t : Tm(Γ, A⁻)} → Ty (Γ ▹⁺ A ▹⁺ Hom(t’[p_A], v))

C = Hom(t[p_A],v_A)

$\_\!\_$$\_\!\_$·__ : {t t’ : Tm(Γ, A⁻)}{t” : Tm(Γ, A)} → Tm(Γ, Hom(t,-t’)) → Tm(Γ, Hom(t’,t”))

→ Tm(Γ, Hom(t,t”))

p · q = (J${}_{\textsf{t',C}}$ p)\:[t”,q]

r-unit : (q : Tm(Γ, Hom(t’,t”))) → Tm(Γ, Id(refl${}_{\mathsf{t}^{\prime}}$ · q, q))

r-unit q = (J${}_{\textsf{t',R}}$ refl_refl)[t”,q]

where

R : Ty (Γ ▹⁺ A ▹⁺ Hom(t’[p_A], v_A))

R = Id((J${}_{\textsf{t',C}}$ refl${}_{\mathsf{t^{\prime}}}$), v${}_{\mathsf{Hom}(t^{\prime}[\mathsf{p}_{\mathsf{A}}],\mathsf{v}_{A})}$)

l-unit : (p : Tm(Γ, Hom(t,-t’))) → Tm(Γ, Id(p · refl${}_{\mathsf{t}^{\prime}}$, p))

l-unit p = refl_p -- by Jβ, p Â$\cdot$ refl ≡ p

assoc : (p : Tm(Γ, Hom(t,-t’))) → (q : Tm(Γ, Hom(t’,-t”))) → (r : Tm(Γ, Hom(t”,t”’)))

→ Tm(Γ, Id(p · (q · r), (p · q) · r))

assoc p q r = (J${}_{\textsf{t',S}}$ refl_p⋅q)[t”’,r]

where

S : Ty (Γ ▹⁺ A ▹⁺ Hom(t[p_A], v_A))

S = Id((J${}_{\textsf{t,C}}$ (p · q)), v${}_{\mathsf{Hom}(t[\mathsf{p}_{\mathsf{A}}],\mathsf{v}_{A})}$)

Figure 8: Composition of Homs

4.2 Synthetic Functors

Formal development: Fig. 9, Fig. 10, Fig. 11, Fig. 12

If types $A,B$ are synthetic categories, it should come as no surprise that terms $f\colon A\to B$ are synthetic functors. The object part is given by the usual function application, but the variances are somewhat mixed: if $t\colon A^{-}$, then we can say $f(t)\colon B$. However, we can still apply $f$ to a term $t^{\prime}\colon A$, we just have to put a minus on $t^{\prime}$, i.e. $f(-t^{\prime})$.

Unlike usual (“analytic”) category theory, we don’t have to explicitly define the morphism part of a functor; any term of type $A\to B$ we can write down will come with a morphism part for free. To obtain this morphism part, again we use directed path induction: given an $f\colon A\to B$ and some $t\colon A^{-}$, we can define a $B$-morphism

$$\mathsf{map}\;f\;p\colon\mathsf{Hom}(-f(t),f(-t^{\prime}))$$

for every $t^{\prime}\colon A^{-}$ and $p\colon\mathsf{Hom}(t,t^{\prime})$ by putting

$$\mathsf{map}\;f\;\mathsf{refl}_{t}=\mathsf{refl}_{-f(t)}\quad\colon\mathsf{Hom}(-f(t),f(t)).$$

By definition, this operation preserves identities (sending $\mathsf{refl}$ to $\mathsf{refl}$), and respects composition: if we have $t,u\colon A^{-}$ and $p\colon\mathsf{Hom}(t,-u)$, then, since $\mathsf{map}\;f\;\mathsf{refl}_{u}\equiv\mathsf{refl}_{-f(u)}$ and $p\cdot\mathsf{refl}_{u}\equiv p$ and $(\mathsf{map}\;f\;p)\cdot\mathsf{refl}_{-f(u)}\equiv\mathsf{map}\;f\;p$, we have

$$\mathsf{refl}_{(\mathsf{map}\;f\;p)}\colon\mathsf{Id}(\mathsf{map}\;f\;(p\cdot\mathsf{refl}_{u}),(\mathsf{map}\;f\;p)\cdot(\mathsf{map}\;f\;\mathsf{refl}_{t})).$$

By induction, we get an identity between $\mathsf{map}\;f\;(p\cdot q)$ and $(\mathsf{map}\;f\;p)\cdot(\mathsf{map}\;f\;q)$ for arbitrary $q$.

Let us also note that functors are also composable: given $f\colon A\to B$ and $g\colon B\to C$, we get the usual

$$g\circ f=\lambda(x:A^{-})\to g(-f(x)).$$

Of course, we can prove $\mathsf{map}\;(g\circ f)\;p$ equal to $\mathsf{map}\;g\;(\mathsf{map}\;f\;p)$ by directed path induction, using the following observations:

$$\mathsf{map}\;f\;\mathsf{refl}_{t} \equiv\mathsf{refl}_{-f(t)}$$

$$\mathsf{map}\;g\;\mathsf{refl}_{-f(t)} \equiv\mathsf{refl}_{-g(-f(t))}$$

$$\mathsf{map}\;(g\circ f)\;\mathsf{refl}_{t} \equiv\mathsf{refl}_{-(g\circ f)(t)}.$$

⬇

$\_\!\_$$_ : {Γ : NeutCon}{A : Ty Γ⁻}{B : Ty Γ}

→ (Tm(Γ, A → B)) → Tm(Γ⁻,A⁻) → Tm(Γ,A)

f $ t = (app f)[ id ,₋ t ]

map : {Γ : NeutCon}{A : Ty Γ⁻}{B : Ty Γ}(f : Tm(Γ, A → B)){t : Tm(Γ⁻,A⁻)}{t’ : Tm(Γ⁻,A)}

→ (Tm(Γ⁻, Hom(t,t’))) → Tm(Γ, Hom( -(f $ t) , f $ (-t’)))

map f p = (J${}_{t[e],\textsf{MAP}}$ refl${}_{-(\mathsf{f}\;\$\;\mathsf{t})}$)[t’[e]]

where

MAP : Ty (Γ ▹ A[e])

MAP = Hom( (-(f $ t))[p_A[e]], (app f)[e ▹ A] )

Figure 9: Morphism part of Functors

$$\mathsf{Hom}(-(f\;\$\;t),-(-(f\;\$\;t)))$$

$$\equiv\mathsf{Hom}(-(f\;\$\;t),f\;\$\;t)$$

$$=\mathsf{Hom}(-(f\;\$\;t),(\mathsf{app}\;f)[\mathsf{id},_{-}t])$$

$$\equiv\mathsf{Hom}(-(f\;\$\;t),(\mathsf{app}\;f)[(e\triangleright A)\circ\left\langle\mathsf{id},_{+}-t[e]\right\rangle])$$ (*)

$$\equiv\mathsf{Hom}(-(f\;\$\;t),(\mathsf{app}\;f)[(e\triangleright A)][\mathsf{id},_{+}-t[e]])$$

$$\equiv\mathsf{Hom}(-(f\;\$\;t)[\mathsf{p}_{A[e]},(\mathsf{app}\;f)[(e\triangleright A)])[\mathsf{id},_{+}-t[e]]$$

$$=\mathsf{MAP}[\mathsf{id},_{+}-t[e]]$$

(*) $\left\langle\mathsf{id},_{-}t\right\rangle\equiv(e\triangleright A)\circ\left\langle\mathsf{id},_{+}-t[e]\right\rangle$ by Definition 3.2 since $\Gamma$ neutral.

Figure 10: Calculation that $\mathsf{refl}_{-(f\;\$\;t)}\colon\mathsf{MAP}[-t[e]]$ in Fig. 9

⬇

$\_\!\_$∘_ : {Γ : NeutCon}{A : Ty Γ⁻}{B C : Ty Γ} →

Tm(Γ, A → B) → Tm(Γ, B[e⁻] → C) → Tm(Γ, A → C)

g ∘ f = lam( (app g)[ e ▹ B[e⁻] ][ p_-,A ,₊ app f ] )

Figure 11: Composition of Functions

The diagram

commutes, since $p_{-,B[e^{-}]}\circ(e\triangleright B[e^{-}])\equiv\mathsf{p}_{B}$ by Definition 3.2 and $\mathsf{p}_{B}\circ\left\langle\mathsf{p}_{-,A},_{+}\mathsf{app}\;f\right\rangle\equiv\mathsf{p}_{-,A}$ by Fig. 1. Thus, since $\mathsf{app}\;g\colon\mathsf{Tm}(\Gamma\triangleright^{-}B[e^{-}],C[\mathsf{p}_{-,B[e^{-}]}])$,

$$(\mathsf{app}\;g)[e\triangleright B[e^{-}]][\mathsf{p}_{-,A},_{+}\mathsf{app}\;f]\colon\mathsf{Tm}(\Gamma\triangleright^{-}A,C[\mathsf{p}_{-,A}]).$$

Figure 12: Auxiliary calculations for Fig. 11

5 Further observations about the Category Model

As the previous section showed, the syntax of 1-truncated Directed CwFs provides a nice setting for some very basic constructions in synthetic category theory. However, further expansion of the DCwF syntax is needed to be able to capture the full range of constructions in category theory. In this section, we’ll observe some constructions that can be made (and some equivalences that hold) in the category model, which require further study to be internalized into the DCwF syntax.

Probably the most significant omission from the synthetic category theory of the previous section is natural transformations. There are some natural transformations expressible in the theory as written, because natural transformations are, as we might hope and expect, homs between functors. That is, the type $A\to B$ is a synthetic category: given $f\colon\mathsf{Tm}(\Gamma,(A\to B)^{-})$ and $g\colon\mathsf{Tm}(\Gamma,A\to B)$, we can form the type $\mathsf{Hom}(f,g)$. In the category model, these are interpreted as natural transformations from $f$ to $g$, but all dependent over the context $\Gamma$. Both $f$ and $g$ sends objects $\gamma\colon\left|\Gamma\right|$ to functors from $A(\gamma)$ to $B(\gamma)$; if $\alpha\colon\mathsf{Tm}(\Gamma,\mathsf{Hom}(f,g))$, then $\alpha$ sends $\gamma$ to a natural transformation $f(\gamma)\to g(\gamma)$. On morphisms $\gamma_{01}\colon\Gamma\>[\gamma_{0},\gamma_{1}]$, $\alpha(\gamma_{01})$ is a witness to the fact that

$$\leavevmode\hbox to141.93pt{\vbox to183.37pt{\pgfpicture\makeatletter\hbox{\hskip 71.2622pt\lower-91.68744pt\hbox to0.0pt{\pgfsys@beginscope\pgfsys@invoke{ }\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\pgfsys@setlinewidth{0.4pt}\pgfsys@invoke{ }\nullfont\hbox to0.0pt{\pgfsys@beginscope\pgfsys@invoke{ }{}{}{}{{}}\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{\offinterlineskip{}{}{{{}}{{}}{{}}{{}}{{}}}{{{}}}{{}{}{{ {}{}}}{ {}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{-16.2265pt}{-91.68744pt}\pgfsys@invoke{ }\hbox{\vbox{\halign{\pgf@matrix@init@row\pgf@matrix@step@column{\pgf@matrix@startcell#\pgf@matrix@endcell}&#\pgf@matrix@padding&&\pgf@matrix@step@column{\pgf@matrix@startcell#\pgf@matrix@endcell}&#\pgf@matrix@padding\cr\hfil\hskip 15.9331pt\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}}\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{ {}{}}}{ {}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{-11.62756pt}{0.0pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{${A(\gamma_{1})}$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}&\hskip 15.9331pt\hfil\cr\vskip 27.0pt\cr\hfil\hskip 15.9331pt\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}}\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{ {}{}}}{ {}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{-11.62756pt}{0.0pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{${A(\gamma_{0})}$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}&\hskip 15.9331pt\hfil\cr\vskip 27.0pt\cr\hfil\hskip 4.30554pt\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}}\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{ {}{}}}{ {}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{0.0pt}{0.0pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{$$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}&\hskip 4.30554pt\hfil\cr\vskip 27.0pt\cr\hfil\hskip 16.2265pt\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}}\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{ {}{}}}{ {}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{-11.92096pt}{0.0pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{${B(\gamma_{0})}$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}&\hskip 16.2265pt\hfil\cr\vskip 27.0pt\cr\hfil\hskip 12.3376pt\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}}\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{ {}{}}}{ {}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{-8.03206pt}{0.0pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{${B\gamma_{1}}$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}&\hskip 12.3376pt\hfil\cr}}}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}}{{{{}}}{{}}{{}}{{}}{{}}{{}}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} {}{}{ {}{}{}}{}{ {}{}{}}{}{ {}{}{}}{ {}{}{}}{{{{}}{{}}{{}}{{}}}{{{{}}{ {}{}}{}{}{{}{}}}} }{{{{}}{{}}{{}}{{}}{{}}}{{{{}}{ {}{}}{}{}{{}{}}}} }{{}{}}{{}} {}{}{}{{{}}{{}}{{}}} {{{}}{{}}{{}}} {}{{}}{}{{}}{}{{}}{}{}{}{}{}{}{}{{}}{}{}{}{}{{}}\hbox{\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{{}}{}{}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}}\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{{}}{}{}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} {{}}{}{{}}{}{{{{}}}{{{}}}} {{}}{{{}}{{}}}{}{{}}\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{{}}{}{}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} {{}}{{{}}{{}}}{}{{}}\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{{}}{}{}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} {{}}{}{{}}{}{{}}{{}}{{{{}}{{}}{{}}{{}}}{{{{}}{}{}{}}} }{{{{}}{{}}{{}}{{}}{{}}}{{{{}}{}{}{}}} }{{}{}}{{}} {}{}{}{{{}}{{}}{{}}} {{{}}{{}}{{}}} {}{{}}{}{{}}{}{{}}{}{}{}{}{}{}{}{{}}{}{{}}{}{}{}{}{}{{}}{}{}{}{}{{}}{}{{}}{}{}{}{}{}{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@setlinewidth{0.39998pt}\pgfsys@invoke{ }{}{}{}{}{{}}{}{}{{}}\pgfsys@moveto{-20.9105pt}{68.5101pt}\pgfsys@moveto{-20.9105pt}{68.5101pt}\pgfsys@curveto{-61.96706pt}{27.08606pt}{-61.6682pt}{-39.99164pt}{-20.52823pt}{-80.76665pt}\pgfsys@stroke\pgfsys@invoke{ }{{}{{}}{}{}{{}}{{{}}}}{{}{{}}{}{}{{}}{{{}}{{{}}{\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{0.71025}{-0.70395}{0.70395}{0.71025}{-20.3862pt}{-80.90741pt}\pgfsys@invoke{ }\pgfsys@invoke{ \lxSVG@closescope }\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}{{}}}}\hbox{\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{{}{}}}{{}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{-53.86029pt}{-6.40685pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{$$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}}\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{{}{}}}{{}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{-69.10944pt}{-8.15685pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{$\scriptstyle{f(\gamma_{1})}$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope{}{}{ {}{}{}}{}{ {}{}{}}{}{ {}{}{}}{ {}{}{}}{{{{}}{{}}{{}}{{}}}{{{{}}{ {}{}}{}{}{{}{}}}} }{{{{}}{{}}{{}}{{}}{{}}}{{{{}}{ {}{}}{}{}{{}{}}}} }{{}{}}{{}} {}{}{}{{{}}{{}}{{}}} {{{}}{{}}{{}}} {}{{}}{}{{}}{}{{}}{}{}{}{}{}{}{}{{}}{}{}{}{}{{}}\hbox{\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{{}}{}{}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}}\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{{}}{}{}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} {{}}{}{{}}{}{{{{}}}{{{}}}} {{}}{{{}}{{}}}{}{{}}\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{{}}{}{}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} {{}}{{{}}{{}}}{}{{}}\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{{}}{}{}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} {{}}{}{{}}{}{{}}{{}}{{{{}}{{}}{{}}{{}}}{{{{}}{}{}{}}} }{{{{}}{{}}{{}}{{}}{{}}}{{{{}}{}{}{}}} }{{}{}}{{}} {}{}{}{{{}}{{}}{{}}} {{{}}{{}}{{}}} {}{{}}{}{{}}{}{{}}{}{}{}{}{}{}{}{{}}{}{{}}{}{}{}{}{}{{}}{}{}{}{}{{}}{}{{}}{}{}{}{}{}{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@setlinewidth{0.39998pt}\pgfsys@invoke{ }{}{}{}{}{{}}{}{}{{}}\pgfsys@moveto{20.9105pt}{68.5101pt}\pgfsys@moveto{20.9105pt}{68.5101pt}\pgfsys@curveto{61.96706pt}{27.08606pt}{61.6682pt}{-39.99164pt}{20.52823pt}{-80.76665pt}\pgfsys@stroke\pgfsys@invoke{ }{{}{{}}{}{}{{}}{{{}}}}{{}{{}}{}{}{{}}{{{}}{{{}}{\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{-0.71025}{-0.70395}{0.70395}{-0.71025}{20.3862pt}{-80.90741pt}\pgfsys@invoke{ }\pgfsys@invoke{ \lxSVG@closescope }\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}{{}}}}\hbox{\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{ {}{}}}{ {}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{53.86029pt}{-6.40685pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{$$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}}\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{ {}{}}}{ {}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{53.86029pt}{-8.15685pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{$\scriptstyle{g(\gamma_{1})}$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope{}{ {}{}{}}{}{ {}{}{}} {{{{{}}{ {}{}}{}{}{{}{}}}}}{}{{{{{}}{ {}{}}{}{}{{}{}}}}}{{}}{}{}{}{}{}{{{}{}}}{}{{}}{}{}{}{{{}{}}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@setlinewidth{0.39998pt}\pgfsys@invoke{ }{}{}{}{}{{}}{}{}{{}}\pgfsys@moveto{0.0pt}{68.56387pt}\pgfsys@lineto{0.0pt}{42.36383pt}\pgfsys@stroke\pgfsys@invoke{ }{{}{{}}{}{}{{}}{{{}}}}{{}{{}}{}{}{{}}{{{}}{{{}}{\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{0.0}{-1.0}{1.0}{0.0}{0.0pt}{42.16385pt}\pgfsys@invoke{ }\pgfsys@invoke{ \lxSVG@closescope }\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}{{}}}}\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{ {}{}}}{ {}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{2.35277pt}{53.51387pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{$\scriptstyle{A(\gamma_{01})}$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope {}{}{ {}{}{}}{}{ {}{}{}}{ {}{}{}}{{{{}}{{}}{{}}{{}}}{{{{}}{ {}{}}{}{}{{}{}}}} }{{{{}}{{}}{{}}{{}}{{}}}{{{{}}{ {}{}}{}{}{{}{}}}} }{{}{}}{{}} {}{}{}{{{}}{{}}{{}}} {{{}}{{}}{{}}} {}{{}}{}{{}}{}{{}}{}{}{}{}{}{}{}{{}}{}{{}}{}{}{}{}{}{{}}{}{}{}{}{{}}{}{{}}{}{}{}{}{}{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@setlinewidth{0.39998pt}\pgfsys@invoke{ }{}{}{}{}{{}}{}{}{{}}\pgfsys@moveto{-4.12892pt}{24.24445pt}\pgfsys@curveto{-14.16908pt}{2.71338pt}{-14.16908pt}{-15.14392pt}{-4.29794pt}{-36.3125pt}\pgfsys@stroke\pgfsys@invoke{ }{{}{{}}{}{}{{}}{{{}}}}{{}{{}}{}{}{{}}{{{}}{{{}}{\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{0.42262}{-0.90631}{0.90631}{0.42262}{-4.21344pt}{-36.49374pt}\pgfsys@invoke{ }\pgfsys@invoke{ \lxSVG@closescope }\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}{{}}}}\hbox{\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{{}{}}}{{}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{-14.0118pt}{-6.21527pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{$$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}}\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{{}{}}}{{}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{-29.26094pt}{-7.96527pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{$\scriptstyle{f(\gamma_{0})}$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope{}{}{ {}{}{}}{}{ {}{}{}}{ {}{}{}}{{{{}}{{}}{{}}{{}}}{{{{}}{ {}{}}{}{}{{}{}}}} }{{{{}}{{}}{{}}{{}}{{}}}{{{{}}{ {}{}}{}{}{{}{}}}} }{{}{}}{{}} {}{}{}{{{}}{{}}{{}}} {{{}}{{}}{{}}} {}{{}}{}{{}}{}{{}}{}{}{}{}{}{}{}{{}}{}{{}}{}{}{}{}{}{{}}{}{}{}{}{{}}{}{{}}{}{}{}{}{}{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@setlinewidth{0.39998pt}\pgfsys@invoke{ }{}{}{}{}{{}}{}{}{{}}\pgfsys@moveto{4.12892pt}{24.24445pt}\pgfsys@curveto{14.16908pt}{2.71338pt}{14.16908pt}{-15.14392pt}{4.29794pt}{-36.3125pt}\pgfsys@stroke\pgfsys@invoke{ }{{}{{}}{}{}{{}}{{{}}}}{{}{{}}{}{}{{}}{{{}}{{{}}{\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{-0.42262}{-0.90631}{0.90631}{-0.42262}{4.21344pt}{-36.49374pt}\pgfsys@invoke{ }\pgfsys@invoke{ \lxSVG@closescope }\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}{{}}}}\hbox{\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{ {}{}}}{ {}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{14.0118pt}{-6.21527pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{$$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}}\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{ {}{}}}{ {}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{14.0118pt}{-7.96527pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{$\scriptstyle{g(\gamma_{0})}$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope{}{ {}{}{}}{}{ {}{}{}}{}{ {}{}{}} {{{{{}}{ {}{}}{}{}{{}{}}}}}{}{{{{{}}{ {}{}}{}{}{{}{}}}}}{{}}{}{}{}{}{}{{{}{}}}{}{}{{{}{}}}\hbox{\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{{}}{}{}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}}\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{{}}{}{}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} {{}}{}{{}}{}{{{{}}}{{{}}}}{{}}{{{}}{{}}}{}{{}}\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{{}}{}{}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} {{}}{{{}}{{}}}{}{{}}\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{{}}{}{}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} {{}}{}{{}}{}{{}} {}{}{}{}{{{}{}}}{}{{}}{}{}{}{{{}{}}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@setlinewidth{0.39998pt}\pgfsys@invoke{ }\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@setlinewidth{2.33746pt}\pgfsys@invoke{ }{}{{ {\pgfsys@beginscope {{}} \pgfsys@setlinewidth{0.39998pt}\pgfsys@setdash{}{0.0pt}\pgfsys@roundcap\pgfsys@roundjoin{} {}{}{} {}{}{} \pgfsys@moveto{-1.29811pt}{2.56715pt}\pgfsys@curveto{-0.66843pt}{1.21092pt}{1.02686pt}{0.04845pt}{1.99559pt}{0.0pt}\pgfsys@curveto{1.02686pt}{-0.04845pt}{-0.66843pt}{-1.21092pt}{-1.29811pt}{-2.56715pt}\pgfsys@stroke\pgfsys@endscope}} }{}{}{{}}{}{}{{}}\pgfsys@moveto{-47.55559pt}{3.62349pt}\pgfsys@lineto{-16.60812pt}{3.77234pt}\pgfsys@stroke\pgfsys@invoke{ }\pgfsys@beginscope\pgfsys@invoke{ }{\pgfsys@setlinewidth{1.5375pt}\pgfsys@invoke{ }\definecolor[named]{pgfstrokecolor}{rgb}{1,1,1}\pgfsys@color@gray@stroke{1}\pgfsys@invoke{ }\pgfsys@moveto{-47.55559pt}{3.62349pt}\pgfsys@lineto{-16.60812pt}{3.77234pt}\pgfsys@stroke\pgfsys@invoke{ }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope{{}{{}}{}{}{{}}{{{}}}}{{}{{}}{}{}{{}}{{{}}{{{}}{\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{0.99998}{0.0048}{-0.0048}{0.99998}{-16.60814pt}{3.77234pt}\pgfsys@invoke{ }\pgfsys@invoke{ \lxSVG@closescope }\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}{{}}}}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{ {}{}}}{ {}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{-42.60863pt}{7.79153pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{$\scriptstyle{f(\gamma_{01})}$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope{}{ {}{}{}}{}{ {}{}{}}{}{ {}{}{}} {{{{{}}{ {}{}}{}{}{{}{}}}}}{}{{{{{}}{ {}{}}{}{}{{}{}}}}}{{}}{}{}{}{}{}{{{}{}}}{}{}{{{}{}}}\hbox{\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{{}}{}{}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}}\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{{}}{}{}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} {{}}{}{{}}{}{{{{}}}{{{}}}}{{}}{{{}}{{}}}{}{{}}\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{{}}{}{}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} {{}}{{{}}{{}}}{}{{}}\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{{}}{}{}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} {{}}{}{{}}{}{{}} {}{}{}{}{{{}{}}}{}{{}}{}{}{}{{{}{}}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@setlinewidth{0.39998pt}\pgfsys@invoke{ }\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@setlinewidth{2.33746pt}\pgfsys@invoke{ }{}{}{}{}{{}}{}{}{{}}\pgfsys@moveto{14.31659pt}{-16.21677pt}\pgfsys@lineto{45.26405pt}{-16.36562pt}\pgfsys@stroke\pgfsys@invoke{ }\pgfsys@beginscope\pgfsys@invoke{ }{\pgfsys@setlinewidth{1.5375pt}\pgfsys@invoke{ }\definecolor[named]{pgfstrokecolor}{rgb}{1,1,1}\pgfsys@color@gray@stroke{1}\pgfsys@invoke{ }\pgfsys@moveto{14.31659pt}{-16.21677pt}\pgfsys@lineto{45.26405pt}{-16.36562pt}\pgfsys@stroke\pgfsys@invoke{ }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope{{}{{}}{}{}{{}}{{{}}}}{{}{{}}{}{}{{}}{{{}}{{{}}{\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{0.99998}{-0.0048}{0.0048}{0.99998}{45.26404pt}{-16.36562pt}\pgfsys@invoke{ }\pgfsys@invoke{ \lxSVG@closescope }\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}{{}}}}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{ {}{}}}{ {}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{25.55879pt}{-23.91365pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{$\scriptstyle{g(\gamma_{01})}$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope{}{ {}{}{}}{}{ {}{}{}} {{{{{}}{ {}{}}{}{}{{}{}}}}}{}{{{{{}}{ {}{}}{}{}{{}{}}}}}{{}}{}{}{}{}{}{{{}{}}}{}{{}}{}{}{}{{{}{}}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@setlinewidth{0.39998pt}\pgfsys@invoke{ }\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@setlinewidth{2.33746pt}\pgfsys@invoke{ }{}{}{}{}{{}}{}{}{{}}\pgfsys@moveto{-9.65903pt}{-6.21527pt}\pgfsys@lineto{7.46346pt}{-6.21527pt}\pgfsys@stroke\pgfsys@invoke{ }\pgfsys@beginscope\pgfsys@invoke{ }{\pgfsys@setlinewidth{1.5375pt}\pgfsys@invoke{ }\definecolor[named]{pgfstrokecolor}{rgb}{1,1,1}\pgfsys@color@gray@stroke{1}\pgfsys@invoke{ }\pgfsys@moveto{-9.65903pt}{-6.21527pt}\pgfsys@lineto{7.46346pt}{-6.21527pt}\pgfsys@stroke\pgfsys@invoke{ }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope{{}{{}}{}{}{{}}{{{}}}}{{}{{}}{}{}{{}}{{{}}{{{}}{\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{7.46346pt}{-6.21527pt}\pgfsys@invoke{ }\pgfsys@invoke{ \lxSVG@closescope }\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}{{}}}}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{ {}{}}}{ {}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{-7.77324pt}{-2.1125pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{$\scriptstyle{\alpha(\gamma_{0})}$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope{}{ {}{}{}}{}{ {}{}{}} {{{{{}}{ {}{}}{}{}{{}{}}}}}{}{{{{{}}{ {}{}}{}{}{{}{}}}}}{{}}{}{}{}{}{}{{{}{}}}{}{{}}{}{}{}{{{}{}}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@setlinewidth{0.39998pt}\pgfsys@invoke{ }{}{}{}{}{{}}{}{}{{}}\pgfsys@moveto{0.0pt}{-54.39441pt}\pgfsys@lineto{0.0pt}{-80.59445pt}\pgfsys@stroke\pgfsys@invoke{ }{{}{{}}{}{}{{}}{{{}}}}{{}{{}}{}{}{{}}{{{}}{{{}}{\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{0.0}{-1.0}{1.0}{0.0}{0.0pt}{-80.79443pt}\pgfsys@invoke{ }\pgfsys@invoke{ \lxSVG@closescope }\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}{{}}}}\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{ {}{}}}{ {}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{2.35277pt}{-69.44441pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{$\scriptstyle{B(\gamma_{01})}$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope{}{}{}\hss}\pgfsys@discardpath\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope\hss}}\lxSVG@closescope\endpgfpicture}}\qquad\equiv\qquad\leavevmode\hbox to112.16pt{\vbox to111.51pt{\pgfpicture\makeatletter\hbox{\hskip 56.37746pt\lower-55.75697pt\hbox to0.0pt{\pgfsys@beginscope\pgfsys@invoke{ }\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\pgfsys@setlinewidth{0.4pt}\pgfsys@invoke{ }\nullfont\hbox to0.0pt{\pgfsys@beginscope\pgfsys@invoke{ }{}{}{}{{}}\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{\offinterlineskip{}{}{{{}}{{}}{{}}}{{{}}}{{}{}{{ {}{}}}{ {}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{-13.72649pt}{-55.75697pt}\pgfsys@invoke{ }\hbox{\vbox{\halign{\pgf@matrix@init@row\pgf@matrix@step@column{\pgf@matrix@startcell#\pgf@matrix@endcell}&#\pgf@matrix@padding&&\pgf@matrix@step@column{\pgf@matrix@startcell#\pgf@matrix@endcell}&#\pgf@matrix@padding\cr\hfil\hskip 12.0442pt\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}}\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{ {}{}}}{ {}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{-7.73866pt}{0.0pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{${A\gamma_{1}}$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}&\hskip 12.0442pt\hfil\cr\vskip 18.00005pt\cr\hfil\hskip 4.30554pt\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}}\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{ {}{}}}{ {}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{0.0pt}{0.0pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{$$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}&\hskip 4.30554pt\hfil\cr\vskip 18.00005pt\cr\hfil\hskip 0.0pt\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}&\hskip 0.0pt\hfil\cr\vskip 18.00005pt\cr\hfil\hskip 0.0pt\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}&\hskip 0.0pt\hfil\cr\vskip 18.00005pt\cr\hfil\hskip 13.72649pt\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}}\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{ {}{}}}{ {}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{-9.42094pt}{0.0pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{${B\gamma_{1}.}$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}&\hskip 13.72649pt\hfil\cr}}}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}}{{{{}}}{{}}{{}}{{}}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} {}{}{ {}{}{}}{}{ {}{}{}}{}{ {}{}{}}{ {}{}{}}{{{{}}{{}}{{}}{{}}}{{{{}}{ {}{}}{}{}{{}{}}}} }{{{{}}{{}}{{}}{{}}{{}}}{{{{}}{ {}{}}{}{}{{}{}}}} }{{}{}}{{}} {}{}{}{{{}}{{}}{{}}} {{{}}{{}}{{}}} {}{{}}{}{{}}{}{{}}{}{}{}{}{}{}{}{{}}{}{}{}{}{{}}\hbox{\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{{}}{}{}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}}\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{{}}{}{}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} {{}}{}{{}}{}{{{{}}}{{{}}}} {{}}{{{}}{{}}}{}{{}}\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{{}}{}{}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} {{}}{{{}}{{}}}{}{{}}\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{{}}{}{}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} {{}}{}{{}}{}{{}}{{}}{{{{}}{{}}{{}}{{}}}{{{{}}{}{}{}}} }{{{{}}{{}}{{}}{{}}{{}}}{{{{}}{}{}{}}} }{{}{}}{{}} {}{}{}{{{}}{{}}{{}}} {{{}}{{}}{{}}} {}{{}}{}{{}}{}{{}}{}{}{}{}{}{}{}{{}}{}{{}}{}{}{}{}{}{{}}{}{}{}{}{{}}{}{{}}{}{}{}{}{}{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@setlinewidth{0.39998pt}\pgfsys@invoke{ }{}{}{}{}{{}}{}{}{{}}\pgfsys@moveto{-20.35672pt}{33.83879pt}\pgfsys@moveto{-20.35672pt}{33.83879pt}\pgfsys@curveto{-42.08832pt}{12.0461pt}{-42.03833pt}{-23.34923pt}{-20.52884pt}{-44.79842pt}\pgfsys@stroke\pgfsys@invoke{ }{{}{{}}{}{}{{}}{{{}}}}{{}{{}}{}{}{{}}{{{}}{{{}}{\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{0.7081}{-0.70612}{0.70612}{0.7081}{-20.38724pt}{-44.9396pt}\pgfsys@invoke{ }\pgfsys@invoke{ \lxSVG@closescope }\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}{{}}}}\hbox{\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{{}{}}}{{}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{-38.97554pt}{-5.64392pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{$$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}}\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{{}{}}}{{}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{-54.22469pt}{-7.39392pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{$\scriptstyle{f(\gamma_{1})}$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope{}{}{ {}{}{}}{}{ {}{}{}}{}{ {}{}{}}{ {}{}{}}{{{{}}{{}}{{}}{{}}}{{{{}}{ {}{}}{}{}{{}{}}}} }{{{{}}{{}}{{}}{{}}{{}}}{{{{}}{ {}{}}{}{}{{}{}}}} }{{}{}}{{}} {}{}{}{{{}}{{}}{{}}} {{{}}{{}}{{}}} {}{{}}{}{{}}{}{{}}{}{}{}{}{}{}{}{{}}{}{}{}{}{{}}\hbox{\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{{}}{}{}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}}\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{{}}{}{}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} {{}}{}{{}}{}{{{{}}}{{{}}}} {{}}{{{}}{{}}}{}{{}}\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{{}}{}{}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} {{}}{{{}}{{}}}{}{{}}\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{{}}{}{}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} {{}}{}{{}}{}{{}}{{}}{{{{}}{{}}{{}}{{}}}{{{{}}{}{}{}}} }{{{{}}{{}}{{}}{{}}{{}}}{{{{}}{}{}{}}} }{{}{}}{{}} {}{}{}{{{}}{{}}{{}}} {{{}}{{}}{{}}} {}{{}}{}{{}}{}{{}}{}{}{}{}{}{}{}{{}}{}{{}}{}{}{}{}{}{{}}{}{}{}{}{{}}{}{{}}{}{}{}{}{}{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@setlinewidth{0.39998pt}\pgfsys@invoke{ }{}{}{}{}{{}}{}{}{{}}\pgfsys@moveto{20.35672pt}{33.83879pt}\pgfsys@moveto{20.35672pt}{33.83879pt}\pgfsys@curveto{42.08832pt}{12.0461pt}{42.03833pt}{-23.34923pt}{20.52884pt}{-44.79842pt}\pgfsys@stroke\pgfsys@invoke{ }{{}{{}}{}{}{{}}{{{}}}}{{}{{}}{}{}{{}}{{{}}{{{}}{\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{-0.7081}{-0.70612}{0.70612}{-0.7081}{20.38724pt}{-44.9396pt}\pgfsys@invoke{ }\pgfsys@invoke{ \lxSVG@closescope }\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}{{}}}}\hbox{\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{ {}{}}}{ {}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{38.97554pt}{-5.64392pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{$$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}}\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{ {}{}}}{ {}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{38.97554pt}{-7.39392pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{$\scriptstyle{g(\gamma_{1})}$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope{}{ {}{}{}}{}{ {}{}{}} {{{{{}}{ {}{}}{}{}{{}{}}}}}{}{{{{{}}{ {}{}}{}{}{{}{}}}}}{{}}{}{}{}{}{}{{{}{}}}{}{{}}{}{}{}{{{}{}}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@setlinewidth{0.39998pt}\pgfsys@invoke{ }\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@setlinewidth{2.33746pt}\pgfsys@invoke{ }{}{}{}{}{{}}{}{}{{}}\pgfsys@moveto{-34.62277pt}{-5.64392pt}\pgfsys@lineto{32.4272pt}{-5.64392pt}\pgfsys@stroke\pgfsys@invoke{ }\pgfsys@beginscope\pgfsys@invoke{ }{\pgfsys@setlinewidth{1.5375pt}\pgfsys@invoke{ }\definecolor[named]{pgfstrokecolor}{rgb}{1,1,1}\pgfsys@color@gray@stroke{1}\pgfsys@invoke{ }\pgfsys@moveto{-34.62277pt}{-5.64392pt}\pgfsys@lineto{32.4272pt}{-5.64392pt}\pgfsys@stroke\pgfsys@invoke{ }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope{{}{{}}{}{}{{}}{{{}}}}{{}{{}}{}{}{{}}{{{}}{{{}}{\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{32.4272pt}{-5.64392pt}\pgfsys@invoke{ }\pgfsys@invoke{ \lxSVG@closescope }\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}{{}}}}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope\hbox{\hbox{{\pgfsys@beginscope\pgfsys@invoke{ }{{}{}{{ {}{}}}{ {}{}} {{}{{}}}{{}{}}{}{{}{}} { }{{{{}}\pgfsys@beginscope\pgfsys@invoke{ }\pgfsys@transformcm{1.0}{0.0}{0.0}{1.0}{-7.77324pt}{-1.54115pt}\pgfsys@invoke{ }\hbox{{\definecolor{pgfstrokecolor}{rgb}{0,0,0}\pgfsys@color@rgb@stroke{0}{0}{0}\pgfsys@invoke{ }\pgfsys@color@rgb@fill{0}{0}{0}\pgfsys@invoke{ }\hbox{$\scriptstyle{\alpha(\gamma_{1})}$} }}\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope}}} \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope \pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope{}{}{}\hss}\pgfsys@discardpath\pgfsys@invoke{\lxSVG@closescope }\pgfsys@endscope\hss}}\lxSVG@closescope\endpgfpicture}} {A(\gamma_{1})} {A(\gamma_{0})} {B(\gamma_{0})} {B\gamma_{1}} \scriptstyle{f(\gamma_{1})} \scriptstyle{g(\gamma_{1})} \scriptstyle{A(\gamma_{01})} \scriptstyle{f(\gamma_{0})} \scriptstyle{g(\gamma_{0})} \scriptstyle{f(\gamma_{01})} \scriptstyle{g(\gamma_{01})} \scriptstyle{\alpha(\gamma_{0})} \scriptstyle{B(\gamma_{01})} {A\gamma_{1}} {B\gamma_{1}.} \scriptstyle{f(\gamma_{1})} \scriptstyle{g(\gamma_{1})} \scriptstyle{\alpha(\gamma_{1})} {A(\gamma_{1})} {A(\gamma_{0})} {B(\gamma_{0})} {B\gamma_{1}} \scriptstyle{f(\gamma_{1})} \scriptstyle{g(\gamma_{1})} \scriptstyle{A(\gamma_{01})} \scriptstyle{f(\gamma_{0})} \scriptstyle{g(\gamma_{0})} \scriptstyle{f(\gamma_{01})} \scriptstyle{g(\gamma_{01})} \scriptstyle{\alpha(\gamma_{0})} \scriptstyle{B(\gamma_{01})} {A\gamma_{1}} {B\gamma_{1}.} \scriptstyle{f(\gamma_{1})} \scriptstyle{g(\gamma_{1})} \scriptstyle{\alpha(\gamma_{1})}$$

Presently, the only such natural transformations expressible in the DCwF syntax are identities (e.g $\mathsf{refl}_{f}\colon\mathsf{Tm}(\Gamma,\mathsf{Hom}(f,-f))$). There is not a way to work with the actual components of a natural transformation, or to define a natural transformation by its components. What we would like to be able to do is write terms of type

$$\prod_{x\colon A^{-}}\mathsf{Hom}(-f(x),g(x))$$

and then prove that they are automatically natural by directed path induction, since $\alpha_{t}\cdot\mathsf{map}\;g\;\mathsf{refl}_{t}\equiv\mathsf{map}\;f\;\mathsf{refl}_{t}\cdot\alpha_{t}$. The issue is that this type violates ( (Var Neg).): we’re not allowed to write $-f(x)$ for a variable $x$ without knowing that $A$ is neutral. If $A$ is neutral, then we’re only capturing natural transformations between functors whose domain is a groupoid, which is a significant restriction. Thus, we have two important open questions: how to make natural transformations definable component-wise in the syntax (ideally using $\Pi$-types), and how to express in the syntax that the type of such transformations is equivalent to the hom-type between the two functors.

Another important feature we add are universes. The category model comes equipped with several type universes, most significantly the universe of sets. More precisely, we can regard the category $\mathsf{Set}$ as a closed type in the category model. The operation $\mathsf{El}\colon\mathsf{Tm}(\bullet,\mathsf{Set})\to\mathsf{Ty}\;\bullet$ takes a set $X$ and views it as a discrete category. We can then define

$${{\sloppy\text{\leavevmode\lstinline{{\lst@@@set@language\lst@@@set@numbers\lst@@@set@frame\lst@@@set@rulecolor\lst@@@set@language\lst@@@set@frame{\@listingGroup{ltx_lst_identifier}{Hom}}-{\@listingGroup{ltx_lst_identifier}{to}}-{\@listingGroup{ltx_lst_identifier}{func}}}}}}}\colon\{X\colon\mathsf{Tm}(\bullet,\mathsf{Set}^{-})\}\{Y\colon\mathsf{Tm}(\bullet,\mathsf{Set})\}\to\mathsf{Tm}(\bullet,\mathsf{Hom}(X,Y))\to\mathsf{Tm}(\bullet,\mathsf{El}(X)\to\mathsf{El}(Y))$$

by directed path induction: ${{\sloppy\text{\leavevmode\lstinline{{\lst@@@set@language\lst@@@set@numbers\lst@@@set@frame\lst@@@set@rulecolor\lst@@@set@language\lst@@@set@frame{\@listingGroup{ltx_lst_identifier}{Hom}}-{\@listingGroup{ltx_lst_identifier}{to}}-{\@listingGroup{ltx_lst_identifier}{func}}}}}}}\;\mathsf{refl}_{X}$ should be the identity function $\mathsf{lam}\;\mathsf{v}\colon\mathsf{Tm}(\bullet,\mathsf{El}(X)\to\mathsf{El}(X))$. We can use this to state the following principle.

Principle (External Directed Univalence).

Hom-to-func is a bijection.

Really, Hom-to-func is the identity function, since terms of hom-types in the empty context are just the morphisms of the category, the morphisms of $\mathsf{Set}$ are functions, and a functor between discrete categories is just a function between their objects. Spelling out the category model semantics, we see that every function is sent to itself. Sufficiently internalized, this principle of Directed Univalence serves as the directed analogue of Hofmann and Streicher’s universe extensionality axiom [15, Section 5.4]. Further work is required to better develop the theory of isomorphisms in the synthetic category theory, and to compare this principle of directed univalence to existing ones (e.g. [19]).

Let us conclude by observing that the existence of a universe allows for metatheoretic reasoning as well, specifically negative proofs about what cannot be done in the syntax. We can view the directed universe $\mathsf{Set}$ as a source of nontrivial directedness: if we affirm Section 5, then $\mathsf{Set}$ cannot possibly be a neutral type. We show that, in DCwFs equipped with a directed univalent universe $\mathsf{Set}$, hom-types must be asymmetric in general. That is, we cannot construct a term $\mathsf{symm}$ like in Proposition 3.4 for non-neutral types in the syntax DCwF+$\mathsf{Set}$ (the initial model of the GAT of DCwFs with a universe $\mathsf{Set}$). We do so the same way Hofmann and Streicher [15] proved that ordinary Martin-Löf Type Theory couldn’t prove the Uniqueness of Identity Proofs: by countermodel. Hofmann and Streicher’s countermodel was the groupoid model, and, of course, ours is the category model.

Proposition 5.1.

There cannot be an operation

$$\mathsf{symm^{\prime}} \colon\{\Gamma\colon\mathsf{NeutCon}\}\{A\colon\mathsf{Ty}\}\{t\colon\mathsf{Tm}(\Gamma,A^{-})\}\{t^{\prime}\colon\mathsf{Tm}(\Gamma,A)\}$$

$$\to\mathsf{Tm}(\Gamma,\mathsf{Hom}(t,t^{\prime}))\to\mathsf{Tm}(\Gamma,\mathsf{Hom}(-t^{\prime},-t))$$

definable in the syntax of DCwFs+$\mathsf{Set}$.

Proof 5.2.

If the syntax model of DCwF+$\mathsf{Set}$ had such an operation $\mathsf{symm^{\prime}}$, then, by initiality, so too would every DCwF with $\mathsf{Set}$, in particular the category model. But then for any $X\colon\mathsf{Tm}(\bullet,\mathsf{Set}^{-})$ and $Y\colon\mathsf{Tm}(\bullet,\mathsf{Set})$ and $f\colon\mathsf{Tm}(\bullet,\mathsf{Hom}(X,Y))$, we would obtain $\mathsf{symm^{\prime}}\;f\colon\mathsf{Tm}(\bullet,\mathsf{Hom}(Y,X))$. But this is absurd, because the function $?\colon\emptyset\to\mathbbm{1}$ is a term of type $\mathsf{El}(\emptyset)\to\mathsf{El}(\mathbbm{1})$ in the category model, and, by Section 5, corresponds to a term of type $\mathsf{Hom}(\emptyset,\mathbbm{1})$, but there cannot be any terms of $\mathsf{Hom}(\mathbbm{1},\emptyset)$, because the set of terms of this type is in bijection with the set of functors $\mathsf{El}(\mathbbm{1})$ to $\mathsf{El}(\emptyset)$, of which there are none.

Basically the same argument will show the uniqueness of homs principle—that for any hom terms $p\colon\mathsf{Tm}(\Gamma,\mathsf{Hom}(t,t^{\prime})^{-})$ and $q\colon\mathsf{Tm}(\Gamma,\mathsf{Hom}(t,t^{\prime}))$, there is a witness of $\mathsf{Id}(p,q)$—is violated in the category model (a counterexample being $\mathsf{Set}$-homs from the two-element set to itself), and therefore not provable in the syntax of DCwFs+$\mathsf{Set}$. So we can conclude that the difference between $(1,1)$-truncated DCwFs, $(1,0)$-truncated DCwFs, and $(0,1)$-truncated CwFs is reflected internally in the syntax.

6 Conclusion and Future Work

We have laid the laid the foundation for a generalized algebraic theory of directed types, and began to conduct synthetic category theory in that setting. Our semantics-forward approach was to study the category model first, and extract its key features into a series of abstract definitions—the GATs of polarized CwFs, neutral-polar CwFs, directed CwFs, $(1,1)$-truncated directed CwFs, and directed CwFs with features like polarized dependent types and a directed univalent set universe. Working within the directed type theory of these models, we found that it was possible to work informally with the powerful directed path induction principle to make basic constructions in category theory, with our careful discipline about variable negation preventing the directed type theory from collapsing into undirected type theory.

Much remains to be done. The category theory of Section 4 serves as a proof-of-concept, but needs to be fleshed out into a full theory. As mentioned, work is needed to articulate natural transformations in the theory; our current investigations concern possible generalization of $\Pi$-types to di-variant end types which address some of the above-mentioned variance issues with natural transformations. For reasons of space, we omitted dependent sum types from the theory. But with them added, much of basic category theory should be expressible in this language, such as isomorphisms, (co)slice categories, (co)limits, exponentials, and perhaps some basic topos theory. Better development of the category of sets should put representability and some properties of presheaf categories into reach, though internal statement and proof of the Yoneda Lemma will likely rely on the resolution of the above-mentioned dilemma regarding natural transformations. We also leave it to future work to study whether this theory can capture higher category theory by weakening or dropping the assumption of 1-truncation, and, if so, how it compares to existing synthetic higher category frameworks, such as [25].

There are further avenues for developing the type theory of DCwFs. Two important metatheoretic results about the syntax of DCwFs currently being pursued are canonicity and normalization. Moreover, we would like to verify the correctness of these results by formalizing them in a computer proof assistant. A further goal would be to implement the syntax of DCwFs as a computer proof language itself, hopefully with syntax nearly as convenient as the constructions of Section 4, and formalize larger swaths of category theory in it.

As mentioned in the introduction, a motivation for the present work’s focus on generalized algebraic theories is the possibility of expressing it in a second-order generalized algebraic theory, following [7, 27, 26, 4, 17]. Since our notions of PCwFs and NPCwFs include explicit operations on contexts (as seen in the substructural character of the ( (Var Neg).) rule), it’s clear that either an extension to the SOGAT signature language of [17], and/or a partial internalization of the first-order theory into the second-order theory—à la [4]—will be necessary. A related question is whether the $(\_\!\_)^{-}$ operation (or a neutralization operation interpreted in the category model by core groupoids) on types and contexts can be viewed as a modality in the sense of [12]. Also, as mentioned, this work is oriented towards higher observational type theory, and further study of the observational equivalences of this theory (e.g. a characterization of the $\mathsf{Hom}$-types of $\Pi$-types) is needed.

Finally, the present framework provides a setting for studying directed higher-inductive types—inductively-defined types with both term constructors and hom constructors. Some simple examples would be the directed interval (as is studied in [30, 25]) and a directed analogue of the circle type [28, Section 6.2]. These examples are modelled by the category model, and can therefore be soundly added to the present theory. Higher examples (such as directed versions of higher tori and spheres) would require more careful metatheoretic work to justify, but could perhaps lead to a number of interesting considerations.

Appendix A Additional Calculations

The definition of the $\Pi$-type former given in Fig. 5 is repeated in Fig. 13, plus the definitions for lambda abstraction and application.

These definitions rely on the following calculations.

• A naturality calculation for the morphism part of lam t’:

  $$t^{\prime}(\gamma_{1},x_{1})\circ B(\mathsf{id}_{\gamma_{1}},x_{1})(t^{\prime}(\gamma_{01},\mathsf{id}_{A\;\gamma_{01}\;a_{1}}))$$ (5)

  $$\equiv t^{\prime}(\mathsf{id}_{\gamma_{1}}\circ\gamma_{01},(A\;\gamma_{01}\;x_{1})\circ\mathsf{id}_{A\;\gamma_{01}\;a_{1}})$$

  $$\equiv t^{\prime}(\gamma_{01},A\;\gamma_{01}\;x_{1})$$

  $$\equiv t^{\prime}(\gamma_{01}\circ\mathsf{id}_{\gamma_{0}},(A\;\mathsf{id}_{\gamma_{0}}\;\mathsf{id}_{A\;\gamma_{01}\;a_{1}^{\prime}})\circ A\;\gamma_{01}\;x_{1})$$

  $$\equiv t^{\prime}(\gamma_{01},\mathsf{id}_{A\;\gamma_{01}\;a_{1}^{\prime}})\circ B(\gamma_{01},\mathsf{id}_{A\;\gamma_{01}\;a_{1}^{\prime}})(t^{\prime}(\mathsf{id}_{\gamma_{0}},A\;\gamma_{01}\;x_{1}))$$

  The first and the last equations are the functoriality conditions of $t^{\prime}$. The middle equations are the category laws for $\Gamma$, $A(\gamma_{0})$, and $A(\gamma_{1})$, as well as the functoriality of $A$.

• To see that the morphism part of app f is well-typed, observe that

  $$(f\;\gamma_{01})\colon(\Pi(A,B)\;\gamma_{1})[\;\Pi(A,B)\;\gamma_{01}\;(f\;\gamma_{0}),\;f(\gamma_{1})\;],$$ (6)

  i.e.

  $$(f\;\gamma_{01})\colon\mathsf{Transform}\;\{\gamma=\gamma_{1}\}\;(B(\gamma_{01},\mathsf{id})\;(f\;\gamma_{0}),f(\gamma_{1}))$$

  and therefore,

  $$\mathsf{component}(f\;\gamma_{01})\;a_{1}$$

  $$\colon B(\gamma_{1},a_{1})[B(\gamma_{01},\mathsf{id})\;(f\;\gamma_{0}\;(A\;\gamma_{01}\;a_{1})),f\;\gamma_{1}\;a_{1}];$$

  and also that

  $$a_{01}\colon(A\;\gamma_{0})[a_{0},A\;\gamma_{01}\;a_{1}],$$ (7)

  $$\text{and thus, since }(f\;\gamma_{0})\colon\mathsf{Tm}(A(\gamma_{0}),B_{\gamma_{0}}),$$

  $$f\;\gamma_{0}\;a_{01}$$

  $$\colon B(\gamma_{0},A\;\gamma_{01}\;a_{1})[B(\mathsf{id}_{\gamma_{0}},a_{01})\;(f\;\gamma_{0}\;a_{0}),f\;\gamma_{0}\;(A\;\gamma_{01}\;a_{1})]$$

  and therefore

  $$B(\gamma_{01},\mathsf{id})\;(f\;\gamma_{0}\;a_{01})$$

  $$\colon B(\gamma_{1},a_{1})[B(\gamma_{01},a_{01})\;(f\;\gamma_{0}\;a_{0}),B(\gamma_{01},\mathsf{id})\;(f\;\gamma_{0}\;(A\;\gamma_{01}\;a_{1}))].$$

  and thus we can conclude that $\mathsf{component}(f\;\gamma_{01})\;a_{1}$ can be composed with $B(\gamma_{01},\mathsf{id})\;(f\;\gamma_{0}\;a_{01})$, giving a term of the appropriate type.

⬇

Π : (A : Ty Γ⁻) → Ty(Γ ▹⁻ A) → Ty Γ

|Π(A,B) γ| = Tm(A(γ), B_γ)

where

B_γ : Ty(A γ)

B_γ a = B(γ,a)

B_γ (x : (A γ)[ a , a’ ]) = B(id_γ,x)

record (Π(A,B) γ)[$\_\!\_$,$\_\!\_$] : (θ θ’ : Tm(A(γ), B_γ)) → Set where

component : (a : |A γ|) → (B(γ,a))\:[ θ a , θ’ a ]

naturality : (x : (A γ)\:[ a , a’ ]) → (θ’ x) ∘ B(γ,x)(component a) ≡ (component a’) ∘ (θ x)

Π(A,B) γ₀₁ : Tm(A(γ₀), B${}_{\gamma_{0}}$) → Tm(A(γ₁), B${}_{\gamma_{1}}$)

(Π(A,B) γ₀₁ θ₀) (a₁ : |A γ₁|) = B(γ₀₁, id${}_{\mathsf{A}\;\gamma_{01}\;a_{1}}$) (θ₀(A γ₀₁ a₁))

(Π(A,B) γ₀₁ θ₀) (x₁ : A γ₁\:[a₁ , a₁’]) = B(γ₀₁, id${}_{\mathsf{A}\;\gamma_{01}\;a_{1}^{\prime}}$) (θ₀(A γ₀₁ x₁))

lam : Tm(Γ ▹⁻ A, B) → Tm(Γ, Π(A,B))

lam t’ : (γ : |Γ|) → | (Π(A,B)) γ |

lam t’ γ : (a : |A γ|) → |B(γ,a)|

lam t’ γ a = t’(γ,a)

lam t’ γ : (x : (A γ)[ a , a’ ]) → B(γ,a’)[ B(id_γ,x) (lam t’ γ a), lam t’ γ a’ ]

lam t’ γ x = t’(id_γ,x)

lam t’ : (γ₀₁ : Γ[ γ₀ , γ₁ ]) → Transform {γ = γ₁} (Π(A,B) γ₀₁ (lam t’ γ₀), lam t’ γ₁)

component(lam t’ γ₀₁) : (a₁ : |A γ₁|)

→ B(γ₁,a₁)[ B(γ₀₁, id${}_{\mathsf{A}\;\gamma_{01}\;a_{1}}$) (lam t’ γ₀ (A γ₀₁ a₁)) , lam t’ γ₁ a₁ ]

component(lam t’ γ₀₁) a₁ = t’(γ₀₁, id${}_{\mathsf{A}\;\gamma_{01}\;a_{1}}$)

naturality(lam t’ γ₀₁) (x₁ : (A γ₁)[ a₁ , a₁’ ]) = (Equation 5)

app : Tm(Γ, Π(A,B)) → Tm(Γ ▹⁻ A, B)

app f : (γ : |Γ|) → (a : |A γ|) → |B(γ,a)|

app f γ a = f γ a -- (f γ) : (a : |A γ|) → |B_γ a|

app f : (γ₀₁ : Γ[ γ₀ , γ₁ ]) → (a₀₁ : (Aγ₀)[ a₀ , A γ₀₁ a₁ ])

→ B(γ₁,a₁)[ B(γ₀₁,a₀₁) (app f γ₀ a₀), app f γ₁ a₁ ]

app f γ₀₁ a₀₁ = (component(f γ₀₁) a₁) ∘ B(γ₀₁, id) (f γ₀ a₀₁)

-- see Equation 6 and Equation 7

Figure 13: Complete semantics of $\Pi$-types in the category model