2018-05-01 16:55:28 +00:00
|
|
|
\chapter{Introduction}
|
2017-12-02 00:34:33 +00:00
|
|
|
Functional extensionality and univalence is not expressible in
|
|
|
|
\nomen{Intensional Martin Löf Type Theory} (ITT). This poses a severe limitation
|
2018-05-07 22:25:34 +00:00
|
|
|
on both i. what is \emph{provable} and ii. the \emph{re-usability} of proofs.
|
2017-12-02 00:34:33 +00:00
|
|
|
Recent developments have, however, resulted in \nomen{Cubical Type Theory} (CTT)
|
|
|
|
which permits a constructive proof of these two important notions.
|
|
|
|
|
2017-12-12 14:45:20 +00:00
|
|
|
Furthermore an extension has been implemented for the proof assistant Agda
|
2018-03-29 11:32:06 +00:00
|
|
|
(\cite{agda}, \cite{cubical-agda}) that allows us to work in such a ``cubical
|
|
|
|
setting''. This thesis will explore the usefulness of this extension in the
|
|
|
|
context of category theory.
|
2018-04-23 15:06:09 +00:00
|
|
|
%
|
|
|
|
\section{Motivating examples}
|
|
|
|
%
|
2018-03-29 11:32:06 +00:00
|
|
|
In the following two sections I present two examples that illustrate some
|
|
|
|
limitations inherent in ITT and -- by extension -- Agda.
|
2017-12-02 00:34:33 +00:00
|
|
|
%
|
|
|
|
\subsection{Functional extensionality}
|
|
|
|
Consider the functions:
|
|
|
|
%
|
|
|
|
\begin{multicols}{2}
|
2018-05-07 08:53:22 +00:00
|
|
|
\noindent
|
|
|
|
\begin{equation*}
|
2018-05-08 00:01:17 +00:00
|
|
|
f \defeq (n \tp \bN) \mapsto (0 + n \tp \bN)
|
2018-05-07 08:53:22 +00:00
|
|
|
\end{equation*}
|
|
|
|
\begin{equation*}
|
2018-05-08 00:01:17 +00:00
|
|
|
g \defeq (n \tp \bN) \mapsto (n + 0 \tp \bN)
|
2018-05-07 08:53:22 +00:00
|
|
|
\end{equation*}
|
2017-12-02 00:34:33 +00:00
|
|
|
\end{multicols}
|
|
|
|
%
|
2018-05-07 08:13:13 +00:00
|
|
|
$n + 0$ is \nomen{definitionally} equal to $n$, which we write as $n + 0 = n$.
|
2018-03-29 11:32:06 +00:00
|
|
|
This is also called \nomen{judgmental} equality. We call it definitional
|
2017-12-02 00:34:33 +00:00
|
|
|
equality because the \emph{equality} arises from the \emph{definition} of $+$
|
|
|
|
which is:
|
|
|
|
%
|
|
|
|
\newcommand{\suc}[1]{\mathit{suc}\ #1}
|
|
|
|
\begin{align*}
|
2018-05-08 00:01:17 +00:00
|
|
|
+ & \tp \bN \to \bN \to \bN \\
|
2017-12-02 00:34:33 +00:00
|
|
|
n + 0 & \defeq n \\
|
|
|
|
n + (\suc{m}) & \defeq \suc{(n + m)}
|
|
|
|
\end{align*}
|
|
|
|
%
|
|
|
|
Note that $0 + n$ is \emph{not} definitionally equal to $n$. $0 + n$ is in
|
|
|
|
normal form. I.e.; there is no rule for $+$ whose left-hand-side matches this
|
2017-12-12 14:45:20 +00:00
|
|
|
expression. We \emph{do}, however, have that they are \nomen{propositionally}
|
2018-05-07 08:13:13 +00:00
|
|
|
equal, which we write as $n + 0 \equiv n$. Propositional equality means that
|
2018-03-29 11:32:06 +00:00
|
|
|
there is a proof that exhibits this relation. Since equality is a transitive
|
|
|
|
relation we have that $n + 0 \equiv 0 + n$.
|
2017-12-02 00:34:33 +00:00
|
|
|
|
|
|
|
Unfortunately we don't have $f \equiv g$.\footnote{Actually showing this is
|
|
|
|
outside the scope of this text. Essentially it would involve giving a model
|
|
|
|
for our type theory that validates all our axioms but where $f \equiv g$ is
|
|
|
|
not true.} There is no way to construct a proof asserting the obvious
|
|
|
|
equivalence of $f$ and $g$ -- even though we can prove them equal for all
|
|
|
|
points. This is exactly the notion of equality of functions that we are
|
|
|
|
interested in; that they are equal for all inputs. We call this
|
2018-05-07 22:25:34 +00:00
|
|
|
\nomen{point-wise equality}, where the \emph{points} of a function refers
|
2017-12-02 00:34:33 +00:00
|
|
|
to it's arguments.
|
2018-01-15 16:56:08 +00:00
|
|
|
|
2018-03-29 11:32:06 +00:00
|
|
|
In the context of category theory functional extensionality is e.g. needed to
|
|
|
|
show that representable functors are indeed functors. The representable functor
|
|
|
|
for a category $\bC$ and a fixed object in $A \in \bC$ is defined to be:
|
2018-01-15 16:56:08 +00:00
|
|
|
%
|
|
|
|
\begin{align*}
|
|
|
|
\fmap \defeq X \mapsto \Hom_{\bC}(A, X)
|
|
|
|
\end{align*}
|
|
|
|
%
|
|
|
|
The proof obligation that this satisfies the identity law of functors
|
2018-05-07 08:13:13 +00:00
|
|
|
($\fmap\ \idFun \equiv \idFun$) thus becomes:
|
2018-01-15 16:56:08 +00:00
|
|
|
%
|
|
|
|
\begin{align*}
|
|
|
|
\Hom(A, \idFun_{\bX}) = (g \mapsto \idFun \comp g) \equiv \idFun_{\Sets}
|
|
|
|
\end{align*}
|
|
|
|
%
|
|
|
|
One needs functional extensionality to ``go under'' the function arrow and apply
|
2018-05-07 22:25:34 +00:00
|
|
|
the (left) identity law of the underlying category to prove $\idFun \comp g
|
2018-05-03 12:18:51 +00:00
|
|
|
\equiv g$ and thus close the goal.
|
2017-12-02 00:34:33 +00:00
|
|
|
%
|
|
|
|
\subsection{Equality of isomorphic types}
|
|
|
|
%
|
2018-05-03 12:18:51 +00:00
|
|
|
Let $\top$ denote the unit type -- a type with a single constructor. In the
|
|
|
|
propositions-as-types interpretation of type theory $\top$ is the proposition
|
|
|
|
that is always true. The type $A \x \top$ and $A$ has an element for each $a :
|
2018-05-07 22:25:34 +00:00
|
|
|
A$. So in a sense they have the same shape (Greek; \nomen{isomorphic}). The
|
2018-05-03 12:18:51 +00:00
|
|
|
second element of the pair does not add any ``interesting information''. It can
|
|
|
|
be useful to identify such types. In fact, it is quite commonplace in
|
|
|
|
mathematics. Say we look at a set $\{x \mid \phi\ x \land \psi\ x\}$ and somehow
|
|
|
|
conclude that $\psi\ x \equiv \top$ for all $x$. A mathematician would
|
|
|
|
immediately conclude $\{x \mid \phi\ x \land \psi\ x\} \equiv \{x \mid
|
|
|
|
\phi\ x\}$ without thinking twice. Unfortunately such an identification can not
|
|
|
|
be performed in ITT.
|
2017-12-02 00:34:33 +00:00
|
|
|
|
2018-05-07 08:13:13 +00:00
|
|
|
More specifically what we are interested in is a way of identifying
|
2018-05-03 12:18:51 +00:00
|
|
|
\nomen{equivalent} types. I will return to the definition of equivalence later
|
|
|
|
in section \ref{sec:equiv}, but for now it is sufficient to think of an
|
|
|
|
equivalence as a one-to-one correspondence. We write $A \simeq B$ to assert that
|
|
|
|
$A$ and $B$ are equivalent types. The principle of univalence says that:
|
2017-12-02 00:34:33 +00:00
|
|
|
%
|
2018-03-29 11:32:06 +00:00
|
|
|
$$\mathit{univalence} \tp (A \simeq B) \simeq (A \equiv B)$$
|
2017-12-02 00:34:33 +00:00
|
|
|
%
|
2018-04-24 12:11:22 +00:00
|
|
|
In particular this allows us to construct an equality from an equivalence
|
|
|
|
($\mathit{ua} \tp (A \simeq B) \to (A \equiv B)$) and vice-versa.
|
|
|
|
|
2018-04-23 15:06:09 +00:00
|
|
|
\section{Formalizing Category Theory}
|
2017-12-02 00:34:33 +00:00
|
|
|
%
|
2018-05-03 12:18:51 +00:00
|
|
|
The above examples serve to illustrate a limitation of ITT. One case where these
|
|
|
|
limitations are particularly prohibitive is in the study of Category Theory. At
|
|
|
|
a glance category theory can be described as ``the mathematical study of
|
2018-05-07 08:13:13 +00:00
|
|
|
(abstract) algebras of functions'' (\cite{awodey-2006}). By that token
|
2017-12-02 00:34:33 +00:00
|
|
|
functional extensionality is particularly useful for formulating Category
|
2017-12-12 14:45:20 +00:00
|
|
|
Theory. In Category theory it is also common to identify isomorphic structures
|
2018-05-03 12:18:51 +00:00
|
|
|
and univalence gives us a way to make this notion precise. In fact we can
|
|
|
|
formulate this requirement within our formulation of categories by requiring the
|
2018-03-29 11:32:06 +00:00
|
|
|
\emph{categories} themselves to be univalent as we shall see.
|
2017-12-02 00:34:33 +00:00
|
|
|
|
2017-11-26 13:59:05 +00:00
|
|
|
\section{Context}
|
2018-05-07 22:25:34 +00:00
|
|
|
\label{sec:context}
|
2017-12-02 00:34:33 +00:00
|
|
|
%
|
2018-03-29 11:32:06 +00:00
|
|
|
The idea of formalizing Category Theory in proof assistants is not new. There
|
2018-05-03 12:18:51 +00:00
|
|
|
are a multitude of these available online. Just as a first reference see this
|
2018-04-24 12:11:22 +00:00
|
|
|
question on Math Overflow: \cite{mo-formalizations}. Notably these
|
|
|
|
implementations of category theory in Agda:
|
2018-05-07 08:13:13 +00:00
|
|
|
%
|
2017-12-02 00:34:33 +00:00
|
|
|
\begin{itemize}
|
|
|
|
\item
|
2018-05-07 08:13:13 +00:00
|
|
|
\url{https://github.com/copumpkin/categories}
|
|
|
|
|
|
|
|
A formalization in Agda using the setoid approach
|
2017-12-02 00:34:33 +00:00
|
|
|
\item
|
2018-05-07 08:13:13 +00:00
|
|
|
\url{https://github.com/pcapriotti/agda-categories}
|
|
|
|
|
|
|
|
A formalization in Agda with univalence and functional extensionality as
|
|
|
|
postulates.
|
2017-12-02 00:34:33 +00:00
|
|
|
\item
|
2018-05-07 22:25:34 +00:00
|
|
|
\url{https://github.com/HoTT/HoTT/tree/master/theories/Categories}
|
2018-05-07 08:13:13 +00:00
|
|
|
|
|
|
|
A formalization in Coq in the homotopic setting
|
2018-03-29 11:32:06 +00:00
|
|
|
\item
|
2018-05-07 08:13:13 +00:00
|
|
|
\url{https://github.com/mortberg/cubicaltt}
|
|
|
|
|
|
|
|
A formalization in CubicalTT - a language designed for cubical-type-theory.
|
|
|
|
Formalizes many different things, but only a few concepts from category
|
|
|
|
theory.
|
2018-04-24 12:11:22 +00:00
|
|
|
|
2018-05-07 08:13:13 +00:00
|
|
|
\end{itemize}
|
|
|
|
%
|
2018-04-24 12:11:22 +00:00
|
|
|
The contribution of this thesis is to explore how working in a cubical setting
|
2018-05-07 08:13:13 +00:00
|
|
|
will make it possible to prove more things and to reuse proofs and to try and
|
|
|
|
compare some aspects of this formalization with the existing ones.\TODO{How can
|
|
|
|
I live up to this?}
|
2017-12-02 00:34:33 +00:00
|
|
|
|
2018-03-29 11:32:06 +00:00
|
|
|
There are alternative approaches to working in a cubical setting where one can
|
|
|
|
still have univalence and functional extensionality. One option is to postulate
|
|
|
|
these as axioms. This approach, however, has other shortcomings, e.g.; you lose
|
2018-05-03 12:18:51 +00:00
|
|
|
\nomen{canonicity} (\TODO{Pageno!} \cite{huber-2016}). Canonicity means that any
|
|
|
|
well-typed term evaluates to a \emph{canonical} form. For example for a closed
|
2018-05-08 00:01:17 +00:00
|
|
|
term $e \tp \bN$ it will be the case that $e$ reduces to $n$ applications of
|
2018-05-03 12:18:51 +00:00
|
|
|
$\mathit{suc}$ to $0$ for some $n$; $e = \mathit{suc}^n\ 0$. Without canonicity
|
|
|
|
terms in the language can get ``stuck'' -- meaning that they do not reduce to a
|
|
|
|
canonical form.
|
2017-12-02 00:34:33 +00:00
|
|
|
|
2018-03-29 11:32:06 +00:00
|
|
|
Another approach is to use the \emph{setoid interpretation} of type theory
|
|
|
|
(\cite{hofmann-1995,huber-2016}). With this approach one works with
|
2018-05-07 22:25:34 +00:00
|
|
|
\nomen{extensional sets} $(X, \sim)$, that is a type $X \tp \MCU$ and an
|
2018-05-07 08:13:13 +00:00
|
|
|
equivalence relation $\sim \tp X \to X \to \MCU$ on that type. Under the setoid
|
|
|
|
interpretation the equivalence relation serve as a sort of ``local''
|
2018-03-29 11:32:06 +00:00
|
|
|
propositional equality. This approach has other drawbacks; it does not satisfy
|
2018-05-07 22:25:34 +00:00
|
|
|
all propositional equalities of type theory (\TODO{Citation needed}), is
|
2018-05-07 08:13:13 +00:00
|
|
|
cumbersome to work with in practice (\cite[p. 4]{huber-2016}) and makes
|
|
|
|
equational proofs less reusable since equational proofs $a \sim_{X} b$ are
|
|
|
|
inherently `local' to the extensional set $(X , \sim)$.
|
|
|
|
|
|
|
|
\section{Conventions}
|
|
|
|
\TODO{Talk a bit about terminology. Find a good place to stuff this little
|
|
|
|
section.}
|
|
|
|
|
|
|
|
In the remainder of this paper I will use the term \nomen{Type} to describe --
|
|
|
|
well, types. Thereby diverging from the notation in Agda where the keyword
|
|
|
|
\texttt{Set} refers to types. \nomen{Set} on the other hand shall refer to the
|
|
|
|
homotopical notion of a set. I will also leave all universe levels implicit.
|
|
|
|
|
|
|
|
And I use the term \nomen{arrow} to refer to morphisms in a category, whereas
|
|
|
|
the terms morphism, map or function shall be reserved for talking about
|
|
|
|
type-theoretic functions; i.e. functions in Agda.
|
|
|
|
|
|
|
|
$\defeq$ will be used for introducing definitions. $=$ will be used to for
|
|
|
|
judgmental equality and $\equiv$ will be used for propositional equality.
|
|
|
|
|
|
|
|
All this is summarized in the following table:
|
|
|
|
|
|
|
|
\begin{center}
|
|
|
|
\begin{tabular}{ c c c }
|
|
|
|
Name & Agda & Notation \\
|
|
|
|
\hline
|
|
|
|
\nomen{Type} & \texttt{Set} & $\Type$ \\
|
|
|
|
\nomen{Set} & \texttt{Σ Set IsSet} & $\Set$ \\
|
|
|
|
Function, morphism, map & \texttt{A → B} & $A → B$ \\
|
2018-05-08 14:22:51 +00:00
|
|
|
Dependent- ditto & \texttt{(a : A) → B} & $∏_{a \tp A} B$ \\
|
2018-05-07 08:13:13 +00:00
|
|
|
\nomen{Arrow} & \texttt{Arrow A B} & $\Arrow\ A\ B$ \\
|
2018-05-07 08:53:22 +00:00
|
|
|
\nomen{Object} & \texttt{C.Object} & $̱ℂ.Object$ \\
|
|
|
|
Definition & \texttt{=} & $̱\defeq$ \\
|
|
|
|
Judgmental equality & \null & $̱=$ \\
|
2018-05-07 08:13:13 +00:00
|
|
|
Propositional equality & \null & $̱\equiv$
|
|
|
|
\end{tabular}
|
|
|
|
\end{center}
|