CompLF

[[!redirects prototype CLF]]

+-- {: .rightHandSide}
+-- {: .toc .clickDown tabindex="0"}
### Context
#### Type theory
+-- {: .hide}
[[!include type theory - contents]]
=--
#### Constructivism, Realizability, Computability
+-- {: .hide}
[[!include constructivism - contents]]
=--
=--
=--

#Contents#
* table of contents
{:toc}

## Idea

Prototype CompLF is a work-in-progress [[proof assistant]] design combining ideas from [[Nuprl]], [[LF]], and [[decidability|undecidable type checking]]. In this article, "CLF" and "CompLF" both abbreviate "Computational Logical Framework". Elsewhere, "CLF" is used to abbreviate "Concurrent Logical Framework", which is mostly unrelated. So far, CompLF is just Matt Oliveri's unpublished formal system and a formalized metatheory for it.

### Motive

The motivation for CLF is to try and combine the convenience of [[type theory|type systems]] with the flexibility of [[certified programming|program verification]], and make the resulting style of correct program construction applicable to mathematics in a general way.

In most typed computational languages—even those with rather strong type systems, like the [[dependent type theory|dependent type systems]] of [[Coq]] and [[Agda]]—there is a distinction between types and program specifications. A specification should

* constrain the computational behavior of conforming [[terms]], and
* not constrain the way this behavior is implemented.

[[type|Types]] typically constrain both behavior and implementation. Intuitively, this is because types are typically implemented using elaborate [[syntax]] checks, so they constrain behavior *by* constraining implementation.

A *program logic* provides predicates and proof rules about programs, and this provides an adequate approach to specification and verification of computational behavior. The requirement to satisfy a predicate doesn't constrain the way a program is implemented because the syntax rules for forming a program don't take into account any predicates the programmer may hope the program to satisfy. This is the sense in which program verification is more flexible than syntactic typing.

Using [[propositions as types]], many dependent type systems support specifications, in addition to types. But with the restriction to syntactic type checking, types and specifications remain distinct notions in practice.

(Many proof assistants have a feature called "program extraction" that converts term definitions into an *external* program. Using program extraction, syntactic dependent typing of terms can match the flexibility of specifications for external programs. This doesn't provide any additional flexibility for terms themselves, though. (The realizer extraction mechanism described below is analogous to program extraction, but with terms as the *output* of realizer extraction, not the input.))

By taking types to denote (certain) [[PER]]s on terms, Nuprl provides an [[intrinsic and extrinsic views of typing|extrinsic]] notion of type that subsumes program specifications. So Nuprl has a type system, and its types provide the flexibility of program verification; but it seems that Nuprl doesn't provide the convenience of a type system with a type checking algorithm.

From a naive perspective, it can't be done. Type checking Nuprl would be undecidable, but more importantly, it would require automatically coming up with proofs of true mathematical statements, and there's no good way to do that.

But that just means there needs to be additional machinery for formal proofs and practical proof checking. The question is then whether the formal proof machinery is as convenient, for developing correct programs, as type checking. The answer, for Nuprl's proof system, is supposedly "no". CLF will try to do better, by checking proof terms in a manner similar to dependent type checking.

### Method

CLF is planned to combine a semantics similar to that of Nuprl with a language of proof terms similar to that of [Cedille](https://cedille.github.io/). (Cedille is actually the latest in a series of dependent type systems (co)designed by Aaron Stump in which the meaning of equality pertains to realizers, not proof terms.)

#### Type checking Proof terms

The terms that the CLF type system is about are called "[[realizers]]". (Since its Nuprl-inspired PER semantics is a term realizability model.) The proof terms would be an *additional* class of terms. Proof checking in CLF means type checking the proof terms. In the case of "obviously-well-typed" programs, the tree structures of the realizers and proof terms should be nearly isomorphic, so the system will resemble a typical syntactic type checker. In general, proof terms have additional information not present in realizers. This is the information that is needed for proof/type checking, but is not part of the computational content of the witness/element.

CLF types only depend on realizers, never proof terms. So to handle proof checking rules analogous to certain rules of dependent type systems, a realizer needs to be extracted from a proof on the fly. (Nuprl works around such rules, since it doesn't extract realizers on the fly.) This solution is used in RedPRL, and is discussed in [Algebraic Foundations of Proof Refinement](#SterlingHarperRefinement), under the terminology "dependent proof refinement". An analogue of on-the-fly realizer extraction is used by Cedille too, and is called "erasure". This kind of proof checking algorithm seems to be an example of an elaboration algorithm: the input expressions (in this case, proof terms) are different from the internal terms (in this case, realizers).

The only information from derivations that's missing from proof terms is derivations of definitional equality, which is [[beta conversion]]. This is enough to make proof checking undecidable, since beta convertibility of untyped realizers is undecidable. CLF will boldly attempt to automate beta conversion by comparing [[normal form|normal forms]] nonetheless.

Before normalizing terms, to compare them for definitional equality, they are first compared for [[alpha-equivalence]]. This allows the user to safely "hand-crank" an equality proof about terms without normal forms. So CLF proof checking will not be total, but it should still be sound and complete with respect to formal derivability.

#### Proof terms as the Basis of Tactics

LCF-style proof engines check proofs by executing some kind "proof script", which runs "tactics" to reduce proof goals. Tactics fail when they attempt to use an invalid rule instance. The proof is complete when all goals are reduced to nothing.

A proof term can be thought of as a restricted form of proof script. The primitive proof term formers correspond to primitive derivation rules. Open proof term schemas correspond to derived rules. Operations on closed proof terms correspond to admissible rules. Tactics are arguably somewhere between derived rules and admissible rules: they tend to intensionally analyze the goal, but not entire proofs. Intuitively, tactic engines are a kind of macro expansion system to automate the production of proof terms.

When proofs are "generated" by tactics, proof terms should not actually need to be generated in memory; only realizers. This makes CLF's proof checking like that of Nuprl and [[Isabelle]], and unlike that of Coq. In Coq, the proof terms need to be generated in order to perform termination checking on them. (So Coq's trusted kernel is not LCF-style; it's "Automath-style": proof checking is type checking.) Nuprl-style systems don't benefit from termination checking because it's possible to *prove* that an untyped realizer implements an element of the intended type, which entails any necessary totality properties. (And Isabelle/HOL doesn't benefit from termination checking because it uses a [[global choice operator]].)

It's good for performance that the (relatively complex) proof terms never need to be dealt with, aside from a single compositional pass to check them. Instead, most of the detail work of proof checking deals with realizers.

While proof terms seem too complex to be the terms you want to deal with, it may turn out that CLF realizers are too simple. The concern is that the realizers may not have enough annotations for useful forms of proof automation. But if this does turn out to be a problem in practice, it still seems better to add annotations to the realizers as necessary, rather than to give up and collapse the distinction between proof terms and realizers.

### Intended Style

The primitives of CLF will probably be pretty low-level, and will rely on some "bootstrapping" up to the usual principles of type theory. (Some of this can be seen already, in the discussion of the rules below.) This bootstrapping will rely in crucial ways on the realizers being fundamentally untyped.

However, once the bootstrapping is taken care of, the intent is that the main way of using CLF will be a lot like other dependently-typed proof assistants: Constructions will be thought of as elements of types, and the type system will guide the details of constructing elements.

Given the goal of a system that feels typed, it may seem weird to explicitly base it on untyped realizers. The reason goes back to the flexibility of specifications, compared to purely syntactic typing. It should *always* be possible to construct elements in such a way that the computational content is well-implemented. But it seems that syntactic dependent typing requires ever more tricks to be added to the language in order to express elements using terms that are efficient.

Rather than having to change the language, CLF provides the option of reasoning about assignment of types to untyped realizers to *prove* the missing type theoretic principles. Of course, reasoning about type assignment can also be used, to taste, even when not strictly necessary. In general, there's a spectrum of styles for using an extrinsic type theory, based on how much of the well-typedness of a construction is true by construction, versus proven afterward. Correctness by construction makes the development feel more intrinsic, but this difference in style is not a commitment: the extrinsic perspective applies to everything.

### CLF as a Metalogic

The above considerations motivate a whole class of type system implementations that combine Nuprl-style semantics with a Cedille-like proof term checker. But what about [[category|categories]]?

To justify the proof rules, systems like Nuprl, Cedille, and CLF are based on term realizability models. But it's not currently clear to what extent this approach is compatible with the [[relation between type theory and category theory|categorical semantics of type theory]].

The specifics of CLF are motivated by the insight (of Matt Oliveri, but strongly inspired by [Andromeda](#Andromeda)) that [[extensional type theory|extensional type theories]] (with equality reflection) promise to make great logical frameworks. Although categorical semantics for "structural" fragments of Nuprl-style systems may be feasible and useful, CLF sidesteps the whole issue by being a metalogic for reasoning about formal systems.

The idea is that by regarding CLF as a metalogic, its possible lack of categorical semantics is irrelevant because the object logic can be chosen so as to reason about the desired semantics. CLF as a metalogic is a way to try to make the (hypothesized) technical advantages of a Nuprl-Cedille-like approach applicable to any type theory.

Some discussion is needed to explain what makes extensional type theory good for logical frameworks, what that has to do with metalogics, and what makes CLF a good metalogic. [Later](#CLFasLF).

First, what follows is a draft version of the formal system that will be used in prototype CLF. These rules are non-algorithmic rules pertaining only to types and realizers; the details of the proof system are not designed yet. (And they won't be until some issues are addressed in the semantics and rule set.) Some sketchy thoughts about the design of the proof system are at the beginning of the [Rules](#Rules) section.

## Syntax

### Term grammar

The main [[syntax|syntactic]] class is [[terms]]. [[type|Type]] expressions are terms. There are also [[variables]] and [[contexts]].

variables ($x$, $y$, ...)` ::= `(Written as usual. Complain if you can't tell them apart from metavariables.)

terms ($t$, $a$, $b$, $f$, $T$, $A$, $B$, $R$, ...)` ::=`

* $x \qquad$ (variable reference)
* $\lambda x.b \qquad$ (lambda abstraction)
* $f\,a \qquad$ (application)

* $a = b \in C \qquad$ (equality type)
* $\Pi x:A.B \qquad$ (dependent function type)
* $\cap x:A.B \qquad$ (family intersection type)
* $Comp \qquad$ (type of computations ([[realizers]]))
* $\{x:A | B\} \qquad$ (subset/separation type)
* $\{x = y | R\} \qquad$ ([[PER]] comprehension type)
* $Bool \qquad$ (type of "booleans") (two-element type)

To be added: an infinite type.

contexts ($\Gamma$, ...)` ::= `$\cdot$` | `$\Gamma,x:T$

As usual, the rules may make liberal use of informal list operations to work with contexts.

### Judgment forms

$a \equiv_\beta b \qquad$ (beta conversion)

The only [[beta reduction]] is $(\lambda x.b)\,a \longrightarrow_\beta b[a/x]$. Conversion is the congruence closure.

The other [[judgment]] forms will be defined [[induction|inductively]] by the rules below. They are:

$\Gamma \vdash T\,type \qquad$ (type validity)

$\Gamma \vdash t \Vdash T \qquad$ (element in a type) (realizer of a type)

Note that in [[Nuprl]], the ($\Gamma \vdash t \Vdash T$) form is written ($\Gamma \vdash T\;\lfloor ext t \rfloor$). The "extract" part is computed from a derivation, so the user thinks of the judgment as stating that the type is [[inhabited type|inhabited]].

In the rules below, however, no attention is paid to what can be metatheoretically computed with terms or derivations. That is (important) future work.

($\Gamma \vdash t \Vdash T$) is used instead of ($\Gamma \vdash t\,:\,T$) in order to avoid the misinterpretation of this judgment form as [[intrinsic and extrinsic views of typing|intrinsic typing]] of terms. Note the contrast with variables, which *are* intrinsically typed.

The ($t\,:\,T$) form can be translated to this system as either ($t \Vdash T$) or ($? \Vdash t \in T$). The latter uses the abbreviation "$\in$" defined below, and the abuse of meta-notation that we don't care what goes in the "$?$". With ($t \Vdash T$), we think of $t$ as resulting from the proof of $T$. With ($? \Vdash t \in T$), we think of the "*semantic judgment*" ($t \in T$) as a goal to prove internally. The rules ensure that these two ways of expressing an element of a type are interderivable. From this point on, ($\Gamma \vdash ? \Vdash T$) will be written as just ($\Gamma \vdash T$), although it remains informal.

### Abbreviations

#### Semantic Judgment Forms {#SemJudg}

$a \in A\;\coloneqq\;a = a \in A$

$A \to B\;\coloneqq\;\Pi \underline{\;}:A.B$

$A \wedge B\;\coloneqq\;\{\underline{\;}:A | B\}$

"$A$ equality is respected in $B$.":

$A \prec B\;\coloneqq\;\Pi t:Comp.\Pi t':Comp.
(t \in B)\to(t = t' \in A)\to(t = t' \in B)$

"$A$ members are included in $B$.":

$A \subseteq B\;\coloneqq\;\Pi t:Comp.(t \in A)\to(t \in B)$

"$A$ is a subtype of $B$.":

$A \lt\!\!:\;B\;\coloneqq\;(\lambda x.x) \in (A \to B)$

Note: ($A \lt\!\!:\;B$) ought to be logically equivalent to ($A \subseteq B \wedge A \prec B$), using the rules. And also to ($\Pi t:Comp.\Pi t':Comp.(t = t' \in A)\to(t = t' \in B)$). So thinking of types as PERs, subtypes are subrelations.

"$A$ is a refinement/[[subquotient]] of $B$.":

$A \sqsubseteq B\;\coloneqq\;A \subseteq B \wedge B \prec A$

Note the reversal of $\prec$ in $\sqsubseteq$, compared to $\lt\!\!:$. As relations on types, $\subseteq$, $\lt\!\!:$, and $\sqsubseteq$ ought to be [[preorders]]. $\prec$ is not transitive.

#### Computations

The Church booleans:

$tru\;\coloneqq\;\lambda t.\lambda f.t$

$fls\;\coloneqq\;\lambda t.\lambda f.f$

#### Type constructors

$\top\;\coloneqq\;tru = tru \in Bool$

$\bot\;\coloneqq\;tru = fls \in Bool$

"Squash" of $A$:

$\lfloor A \rfloor\;\coloneqq\;\{\underline{\;}:\top | A\}$

## Rules {#Rules}

These rules are not the final rules that are planned to be implemented in proto CLF. The major differences planned for the final rules from those here are:

* Use roughly Nuprl-style hidden assumptions, but with unhiding handled automatically.
* Have an additional judgment form for goals whose realizer is ignored/arbitrary, which interacts with unhiding.
* Add formal proof terms.

The expectation and hope is that the result will look fairly similar to algorithmic elaboration-style type checking rules. These rules will be the primitive tactics, and type checking will thus be a special case of running tactic trees.

### Type Formation

We have a strong equality formation rule, inspired by the medium-strength rule from [Anand & Rahli](#AnandRahliITP14), which is also stronger than the usual one. Here is respect-based equality formation:

$$\begin{gathered}
\frac{\Gamma \vdash p \Vdash A \prec C \qquad
\Gamma \vdash q \Vdash B \prec C \qquad
\Gamma \vdash a \Vdash A \qquad \Gamma \vdash b \Vdash B}
{\Gamma \vdash a = b \in C\,type} \\
\\
\frac{\Gamma \vdash A\,type \qquad \Gamma,x:A \vdash B\,type}
{\Gamma \vdash \Pi x:A.B\,type} \\
\\
\frac{\Gamma \vdash A\,type \qquad \Gamma,x:A \vdash B\,type}
{\Gamma \vdash \cap x:A.B\,type}
\end{gathered}$$

The $Comp$ type, which is called $Base$ in Nuprl:

$$\begin{gathered}
\frac{}{\Gamma \vdash Comp\,type} \\
\\
\frac{\Gamma \vdash A\,type \qquad \Gamma,x:A \vdash B\,type}
{\Gamma \vdash \{x:A | B\}\,type}
\end{gathered}$$

A PER comprehension type was originally conceived by Stuart Allen, and then forgotten and subsequently [reintroduced](#PERTypes14). However, I think Nuprl had already had $Base$, subsets, and quotients, which make it definable. The real innovation is how PER comprehension and the strengthened equality formation rule interact to allow internal, logical-relations-style type definitions. We only allow forming a PER type from a pseudo-PER, rather than implicitly taking the symmetric transitive closure of any family:

$$\begin{gathered}
\frac{\begin{array}{l}\Gamma,x1:Comp,x2:Comp \vdash R\,type \\
\Gamma,y1:Comp,y2:Comp \vdash s \Vdash R[y1,y2/x1,x2] \to R[y2,y1/x1,x2] \\
\Gamma,y1:Comp,y2:Comp,y3:Comp \vdash t \Vdash R[y1,y2/x1,x2] \to R[y2,y3/x1,x2] \to R[y1,y3/x1,x2]\end{array}}
{\Gamma \vdash \{x1 = x2 | R\}\,type} \\
\\
\frac{}{\Gamma \vdash Bool\,type}
\end{gathered}$$

### Miscellaneous

$$\frac{x:T \in \Gamma}{\Gamma \vdash x \Vdash T}$$

The untyped beta conversion rules have the same role as Nuprl's direct computation rules:

$$\begin{gathered}
\frac{A \equiv_\beta B \qquad \Gamma \vdash B\,type \qquad
\Gamma \vdash t \Vdash A}
{\Gamma \vdash t \Vdash B} \\
\\
\frac{t \equiv_\beta t' \qquad \Gamma \vdash t \Vdash T}
{\Gamma \vdash t' \Vdash T}
\end{gathered}$$

Every type respects itself, and $Comp$. (Yes, you can use any term you like as the proof.):

$$\begin{gathered}
\frac{\Gamma \vdash A\,type}{\Gamma \vdash p \Vdash A \prec A} \\
\\
\frac{\Gamma \vdash A\,type}{\Gamma \vdash p \Vdash Comp \prec A}
\end{gathered}$$

### Equality

A reflexivity rule, but any term can be the proof:

$$\frac{\Gamma \vdash t \Vdash T}{\Gamma \vdash p \Vdash t = t \in T}$$

Terms participating in equality are elements. Normally this would only be admissible, but in CLF, it comes in handy to make it into "selectivity" rules:

$$\begin{gathered}
\frac{\Gamma \vdash p \Vdash t1 = t2 \in T}{\Gamma \vdash t1 \Vdash T} \\
\\
\frac{\Gamma \vdash p \Vdash t1 = t2 \in T}{\Gamma \vdash t2 \Vdash T}
\end{gathered}$$

Note that the above equality rules make ($\Gamma \vdash t \Vdash T$) and ($\Gamma \vdash t \in T$) interderivable, as promised.

We use a "subsumptive" rewrite rule as equality elimination. "Subsumptive" refers to the property that the realizer of the type we rewrite in is unaffected. The terminology "subsumptive" for this is new to CLF, although this is effectively the same equality elimination rule as in Nuprl. The terminology comes from "subsumptive" vs "coercive" implementations of subtyping. Note that formally, CLF has no typed judgmental equality. Semantically, it's an [[extensional type theory]], but the semantic equality judgment is implemented as the equality type, like in Nuprl. This is sound due to equality reflection. So this rule is semantically a consequence of equality reflection, equality substitution, and (typed) conversion. As with equality reflection, the proof of equality is irrelevant:

$$\frac{\Gamma,x:A \vdash B\,type \qquad
\Gamma \vdash p \Vdash a1 = a2 \in A \qquad
\Gamma \vdash b \Vdash B[a1/x]}
{\Gamma \vdash b \Vdash B[a2/x]}$$

Any two terms are equal as the (consequently unique) proof of a true equality:

$$\frac{\Gamma \vdash t \Vdash T}
{\Gamma \vdash q \Vdash p1 = p2 \in (t = t \in T)}$$

That means $\top$ too, which is thus the maximum PER, ordered by subtyping. (Well, just as soon as we make $tru$ an element of $Bool$.)

### Functions

We have the standard application rule, and a variant of function extensionality:

$$\begin{gathered}
\frac{\Gamma \vdash f \Vdash \Pi x:A.B \qquad
\Gamma \vdash a \Vdash A}
{\Gamma \vdash f\,a \Vdash B[a/x]} \\
\\
\frac{\Gamma \vdash A\,type \qquad
\Gamma,x:A \vdash p \Vdash f\,x = f'\,x \in B \qquad
x \notin FV(f,f')}
{\Gamma \vdash q \Vdash f = f' \in \Pi x:A.B}
\end{gathered}$$

Unconventionally, we consider function extensionality to be the $\Pi$ intro rule, and derive the fact that lambdas implement functions.

### Intersection

Elements of a family intersection are like elements of a $\Pi$ type, except you don't have to apply them. An intersection element is *already* an element of all instances of the family. So the rules for family intersection are analogous to the rules for $\Pi$:

$$\begin{gathered}
\frac{\Gamma \vdash b \Vdash \cap x:A.B \qquad
\Gamma \vdash a \Vdash A}
{\Gamma \vdash b \Vdash B[a/x]} \\
\\
\frac{\Gamma \vdash A\,type \qquad
\Gamma,x:A \vdash p \Vdash b = b' \in B \qquad
x \notin FV(b,b')}
{\Gamma \vdash q \Vdash b = b' \in \cap x:A.B}
\end{gathered}$$

### Computation Formation

$$\begin{gathered}
\frac{\Gamma,x:Comp \vdash b \Vdash Comp}{\Gamma \vdash \lambda x.b \Vdash Comp} \\
\\
\frac{\Gamma \vdash f \Vdash Comp \qquad \Gamma \vdash a \Vdash Comp}
{\Gamma \vdash f\,a \Vdash Comp}
\end{gathered}$$

### Subset

The subset type resembles an existential quantifier. In the elimination rule, the proof part must be computationally irrelevant, since an element of a subset does not include the proof. Nuprl handles this with a hidden assumption, which is the practical way to do it. But it's also sound to just stick in a free variable side condition.

$$\begin{gathered}
\frac{\Gamma,x:A \vdash B\,type \qquad
\Gamma \vdash a \Vdash A \qquad \Gamma \vdash b \Vdash B[a/x]}
{\Gamma \vdash a \Vdash \{x:A | B\}} \\
\\
\frac{\Gamma,z:\{x:A | B\} \vdash C\,type \qquad
\Gamma,x:A,y:B \vdash c \Vdash C[x/z] \qquad y \notin FV(c) \qquad
\Gamma \vdash a \Vdash \{x:A | B\}}
{\Gamma \vdash c[a/x] \Vdash C[a/z]}
\end{gathered}$$

### PER

The rules for PER comprehension are made simpler by the fact that we required $R$ to be a pseudo-PER in the formation rule. The idea is that ($(t1 = t2 \in \{x1 = x2 | R\;x1\;x2\}) \leftrightarrow \lfloor R\;t1\;t2 \rfloor$), using the squash type constructor defined above. So comprehension and equality are almost inverse; you just lose the computational content of the equivalence proof.

$$\begin{gathered}
\frac{\Gamma \vdash \{x1 = x2 | R\}\,type \qquad
\Gamma \vdash t2 \Vdash Comp \qquad
\Gamma \vdash p \Vdash R[t1,t2/x1,x2]}
{\Gamma \vdash q \Vdash t1 = t2 \in \{x1 = x2 | R\}} \\
\\
\frac{\begin{array}{l}
\Gamma \vdash C\,type \qquad
\Gamma \vdash R[t1,t2/x1,x2]\,type \\
\Gamma \vdash p \Vdash t1 = t2 \in \{x1 = x2 | R\} \\
\Gamma,z:R[t1,t2/x1,x2] \vdash c \Vdash C \qquad z \notin FV(c)
\end{array}}
{\Gamma \vdash c \Vdash C}
\end{gathered}$$

### Booleans

$$\frac{}{\Gamma \vdash tru \Vdash Bool} \qquad
\frac{}{\Gamma \vdash fls \Vdash Bool}$$

Exercise: Does the following rule express ($Bool \subseteq Comp$), ($Bool \lt\!\!:\;Comp$), or ($Bool \sqsubseteq Comp$)?

$$\frac{\Gamma \vdash b \Vdash Bool}{\Gamma \vdash b \Vdash Comp}$$

Our elimination rule is intuitively characterizing $Bool$ as the least type containing $tru$ and $fls$. The usual elimination rule is derived; it's derivable because Church booleans actually work.

$$\frac{\Gamma,x:Bool \vdash C\,type \qquad
\Gamma \vdash c \Vdash C[tru/x] \qquad
\Gamma \vdash c \Vdash C[fls/x] \qquad
\Gamma \vdash b \Vdash Bool}
{\Gamma \vdash c \Vdash C[b/x]}$$

An [[ex falso quodlibet]] rule, which is technically about booleans, because of how we defined $\bot$. Note that this makes $\bot$ the minimum PER, ordered by inclusion, subtyping, or refinement.

$$\frac{\Gamma \vdash T\,type \qquad
\Gamma \vdash p \Vdash \bot}
{\Gamma \vdash t \Vdash T}$$

## Admissible rules

### Structural rules {#StructRules}

The structural rules of weakening and substitution are admissible. "Strengthening" is not. Strengthening says that a variable that's not free in the conclusion can be removed from the context:

$$\frac{\Gamma_1,x:T,\Gamma_2 \vdash \mathcal{J} \qquad
x \notin FV(\Gamma_2,\mathcal{J})}
{\Gamma_1,\Gamma_2 \vdash \mathcal{J}}$$

So nonadmissibility of strengthening means that a derivation can be using a hypothesis without it being obvious from the conclusion derived. This is typical of extensional type theory. Typically it's considered all the fault of equality reflection, which may be technically true for some systems. But Nuprl benefits more from the lack of strengthening: subsets, intersections, quotients, and other "refinement-style" type constructors provide flexible control over which proofs make it into the computational content, and which are merely establishing external facts. ([[quotient|Quotients]] don't have to be refinement-style, but in Nuprl and CLF, they are. See [below](#PERtheory).) Computational irrelevance is implemented by literally omitting the irrelevant proofs from terms. This leads to the lack of strengthening, and to undecidable type checking. The restriction imposed by equality reflection is that equality proofs never have computational content.

CLF follows Nuprl in trying to give the user maximum control over the terms used to represent elements. The hope is that with care, this can allow significantly greater convenience and performance than with decidable dependent type systems, which are committed to retaining enough annotations to effectively reject ill-typed terms. Once proof terms are added to the formal judgments, you probably do get strengthening. (But not decidability.)

### Sanity and Inversion

You'd think a statement should make sense before you try to prove it. And likewise, that a type should be valid before you try to construct an element. But in practice, it also works to consider a typed construction as providing evidence that the type makes sense. Specifically, the only way to derive ($\Gamma \vdash t \Vdash T$) is if you could also derive ($\Gamma \vdash T\,type$). That's a "sanity check" admissible rule. It's *probably* admissible for the judgments defined by the rules above.

Also, since the only way to derive type validity in this system (not using the sanity admissible rule) is to use a type former, a derivation of type validity implies that there are derivations of validity for the subexpressions of the type expression. These are "inversion" admissible rules.

### Admissible Rules vs PER Semantics {#AdmissSem}

For full Nuprl, it seems practically impossible to prove admissibility of sanity or inversion, if they're not just included among the primitive rules. But they *can* be included among the primitive rules, because they're true in the semantics. Due to the way hypothetical judgments are defined, making the inversion rules true requires making type equality intensional.

The above rules are the result of an experiment to reason about formal derivability in a Nuprl-style system. In the PER semantics that the above rules were based on, type equality is extensional. So the basic rules directly satisfied were more complicated, since they needed extra premises that inversion would've made redundant. The above rules are actually admissible rules relative to those basic rules. Sanity and inversion are "probably" admissible for the above rules because what's actually known is that they're admissible for the basic rules; they were in fact used to prove the above rules.

So the experiment was partially successful, but I (Matt Oliveri) don't recommend the approach. It cannot be easily adapted to handle universes, and some of the rules above still have type validity premises that a fully semantic approach could avoid.

It may seem weird that Nuprl is based on a particular PER semantics, if you think of it as a mathematical model. But if you think of it as a proof theoretic technique that reasons about realizability instead of formal derivability, perhaps it's more palatable.

Thinking that way, all the consequences of the PER semantics are like admissible rules, and can be added to the formal system if they're useful. But it still seems like a good idea to try and find a stable formal system with enough rules that incompleteness is not a problem in practice.

This raises questions though: If the formal rules of a Nuprl-style system are considered admissible, what defines the system? What are the mathematical models of Nuprl-style systems? If they're considered unnatural, should Nuprl-style systems be modified?

In my (Matt Oliveri's) opinion, Nuprl-style systems are potentially relevant and useful to mathematics, but it's not currently clear exactly how that might work.

### Loose ends

Now that we've covered the issue that the distinction between derivable and admissible doesn't really matter for this system, we can get to explaining particular aspects that may seem to be in particular need of an explanation.

#### Equality uses respect which uses equality

The equality formation rule refers to the respect ("$\prec$") relation. The latter is not primitive, it's defined in terms of equality. Is that OK? Yes: Because of the rule that all types respect $Comp$, we get enough instances of equality formation to prove:

$$\frac{\Gamma \vdash A\,type \qquad \Gamma \vdash B\,type}
{\Gamma \vdash A \prec B\;type}$$

If it still seems suspiciously circular, rest assured that in the semantics, respecting computational equivalence is more basic than anything in the type system. The rule about respecting $Comp$ just exposes the fact internally.

Because every type respects itself, we get all the instances of equality formation from [[Martin-Löf type theory]]. Equality types beyond that are for reasoning about membership.

#### Usual Pi-intro rule {#UsuPiIn}

Taking function extensionality to be $\Pi$ intro seems odd. Not only is it not about lambdas, it's not apparently about elements at all; just equality. That's (one place) where the selectivity rules are handy. The function extensionality rule is strong enough to combine with selectivity (and reflexivity) to derive elements of function type. A term is a function when you can apply it to an argument to get a result:

$$\frac{\Gamma \vdash A\,type \qquad
\Gamma,x:A \vdash f\,x \Vdash B \qquad x \notin FV(f)}
{\Gamma \vdash f \Vdash \Pi x:A.B}$$

Proving that lambdas are functions additionally uses beta conversion. Lambdas are functions, not by fiat, but because they produce results when applied.

Note that not all functions are denoted by lambdas. At the very least, the empty function is denoted by any term you like. That is, a function type with empty domain has the same PER as $\top$. However, any function is equal to a lambda, when considered only as a function. Formally, we have

$$\Gamma,f:\Pi x:A.B \vdash f = (\lambda x.f\,x) \in \Pi x:A.B$$

as well as (the weaker)

$$\Gamma,f:Comp,Hf:f \in \Pi x:A.B \vdash f = (\lambda x.f\,x) \in \Pi x:A.B$$

but not

$$\Gamma,f:Comp,Hf:f \in \Pi x:A.B \vdash f = (\lambda x.f\,x) \in Comp$$

.

#### Congruence rules

With such a small set of type constructors, it may be hard to tell, but congruence rules are rarely needed as primitives. Beta conversion was already defined as an untyped congruence closure, and for typed equality, the subsumptive rewrite rule does most of the work of congruence rules. The extensionality rules for $\Pi$ and $\cap$ are needed to help with binders and (our ersatz) hidden assumptions. That may turn out to handle everything, with this judgmental setup.

## Semantic Judgmental Reflection

### Equality reflection

With many type theories $T$, it's cumbersome but straightforward to define collections of the formal derivations of $T$ as type families in $T$. This provides a form of *syntactic* reflection of a system's judgments within itself. [[provability logic|There]] [[modal type theory|are]] [[higher-order abstract syntax|ways]] of making syntactic reflection more convenient and/or powerful.

But Nuprl-style systems provide a quite different kind of judgmental reflection that we'll call "*semantic* judgmental reflection", or just "judgmental reflection" for short. The original example of judgmental reflection, and the basis of the name, is the equality reflection rule of extensional type theory (ETT), which makes the "identity" type family a reflection of the meaning of the element equality judgment of the same system. In a sense, this is still the only judgmental reflection principle in Nuprl-style systems. (But the type family is called "equality".) The difference is in the interpretation of the equality judgment.

There are two styles of interpretation for ETT: [[intrinsic and extrinsic views of typing|intrinsic and extrinsic]]. Extrinsic is the original, since an example is Martin-Löf's [[meaning explanation]], which was the original justification for equality reflection. Intrinsic seems to have become the default one. It's the style considered in [Martin Hofmann's thesis](#HofmannThesis), for example. But Nuprl and CLF commit to the extrinsic style.

An irony is that by considering terms extrinsically typed, you consider them intrinsically meaningful. In Nuprl and CLF, following Martin-Löf, terms have an intrinsic computational meaning. The role of the Nuprl-style type system is to reason about that. (Remember: this can all be considered a [substitute for admissible rules](#AdmissSem)! ...Probably.)

There is actually no interpretation necessary, for terms in general. The type system can be layered over the terms as they are, making use of an operational model of their computational meaning. (A denotational semantics would probably work too.) The details need not concern us here, but some things are important:

* Computational meaning pertains principally to closed terms, because free variables don't compute; they're just placeholders.
* Some closed terms are designated as types, and denote PERs on closed terms.
* For closed terms and types, the equality judgment form ($t = t' \in T$) just accesses the PER of the type.
* For closed terms and types, the judgment of being an element of a type ($t \in T$) is a special case of equality.
* It's the judgments about closed terms that are reflected as closed types; judgments about open terms are not involved.

All of these points are important to the design of a Nuprl-style system. But the one that seems to distinguish the approach from intrinsic typing is that being an element is a special case of equality. In the intrinsic approach, equality is only meaningful when applied to two terms known to have the same type. So being an element must be somehow prior to equality. But with the judgment of being an element as a special case of equality, it's simultaneous.

A lot of the power of judgmental reflection is that it *can* be understood as reasoning about the computational content of the language as it actually is. But since it's probably not *necessary* to interpret Nuprl-style systems as being about their own syntax, we should speak of "computations", not "closed terms". In CLF, however they're interpreted, computations are axiomatized as the elements of $Comp$. (And actually, it may be that types need not be computations.) Types are PERs on $Comp$, and are accessed by the equality judgment form, which is reflected by the equality type constructor. So you use equality types to reason about equality in types, and also membership of computations in types.

### Equality of Open terms {#OpenEq}

So then what's with all this respect ("$\prec$") stuff in the equality formation rule? If terms have an intrinsic computational meaning, and equality reasons about it, shouldn't the rule be just:

$$\frac{\Gamma \vdash T\,type}{\Gamma \vdash t1 = t2 \in T\,type}$$

?

No, that doesn't work. The extra complexity has to do with making the axiomatization work for open terms. Consider the type $I\;\coloneqq\;\{x = y | x \in Bool \wedge y \in Bool\}$. Then $tru = fls \in I$. But then consider ($x:I \vdash tru = x \in Bool\,type$). The simple formation rule would derive it, but it doesn't make sense, because ($tru = tru \in Bool$) and ($tru = fls \in Bool$) are different types, although $tru$ and $fls$ are the same $I$. The problem is that equality of types and elements is generally different from equality of computations, and we want well-typed open terms to respect equality of elements. The respect-based equality formation rule doesn't derive the bad type family because you'd need to find some type $T$ such that ($x:I \vdash x \Vdash T$) and ($T \prec Bool$). But if ($x:I \vdash x \Vdash T$), then $T$ considers $tru$ and $fls$ equal, while if ($T \prec Bool$), then it doesn't.

That variables and other open terms cannot generally be treated as computations is the sense in which variables are intrinsically typed: although elements are all realized by computations, an arbitrary element generally cannot be used as a computation, so reasoning about membership is constrained.

### Other semantic judgments

Based on the ability to reason about membership, in addition to equality, other types can be defined that seem like semantic judgments. For example, $\prec$, $\subseteq$, $\lt\!\!:$, and $\sqsubseteq$ were [defined above](#SemJudg). But what kinds of things are these semantic judgments in general?

A lenient answer is that semantic judgments are type (families) $J$ such that any two elements of $J$ are equal ($J$ is a subsingleton), and ($\lfloor J \rfloor \to J$) is inhabited. That is, the squash-stable subsingletons. All such types are isomorphic to equality types, and are the [[regular subobjects]], if you consider a Nuprl-style system as a category. (In a [[relation between type theory and category theory#DependentTypeTheory|manner analogous to ETT]], using inhabitedness of equality types to determine equality of morphisms.)

A stricter definition of semantic judgments is that they are type (families) $J$ such that ($\lfloor J \rfloor \lt\!\!:\;J$). Types formed with equality, squash itself, $\prec$, $\subseteq$, $\lt\!\!:$, and $\sqsubseteq$ are always judgments in this strict sense. These types are extensionally equal to equality types (for example, this one: $(\lambda x.x) \in J$) in the following sense:

$A \approx B\;\coloneqq\;A \lt\!\!:\;B \wedge B \lt\!\!:\;A$

This definition of extensional equality is motivated by the "subsumption" (derived) rule:

$$\frac{\Gamma \vdash t \Vdash A \qquad
\Gamma \vdash A \lt\!\!:\;B}
{\Gamma \vdash t \Vdash B}$$

So $\approx$ gives us subsumptions in both directions. Extensionally equal types denote the same PER.

Thus, the semantic judgments in the strict sense are regular subobjects defined in a convenient way so that they're inhabited if and only if they're basically $\top$. $\approx$ is itself a semantic judgment. Also:

$(A \approx B) \approx (A \sqsubseteq B \wedge B \sqsubseteq A)$

However, ($A \subseteq B \wedge B \subseteq A$) is generally weaker. For example, $\top$ and $Comp$ have the same members (computations) but are not extensionally equal, or even isomorphic.

## Constructive Propositions

We define [[propositional truncation]] as quotienting a type down to a subsingleton:

$\lceil A \rceil \coloneqq \{x = y | x \in A \wedge y \in A\}$

Unlike the squash of a type ($\lfloor A \rfloor$), $\lceil A \rceil$ has the same set of computations as $A$. So from a computational perspective, a member of $\lceil A \rceil$ is just as useful as a member of $A$. But well-typed computations using a member of $\lceil A \rceil$ are not allowed to depend on the identity of the member. So for example, a map $\lceil A \rceil \to B$ is a map $f\,:\,A \to B$ such that for all $a,a':A$, $f a = f a' \in B$. So a map out of $\lceil A \rceil$ is constant, but that's still more permissive than a map out of $\lfloor A \rfloor$, which doesn't have access to a member of $A$.

Let

* $\not A \coloneqq A \to \bot$
* $dec A \coloneqq \{b:Bool | ((b = tru \in Bool) \to A) \wedge ((b = fls \in Bool) \to \not A)\}$

By non-contradiction, $dec A$ is a subsingleton, so $\lceil dec A \rceil \approx dec A$. The member of $dec A$, if you can get ahold of it, tells you whether $A$ is inhabited. On the other hand, a member of $\lfloor dec A\rfloor$ tells you nothing: its existence means that $A$ is either inhabited or not, but you still don't know which. A member of $\not \not (dec A)$ also tells you nothing, and even its existence is uninformative: you can prove $\not \not (dec A)$ yourself, without knowing anything about $A$.

There are implications $\lceil A \rceil \to \lfloor A \rfloor$ and $\lfloor A \rfloor \to \not \not A$, going from more useful subsingletons to less useful subsingletons. There generally aren't implications going in the other direction. You can sort of think of $\lceil A \rceil$, $\lfloor A \rfloor$, and $\not \not A$ as truncating down to [[proof relevance|constructive]], [[constructive mathematics|intuitionistic]], and [[classical logic|classical]] propositions, respectively. Here, the distinction between "constructive" and "intuitionistic" is that constructive logic is explicitly computational, whereas intuitionistic logic merely declines to assume anti-computational principles, like [[excluded middle]]. (So for example, [[constructive set theory]] is merely intuitionistic by this terminology, though it has constructive models.) (None of this has to do with [[intuitionism]].)

It should be consistent to add the rule:

$$\frac{\Gamma \vdash A\,type}{\Gamma \vdash p \Vdash (\not \not A) \to \lfloor A \rfloor}$$

This makes the semantic judgments classical, rather than intuitionistic. Constructive propositions remain constructive, and [[canonicity]] is not affected.

In contrast, having $\not \not A$ imply $\lceil A \rceil$ is not known to be consistent, and it ruins canonicity. (It's quite possible that it's consistent with the current rules, but this is pure luck. In full Nuprl, the same implication is probably false, due to "partial" types.)

## Short-Circuiting connectives {#ShortCirc}

Due to the [lack of strengthening](#StructRules), a funny thing happens when we consider the non-dependent special case of dependent connectives. Consider conjunction ($\wedge$), which we defined as a special case of subset:

$A \wedge B \coloneqq \{\underline{\;}:A | B\}$

From the formation rule for subset, we derive the following formation rule for conjunction:

$$\frac{\Gamma \vdash A\,type \qquad \Gamma,\underline{\;}:A \vdash B\,type}
{\Gamma \vdash A \wedge B\,type}$$

That is:

$$\frac{\Gamma \vdash A\,type \qquad
\Gamma,x:A \vdash B\,type \qquad x \notin FV(B)}
{\Gamma \vdash A \wedge B\,type}\;(\wedge intro1)$$

With strengthening, this would be basically the same as:

$$\frac{\Gamma \vdash A\,type \qquad \Gamma \vdash B\,type}
{\Gamma \vdash A \wedge B\,type}\;(\wedge intro2)$$

But without being able to strengthen the premises of $(\wedge intro1)$ to those of $(\wedge intro2)$, $(\wedge intro1)$ itself is generally *stronger* than $(\wedge intro2)$. Specifically, $B$ only needs to be a type if $A$ is inhabited. So $\wedge$ is a *short-circuiting* conjunction, kind of like the `&&` boolean operator from many programming languages, where the right conjunct need only be able to return a boolean when the left conjunct is true. (Because that's the only case in which it's evaluated.)

Implication is similarly short-circuiting, like a conditional expression from a programming language:

$$\frac{\Gamma \vdash A\,type \qquad \Gamma,\underline{\;}:A \vdash B\,type}
{\Gamma \vdash A \to B\,type}$$

Short-circuiting disjunction doesn't seem natural for types; what is a dependent [[coproduct]]? But if the left disjunct is a $Bool$, there's always ($(a = fls \in Bool) \to B$). $B$ only needs to be a type if $a$ is $fls$. Given an element of ($(a = fls \in Bool) \to B$), by branching on $a$, we get either ($a = tru \in Bool$) or $B$.

## More admissible/derived rules

### Bool eliminations

Combining ($Bool \lt\!\!:\;\Comp$) with the primitive elimination rule for $Bool$, you get this alternative elimination rule, where the motive is a family on $Comp$:

$$\frac{\Gamma,x:Comp \vdash C\,type \qquad
\Gamma \vdash c \Vdash C[tru/x] \qquad
\Gamma \vdash c \Vdash C[fls/x] \qquad
\Gamma \vdash b \Vdash Bool}
{\Gamma \vdash c \Vdash C[b/x]}$$

Curiously, you can go in the other direction too, and get both of the original rules from this one.

To get the usual elimination rule, prove that Church booleans are self-eliminating functions:

$$\frac{\Gamma,x:Bool \vdash C\,type \qquad
\Gamma \vdash b \Vdash Bool}
{\Gamma \vdash b \Vdash C[tru/x] \to C[fls/x] \to C[b/x]}$$

This is reasoning about membership, so we really do want to know that $Bool$s are $Comp$s. The usual elimination rule then just applies $b$ at that function type.

In Nuprl, it's often possible to get induction rules without a premise showing that the motive is a valid family. The idea is that for sufficiently concrete types, validity of the motive can be proven pointwise, and moreover the cases of this proof are actually implied by the cases of the main induction.

In the current CLF rules though, it doesn't seem possible to derive such rules. Also, including such strengthened induction rules as primitive doesn't seem compatible with the [current hybrid approach](#AdmissSem) based on admissible formal rules: the sanity check would require an unusual type validity rule, which would ruin the inversion lemma. Basically the Nuprl-style justification for omitting the motive premise is "too semantic" for the current hybrid approach.

### Fun with subsets

### Subtyping

Subtyping variance rules should be derivable for the type constructors. Here are some for the primitive type constructors:

$$\frac{\begin{array}{l}
\Gamma \vdash A\,type \qquad \Gamma,x:A \vdash B\,type \\
\Gamma \vdash A' \lt\!\!:\;A \qquad
\Gamma,x:A' \vdash B \lt\!\!:\;B'
\end{array}}
{\Gamma \vdash (\Pi x:A.B) \lt\!\!:\;(\Pi x:A'.B')}$$

Yes, contravariance for function domains. A difference from subsetting in [[material set theory]]. Family intersections are completely analogous:

$$\frac{\begin{array}{l}
\Gamma \vdash A\,type \qquad \Gamma,x:A \vdash B\,type \\
\Gamma \vdash A' \lt\!\!:\;A \qquad
\Gamma,x:A' \vdash B \lt\!\!:\;B'
\end{array}}
{\Gamma \vdash (\cap x:A.B) \lt\!\!:\;(\cap x:A'.B')}$$

Subset is covariant in both positions:

$$\frac{\begin{array}{l}
\Gamma,x:A' \vdash B'\,type \\
\Gamma \vdash A \lt\!\!:\;A' \qquad
\Gamma,x:A \vdash B \lt\!\!:\;B'
\end{array}}
{\Gamma \vdash \{x:A | B\} \lt\!\!:\;\{x:A' | B'\}}$$

This rule can be strengthened, since $B$ is proof irrelevant:

$$\frac{\begin{array}{l}
\Gamma,x:A' \vdash B'\,type \\
\Gamma \vdash A \lt\!\!:\;A' \qquad
\Gamma,x:A \vdash m \Vdash B \to B'
\end{array}}
{\Gamma \vdash \{x:A | B\} \lt\!\!:\;\{x:A' | B'\}}$$

The intersection rule can be strengthened too, since the "argument" is irrelevant, but it's not as pretty, because the type dependency is *not* irrelevant:

$$\frac{\begin{array}{l}
\Gamma \vdash A\,type \qquad \Gamma,x:A \vdash B\,type \\
\Gamma \vdash m \Vdash A' \to A \qquad
\Gamma,x:A' \vdash B[m\,x/x] \lt\!\!:\;B'
\end{array}}
{\Gamma \vdash (\cap x:A.B) \lt\!\!:\;(\cap x:A'.B')}$$

## PER theory {#PERtheory}

We have [seen](#UsuPiIn) that in CLF (as in Nuprl) whether two terms are equal depends on what type we compare them at, and that we [need to care](#OpenEq) about whether one type respects ($\prec$) another's equality. This gives rise to three different ($\subseteq$) basic ($\lt\!\!:$) preorders ($\sqsubseteq$) on types, whereas [[material set theory]] has just one. What does all this extra complexity buy us?

Very roughly, it buys us the ability to reason directly using realizers, rather than some other system of terms that denote mathematical objects that are realizable. Intuitively, the realizers are elements of $Comp$, and are fairly intensional compared to most types of mathematical object. But the terms are still written as realizers, no matter the type.

More specifically, it's an aspect of how quotients work that seems to be the root cause of the difference between set theory and "PER theory". PER semantics provides *refinement-style quotients*: there are no operations needed for mapping into or out of quotients. Quotienting has zero overhead in terms, since terms are realizers, and computationally, quotients don't change anything. It's up to the semantics of the type system to make quotient types work correctly anyway.

Eventually, general subquotients should be definable in CLF as:

$\{x = y:T | R\} \coloneqq \{x = y | x \in T \wedge y \in T \wedge R\}$

(Of course, this definition can already be written, but it doesn't currently seem to have all the desired properties, due to missing rules.)

This is using the [short-circuiting](#ShortCirc) behavior of conjunction to allow deriving a formation rule something like:

$$\frac{\begin{array}{l}\Gamma \vdash T\,type \qquad \Gamma,x1:T,x2:T \vdash R\,type \\
\Gamma,y1:T,y2:T \vdash s \Vdash R[y1,y2/x1,x2] \to R[y2,y1/x1,x2] \\
\Gamma,y1:T,y2:T,y3:T \vdash t \Vdash R[y1,y2/x1,x2] \to R[y2,y3/x1,x2] \to R[y1,y3/x1,x2]\end{array}}
{\Gamma \vdash \{x1 = x2:T | R\}\,type}$$

So we expect $R$ be a family on a pair of $T$s, which means that $T$ equality is respected in $R$, and therefore in $\{x = y:T | R\}$. And by definition, a member of $\{x = y:T | R\}$ is a member of $T$. That is, ($T \prec \{x = y:T | R\}$) and ($\{x = y:T | R\} \subseteq T$), so therefore ($\{x = y:T | R\} \sqsubseteq T$).

In case $R$ is also reflexive for members of $T$: ($\Gamma,y:T \vdash r \Vdash R[y,y/x1,x2]$), then we also have ($T \subseteq \{x = y:T | R\}$). Combining with respect, we get ($T \lt\!\!:\;\{x = y:T | R\}$). In this case $\{x = y:T | R\}$ is a (full) quotient of $T$, and ($\lambda x.x$) realizes the quotient *projection* mapping from $T$ to $\{x = y:T | R\}$.

Taking stock, with $R$ a [[regular and exact completions#TheExLexCompletion|pseudo-equivalence relation]] on $T$, we have:

* $\{x = y:T | R\} \subseteq T$
* $T \subseteq \{x = y:T | R\}$
* $T \prec \{x = y:T | R\}$
* $\{x = y:T | R\} \sqsubseteq T$
* $T \lt\!\!:\;\{x = y:T | R\}$

Since we have member inclusion in both directions, according to set theory, this "quotient" of $T$ is not actually any different from $T$. But to PER theory, it's the same set of realizers, but with a possibly coarser equality. We can see the difference with our old friend, $I \equiv \lceil Bool \rceil \approx \{x = y:Bool | \top\}$. $I$ is a singleton, but $Bool$ is not.

In set theory, the intuition behind quotients is that a quotient of $S$ is a set of equivalence classes of members of $S$. So $S$ and its quotient generally have different members. The effect on equality is a consequence of [[axiom of extensionality|set extensionality]]. With PERs, this intuition is superficially contradicted by the semantic judgments, so it should be used with care, or not at all.

In programming, programmers informally use quotients, probably mostly without realizing it. For example, when using hash tables to implement finite maps, the representation has extra implementation details like the number of buckets, and the assignment of keys to buckets. Any meaningful results given to the user should not depend on this information. That doesn't mean that the computation of the results should not depend on it, but that the results should not vary due to changes in implementation details. Programmers know that, so they effectively treat hash tables as quotient types where implementation details have been modded out. And no operations on equivalence classes of hash tables will be found in the program; programming languages provide no such thing. So the programmer's quotient is not the set theoretic quotient construction, it's the refinement-style quotient codified by PER theory.

(What seems to be missing from the current rules is a way to prove that you can map out of a quotient by mapping out of the base type in a way that respects the equivalence relation. For example, to allow using a hash table correctly by proving that only implementation details of the result vary with implementation details of the hash table.)

However, for many purposes, it may be a net improvement to give up on refinement-style quotients in order to get the simplicity of set theory. Refinement-style quotients seem particularly [well suited](#QIIF) to CLF's use as a metalogic, though.

## CLF and Logical Frameworks {#CLFasLF}

[[logical framework|Logical frameworks]] provide a formal notation for languages. (Especially languages that support logical deduction.) The kind of logical framework CLF aims to provide is one that represents dependent type systems using HOAS signatures.

The logical framework "[[LF]]" uses HOAS, and can already represent seemingly any language, including dependent type systems. But the issue is not only whether a language can be represented at all, but how "deep" the encoding is. With a *shallow* encoding, the framework representation of encoded expressions of the language is close to a custom representation tailored to that language. With a *deep* encoding, a lot of overhead is introduced by the encoding, making the framework representation much less convenient than a custom one.

LF's use of HOAS makes the encoding of many languages shallower, but only works for languages that can be expressed using [[natural deduction|natural-deduction]]-style rules. (That includes the degenerate case of languages with no binding forms. That is, [[combinatory logic|combinator]] languages.) So to encode [[substructural logic|substructural]] languages, for example, evidence of substructural variable use needs to be handled explicitly, unlike with a custom representation.

There are two styles of HOAS-based encoding associated with LF, called "synthetic" and "analytic". (See the [[logical framework]] page.) Synthetic is a deeper style of encoding than analytic, but analytic only works for languages where type equality is just [[alpha equivalence]].

The formal description of a language in LF and similar logical frameworks is called a "signature", since it's similar to a [[signature (in logic)|signature]] for some fixed logic.

### Martin-Löf's Logical Framework

To see how equality reflection is useful for a logical framework, we will propose an extension of LF, called "LF=" (LF with equality), that combines the shallowness of LF's analytic encoding with more of the flexibility of LF's synthetic encoding. (But in LF=, the encoding is generally not analytic, in the sense of algorithmic judgments. That's the catch.) But first, it's instructive to cover analytic encoding in Martin-Löf's logical framework ("MLLF").

Unlike LF, MLLF doesn't have a fixed judgmental equality. Term formers are specified in roughly the same intrinsically typed way as with the analytic encoding for LF. But meanwhile, judgmental equality rules for the object language are added by adding corresponding judgmental equality rules to the framework. Thus, MLLF can shallowly encode many type systems with analytic judgments, not just the ones where type equality is very simple, like with LF. MLLF is particularly well suited to specifying variants of Martin-Löf type theory.

MLLF is defined and discussed in Martin-Löf's [Analytic and Synthetic Judgements in Type Theory](#AnaSynJudg) and in part III of [Programming in Martin-Löf's Type Theory](#ProgMLTT). The former reference also discusses the notions of analytic and synthetic judgment, while the latter makes it perhaps clearer how the "theory of types" is intended to be used as a logical framework. Martin-Löf's main theory of mathematical collections is the "theory of sets", which is specified using the logical framework.

There are tools that provide a style of language specification very similar to MLLF. [Dedukti](https://deducteam.github.io/) implements a logical framework similar to LF, but signatures can also include typed rewrite rules that extend judgmental equality. There's an [Agda feature](#AgdaJudgRewr16) that allows proven or hypothesized equations to be declared as rewrites that extend judgmental equality. This can presumably be combined with axioms to imitate Dedukti signatures, and quite possibly more.

These tools are designed under the assumption that, while open-ended, judgmental equality remains analytic. That is, it's something that you can sanely just check automatically. (Or so the story goes.) Trying to add extensional type theory's equality reflection rule to a rewrite engine is not going to work. It generally won't have a good way to solve the premise that proves the equation. (Either the system will give up, or do something useless.)

The equality reflection rule is enough to make the judgments synthetic. That is, something you generally have to prove. To handle type systems with synthetic judgments, you either need to use a synthetic encoding (for example, in LF or Isabelle), or use a tool designed to handle synthetic judgments, like Nuprl, [MetaPRL](http://metaprl.org/), [Andromeda](#Andromeda), or (eventually, hopefully) CLF.

### LF= {#LFEq}

Like LF, and unlike MLLF, LF= has a fixed judgmental equality. Unlike either LF or MLLF, this judgmental equality is synthetic, because LF= has equality reflection. (LF=’s typing judgment form is synthetic as well, for the usual reason that it makes use of judgmental equality.)

LF= is LF plus a reflective equality type constructor. (Combined with LF's eta equality for function types, this gets function extensionality.) But still no equality kinds. LF is often formulated such that only canonical forms (beta normal, eta long) are well typed. This probably does not work for LF=; use your favorite way of formulating extensional type theory. (The details don't matter here, since I'm going to propose CLF as a generalization of LF=.)

To encode an intrinsically typed language in LF=, you can declare intrinsically typed constants/axioms in LF=, much like LF's analytic encoding:

    tp : Type
    el : tp -> Type

    Pi : {A:tp} (el A -> tp) -> tp
    lam : {A:tp} {B:el A->tp} ({a:el A} el (B a)) -> el (Pi A B)
    app : {A:tp} {B:el A->tp} el (Pi A B) -> {a:el A} el (B a)

Like in MLLF, the object language's judgmental equality is identified with the framework's judgmental equality. This means you don't need to encode congruence rules. Interesting equality rules are encoded by assuming an equation:

    pi_beta : {A:tp} {B:el A->tp} {b:{a:el A} el (B a)} {a:el A} app A B (lam A B b) a = b a
    pi_eta : {A:tp} {B:el A->tp} {f:el (Pi A B)} f = lam A B ([a] app A B f a)

Unlike MLLF, these axioms are just additional constants; there is no restriction other than that they be well typed declarations in LF=. Although these equations are just constants, by using equality reflection to use them, no coercions appear in the terms. If using LF= equations added a coercion to the term, LF= equality would not be an adequate representation of judgmental equality. (The adequacy of reflective equality is inspired by [Andromeda](#Andromeda).)

For an example of why using equality reflection in the framework doesn't automatically make the object language extensional, we will cover the non-derivability of ($n:nat,m:nat \vdash n + m \equiv m + n\;:\;nat$) in intensional type theory. So we add natural numbers:

    nat : tp

    zro : el nat
    suc : el nat -> el nat

    natrec : ...

    natrec_zro : ...
    natrec_suc : ...

`natrec` should be the dependent elimination form for the inductive type of natural numbers. `natrec_zro` and `natrec_suc` are its defining equations.

We can then define—in the metalanguage—a derived form

    plus : el nat -> el nat -> el nat

using `natrec`. We will write (`plus n m`) as (`n + m`).

The judgment ($n:nat,m:nat \vdash n + m \equiv m + n\;:\;nat$) is represented as (`{n:el nat} {m:el nat} n + m = m + n`). There is "obviously" no LF= term of that type, since there's no induction principle for the LF= type `el nat`, and the only interesting equations about `el nat` don't apply for a general element. The object language has `natrec` as an induction principle, but that only works for proving object language types, not LF= equality.

Of course, if we add reflective equality to the *object language*, then we should be able to combine `natrec` and the object language's equality reflection to prove the LF= equation. Here is a reflective equality type constructor:

    eq : {T:tp} el T -> el T -> tp
    eqI : {T:tp} {t:el T} el (eq T t t)
    eqE : {T:tp} {t1 t2:el T} el (eq T t1 t2) -> t1 = t2
    eqK : {T:tp} {t:el T} {p:el (eq T t t)} p = eqI T t

`eqE` is the equality reflection rule for the object language. Note that there's no trouble declaring this constant. It's just another judgmental equality rule for the object language. LF= was prepared all along for equality requiring proof. On the other hand, that means that it requires *boring* proof in the common case that it's obvious. So an implementation of LF= would have a practical need for proof automation, to effect type checking of the object language.

Part of the rationale behind CLF—and seemingly many other type system implementations based on synthetic judgments—is that there's no *implementation* reason to distinguish type checking from other forms of proof automation. That type checking really is just automatic "proving" of judgments.

On the other hand, if you insist upon decidable type checking, that would be a reason to distinguish type checking from general proof automation. Implementers of synthetic type systems seem united in not considering decidability an important property of type checking.

### LF Signatures as Inductive-Inductive Families

LF, MLLF, and LF= are all specialized, weak languages, wherein the object language is specified as a list of assumptions. CLF is not. Although it's still fairly weak, it's supposed to be strong enough to actually prove stuff. In CLF, the object language is defined as some number of mutually [[inductive-inductive type|inductive-inductive families]].

Declared LF type families correspond to CLF inductive type family definitions. The declared element formers for declared LF families correspond to the constructors of the CLF inductive families. Since multiple families can be declared in LF prior to declaring elements, the CLF inductive families are mutually defined, in general. And since there can also be type dependencies between the families, induction-induction is generally necessary.

LF signatures are not ordinary inductive-inductive families. Although the constructors can take functions as arguments, this does not denote an infinitary constructor, as found in [[W-types]]. Instead, a constructor applied to a function argument denotes an expression with a [[bound variable|binding]] subexpression. This is the HOAS interpretation of function types: applying a function just substitutes into an open expression. Since binding and substitution are rather tame notions from formal syntax, there are no restrictions on recurrences in the inductive definition. For example, a recurrence is allowed in the domain of a function type, unlike with infinitary [[inductive types]].

HOAS should be used in CLF too. But unlike LF, this doesn't involve function types, since CLF's maps out of an inductive definition allow case analysis, which would not be an adequate representation of binding subexpressions. Instead, lambdas from $Comp$ can be used as the representation of binding subexpressions. In the family definitions, free variables will presumably be kept track of explicitly, as usual for an inductive definition of a formal system. It should be possible to develop some generic definition of the families, for some broad type of signature codes. (It should include at least all LF= signatures. See below.)

In other words, in CLF, the HOAS interpretation of signatures should be definable; it's not just part of the metatheory. This should allow CLF to serve as both a logical framework, and a metalanguage for reasoning about derivability. With sufficient proof automation, reasoning about derivability allows the convenient use of object languages. The shallowness of the encoding avoids much of the notational inconvenience and computational overhead usually present when reasoning via a metalanguage definition.

### Quotient-Inductive-Inductive Families as Refinements {#QIIF}

The addition of reflective equality types to LF= has the consequence that LF= signatures correspond to quotient inductive-inductive families, not just plain inductive-inductive families. The declarations concluding with an equality type correspond to equality constructors.

In CLF, quotienting is actually needed just to define inductive-inductive families, since lambdas in $Comp$ don't already satisfy the eta conversion rule of LF's function type. So in principle, supporting quotient inductive-inductive families should be a straightforward modification to the construction. Due to the use of [refinement-style quotients](#PERtheory), quotienting the inductive-inductive families doesn't make the encoding any deeper.

## References

* {#AnandRahliITP14} Abhishek Anand, Vincent Rahli, _Towards a Formally Verified Proof Assistant_, Interactive Theorem Proving (ITP) 2014 ([project web](http://www.nuprl.org/html/Nuprl2Coq/), [paper web](http://www.nuprl.org/KB/show.php?ID=726), [pdf](http://www.nuprl.org/documents/Anand/TowardsAFormallyVerifiedProofAssistant.pdf))

* {#PERTypes14} Abhishek Anand, Mark Bickford, [[Robert Constable|Robert L. Constable]], Vincent Rahli, _A Type Theory with Partial Equivalence Relations as Types_, Types for Proofs and Programs (TYPES) 2014 ([slides](https://vrahli.github.io/articles/slides-per-types.pdf), [web](http://www.nuprl.org/KB/show.php?ID=722), [pdf](http://www.nuprl.org/documents/Anand/ATypeTheoryWithPartialEquivalenceRelationsAsTypes.pdf))

* {#HofmannThesis} [[Martin Hofmann]], _Extensional concepts in intensional type theory_, Ph.D. dissertation, University of Edinburgh (1995). ([link](http://www.lfcs.inf.ed.ac.uk/reports/95/ECS-LFCS-95-327/))

* {#SterlingHarperRefinement} [[Jonathan Sterling]], [[Robert Harper]], _Algebraic Foundations of Proof Refinement_, 2017 ([arXiv](https://arxiv.org/abs/1703.05215))

* {#Andromeda} [[Andrej Bauer]], Gaëtan Gilbert, Philipp G. Haselwarter, [[Matija Pretnar]], Christopher A. Stone, _Design and Implementation of the Andromeda Proof Assistant_, 2018 ([arXiv](https://arxiv.org/abs/1802.06217v1), [project web](http://www.andromeda-prover.org/))

* {#AnaSynJudg} [[Per Martin-Löf]], _Analytic and Synthetic Judgments in Type Theory_, 1994 ([pdf](http://archive-pml.github.io/martin-lof/pdfs/Martin-Lof-Analytic-and-Synthetic-Judgements-in-Type-Theory.pdf))

* {#ProgMLTT} Bengt Nordström, Kent Petersson, Jan M. Smith, _Programming in Martin-Löf's Type Theory_, Oxford University Press (1990) ([web](http://www.cse.chalmers.se/research/group/logic/book/))

* {#AgdaJudgRewr16} Jesper Cockx, Andreas Abel, _Sprinkles of extensionality for your vanilla type theory_, Types for Proofs and Programs (TYPES) 2016 ([pdf](http://www.cse.chalmers.se/~abela/types16-cockx.pdf))


CompLF v0

#Contents#
* table of contents
{:toc}

## Idea

This is the definition of the original [[CompLF]] formal system, version zero, without as much English getting in the way.

## Syntax

### Term grammar

The main [[syntax|syntactic]] class is [[terms]]. [[type|Type]] expressions are terms. There are also [[variables]] and [[contexts]].

variables ($x$, $y$, ...)` ::= `(Written as usual. Complain if you can't tell them apart from metavariables.)

terms ($t$, $a$, $b$, $f$, $T$, $A$, $B$, $R$, ...)` ::=`

* $x \qquad$ (variable reference)
* $\lambda x.b \qquad$ (lambda abstraction)
* $f\,a \qquad$ (application)

* $a = b \in C \qquad$ (equality type)
* $\Pi x:A.B \qquad$ (dependent function type)
* $\cap x:A.B \qquad$ (family intersection type)
* $Comp \qquad$ (type of computations ([[realizers]]))
* $\{x:A | B\} \qquad$ (subset/separation type)
* $\{x = y | R\} \qquad$ ([[PER]] comprehension type)
* $Bool \qquad$ (type of "booleans") (two-element type)

To be added: an infinite type.

contexts ($\Gamma$, ...)` ::= `$\cdot$` | `$\Gamma,x:T$

As usual, the rules may make liberal use of informal list operations to work with contexts.

### Judgment forms

$a \equiv_\beta b \qquad$ (beta conversion)

The only [[beta reduction]] is $(\lambda x.b)\,a \longrightarrow_\beta b[a/x]$. Conversion is the congruence closure.

The other [[judgment]] forms will be defined [[induction|inductively]] by the rules below. They are:

$\Gamma \vdash T\,type \qquad$ (type validity)

$\Gamma \vdash t \Vdash T \qquad$ (element in a type) (realizer of a type)

### Abbreviations

#### Semantic Judgment Forms {#SemJudg}

$a \in A\;\coloneqq\;a = a \in A$

$A \to B\;\coloneqq\;\Pi \underline{\;}:A.B$

$A \wedge B\;\coloneqq\;\{\underline{\;}:A | B\}$

"$A$ equality is respected in $B$.":

$A \prec B\;\coloneqq\;\Pi t:Comp.\Pi t':Comp.
(t \in B)\to(t = t' \in A)\to(t = t' \in B)$

"$A$ members are included in $B$.":

$A \subseteq B\;\coloneqq\;\Pi t:Comp.(t \in A)\to(t \in B)$

"$A$ is a subtype of $B$.":

$A \lt\!\!:\;B\;\coloneqq\;(\lambda x.x) \in (A \to B)$

"$A$ is a refinement/[[subquotient]] of $B$.":

$A \sqsubseteq B\;\coloneqq\;A \subseteq B \wedge B \prec A$

#### Computations

The Church booleans:

$tru\;\coloneqq\;\lambda t.\lambda f.t$

$fls\;\coloneqq\;\lambda t.\lambda f.f$

#### Type constructors

$\top\;\coloneqq\;tru = tru \in Bool$

$\bot\;\coloneqq\;tru = fls \in Bool$

"Squash" of $A$:

$\lfloor A \rfloor\;\coloneqq\;\{\underline{\;}:\top | A\}$

## Rules {#Rules}

### Type Formation

$$\begin{gathered}
\frac{\Gamma \vdash p \Vdash A \prec C \qquad
\Gamma \vdash q \Vdash B \prec C \qquad
\Gamma \vdash a \Vdash A \qquad \Gamma \vdash b \Vdash B}
{\Gamma \vdash a = b \in C\,type} \\
\\
\frac{\Gamma \vdash A\,type \qquad \Gamma,x:A \vdash B\,type}
{\Gamma \vdash \Pi x:A.B\,type} \\
\\
\frac{\Gamma \vdash A\,type \qquad \Gamma,x:A \vdash B\,type}
{\Gamma \vdash \cap x:A.B\,type} \\
\\
\frac{}{\Gamma \vdash Comp\,type} \\
\\
\frac{\Gamma \vdash A\,type \qquad \Gamma,x:A \vdash B\,type}
{\Gamma \vdash \{x:A | B\}\,type} \\
\\
\frac{\begin{array}{l}\Gamma,x1:Comp,x2:Comp \vdash R\,type \\
\Gamma,y1:Comp,y2:Comp \vdash s \Vdash R[y1,y2/x1,x2] \to R[y2,y1/x1,x2] \\
\Gamma,y1:Comp,y2:Comp,y3:Comp \vdash t \Vdash R[y1,y2/x1,x2] \to R[y2,y3/x1,x2] \to R[y1,y3/x1,x2]\end{array}}
{\Gamma \vdash \{x1 = x2 | R\}\,type} \\
\\
\frac{}{\Gamma \vdash Bool\,type}
\end{gathered}$$

### Miscellaneous

$$\begin{gathered}
\frac{x:T \in \Gamma}{\Gamma \vdash x \Vdash T} \\
\\
\frac{A \equiv_\beta B \qquad \Gamma \vdash B\,type \qquad
\Gamma \vdash t \Vdash A}
{\Gamma \vdash t \Vdash B} \\
\\
\frac{t \equiv_\beta t' \qquad \Gamma \vdash t \Vdash T}
{\Gamma \vdash t' \Vdash T} \\
\\
\frac{\Gamma \vdash A\,type}{\Gamma \vdash p \Vdash A \prec A} \\
\\
\frac{\Gamma \vdash A\,type}{\Gamma \vdash p \Vdash Comp \prec A}
\end{gathered}$$

### Equality

$$\begin{gathered}
\frac{\Gamma \vdash t \Vdash T}{\Gamma \vdash p \Vdash t = t \in T} \\
\\
\frac{\Gamma \vdash p \Vdash t1 = t2 \in T}{\Gamma \vdash t1 \Vdash T} \\
\\
\frac{\Gamma \vdash p \Vdash t1 = t2 \in T}{\Gamma \vdash t2 \Vdash T} \\
\\
\frac{\Gamma,x:A \vdash B\,type \qquad
\Gamma \vdash p \Vdash a1 = a2 \in A \qquad
\Gamma \vdash b \Vdash B[a1/x]}
{\Gamma \vdash b \Vdash B[a2/x]} \\
\\
\frac{\Gamma \vdash t \Vdash T}
{\Gamma \vdash q \Vdash p1 = p2 \in (t = t \in T)}
\end{gathered}$$

### Functions

$$\begin{gathered}
\frac{\Gamma \vdash f \Vdash \Pi x:A.B \qquad
\Gamma \vdash a \Vdash A}
{\Gamma \vdash f\,a \Vdash B[a/x]} \\
\\
\frac{\Gamma \vdash A\,type \qquad
\Gamma,x:A \vdash p \Vdash f\,x = f'\,x \in B \qquad
x \notin FV(f,f')}
{\Gamma \vdash q \Vdash f = f' \in \Pi x:A.B}
\end{gathered}$$

### Intersection

$$\begin{gathered}
\frac{\Gamma \vdash b \Vdash \cap x:A.B \qquad
\Gamma \vdash a \Vdash A}
{\Gamma \vdash b \Vdash B[a/x]} \\
\\
\frac{\Gamma \vdash A\,type \qquad
\Gamma,x:A \vdash p \Vdash b = b' \in B \qquad
x \notin FV(b,b')}
{\Gamma \vdash q \Vdash b = b' \in \cap x:A.B}
\end{gathered}$$

### Computation Formation

$$\begin{gathered}
\frac{\Gamma,x:Comp \vdash b \Vdash Comp}{\Gamma \vdash \lambda x.b \Vdash Comp} \\
\\
\frac{\Gamma \vdash f \Vdash Comp \qquad \Gamma \vdash a \Vdash Comp}
{\Gamma \vdash f\,a \Vdash Comp}
\end{gathered}$$

### Subset

$$\begin{gathered}
\frac{\Gamma,x:A \vdash B\,type \qquad
\Gamma \vdash a \Vdash A \qquad \Gamma \vdash b \Vdash B[a/x]}
{\Gamma \vdash a \Vdash \{x:A | B\}} \\
\\
\frac{\Gamma,z:\{x:A | B\} \vdash C\,type \qquad
\Gamma,x:A,y:B \vdash c \Vdash C[x/z] \qquad y \notin FV(c) \qquad
\Gamma \vdash a \Vdash \{x:A | B\}}
{\Gamma \vdash c[a/x] \Vdash C[a/z]}
\end{gathered}$$

### PER

$$\begin{gathered}
\frac{\Gamma \vdash \{x1 = x2 | R\}\,type \qquad
\Gamma \vdash t2 \Vdash Comp \qquad
\Gamma \vdash p \Vdash R[t1,t2/x1,x2]}
{\Gamma \vdash q \Vdash t1 = t2 \in \{x1 = x2 | R\}} \\
\\
\frac{\begin{array}{l}
\Gamma \vdash C\,type \qquad
\Gamma \vdash R[t1,t2/x1,x2]\,type \\
\Gamma \vdash p \Vdash t1 = t2 \in \{x1 = x2 | R\} \\
\Gamma,z:R[t1,t2/x1,x2] \vdash c \Vdash C \qquad z \notin FV(c)
\end{array}}
{\Gamma \vdash c \Vdash C}
\end{gathered}$$

### Booleans

$$\begin{gathered}
\frac{}{\Gamma \vdash tru \Vdash Bool} \qquad
\frac{}{\Gamma \vdash fls \Vdash Bool} \\
\\
\frac{\Gamma \vdash b \Vdash Bool}{\Gamma \vdash b \Vdash Comp} \\
\\
\frac{\Gamma,x:Bool \vdash C\,type \qquad
\Gamma \vdash c \Vdash C[tru/x] \qquad
\Gamma \vdash c \Vdash C[fls/x] \qquad
\Gamma \vdash b \Vdash Bool}
{\Gamma \vdash c \Vdash C[b/x]} \\
\\
\frac{\Gamma \vdash T\,type \qquad
\Gamma \vdash p \Vdash \bot}
{\Gamma \vdash t \Vdash T}
\end{gathered}$$


CompLF v1

#Contents#
* table of contents
{:toc}

## Idea

This is the definition of the formal system [[CompLF]], version 1. Actually, there were several versions between [[CompLF v0|zero]] and one, but you're not missing anything interesting.

## Syntax

### Term grammar

The main [[syntax|syntactic]] class is [[terms]]. [[type|Type]] expressions are terms. There are also [[variables]] and [[contexts]].

variables ($x$, $y$, ...)` ::= `(Written as usual. Complain if you can't tell them apart from metavariables.)

terms ($t$, $a$, $b$, $f$, $T$, $A$, $B$, $R$, ...)` ::=`

* $x \qquad$ (variable reference)
* $\lambda x.b \qquad$ (lambda abstraction)
* $f\,a \qquad$ (application)

* $t \equiv t' \qquad$ (identity type) (computational equivalence)
* $a = b \in C \qquad$ (equality type)
* $Relax(A) \qquad$ ("relax" type)
* $\Pi x:A.B \qquad$ (dependent function type)
* $\cap x:A.B \qquad$ (family intersection type)
* $\{x:A | B\} \qquad$ (subset/separation type)
* $Comp \qquad$ (type of computations ([[realizers]]))
* $Bool \qquad$ (type of "booleans") (two-element type)
* $\{x = y | R\} \qquad$ ([[PER]] comprehension type)
* $Nat \qquad$ (type of natural numbers)

contexts ($\Gamma$, ...)` ::= `$\cdot$` | `$\Gamma,x:T$

As usual, the rules may make liberal use of informal list operations to work with contexts.

### Abbreviations

#### Semantic Judgment Forms {#SemJudg}

$a \in A\;\coloneqq\;a = a \in A$

$A \to B\;\coloneqq\;\Pi \underline{\;}:A.B$

$A \supset B\;\coloneqq\;\cap \underline{\;}:A.B$

$A \wedge B\;\coloneqq\;\{\underline{\;}:A | B\}$

#### Computations

The [[Alonzo Church|Church]] booleans:

$tru\;\coloneqq\;\lambda t.\lambda f.t$

$fls\;\coloneqq\;\lambda t.\lambda f.f$

[[Dana Scott|Scott]] nats:

$zro\;\coloneqq\;\lambda z.\lambda s.z$

$suc(n)\;\coloneqq\;\lambda z.\lambda s.s\,n$

#### Type Constructors

The type constructors given in the grammar above that have subexpressions are actually abbreviations for applied constants. For example:

$\Pi x:A.B\;\coloneqq\;KPi\,A\,(\lambda x.B)$

In particular, $\lambda$ is the only real binding form of the language.

$\top\;\coloneqq\;tru = tru \in Bool$

$\bot\;\coloneqq\;tru = fls \in Bool$

### Judgment forms

$a \longrightarrow_\beta b \qquad$ (beta "reduction")

$\Gamma \vdash T\,type \qquad$ (type validity)

$\Gamma \vdash t \Vdash T \qquad$ (element in a type) (realizer of a type)

## Rules {#Rules}

### Partially-Compatible Reduction

$$\begin{gathered}
\frac{}{(\lambda x.b)\,a \longrightarrow_\beta b[a/x]} \\
\\
\frac{b \longrightarrow_\beta b'}
{\lambda x.b \longrightarrow_\beta \lambda x.b'} \\
\\
\frac{a \longrightarrow_\beta a'}
{f\,a \longrightarrow_\beta f\,a'}
\end{gathered}$$

### Miscellaneous

$$\begin{gathered}
\frac{x:T \in \Gamma}{\Gamma \vdash x \Vdash T} \\
\\
\\
\frac{A \longrightarrow_\beta B \qquad \Gamma \vdash t \Vdash A}
{\Gamma \vdash t \Vdash B} \\
\\
\frac{B \longrightarrow_\beta A \qquad \Gamma \vdash t \Vdash A}
{\Gamma \vdash t \Vdash B} \\
\\
\\
\frac{\Gamma \vdash a \Vdash A}{\Gamma \vdash A\,type}
\end{gathered}$$

### Relax

$$\begin{gathered}
\frac{\Gamma \vdash A\,type}{\Gamma \vdash Relax(A)\,type} \\
\\
\frac{\Gamma \vdash Relax(A)\,type}{\Gamma \vdash A\,type} \\
\\
\\
\frac{\Gamma \vdash a \Vdash A}{\Gamma \vdash a \Vdash Relax(A)} \\
\\
\frac{\Gamma \vdash A\,type \qquad \Gamma \vdash t \Vdash Comp}
{\Gamma \vdash t \Vdash Relax(A)} \\
\\
\\
\frac{\begin{array}{l}\Gamma \vdash a' \Vdash Comp \\
\Gamma \vdash p1 \Vdash (a \in A) \supset (a = a' \in A) \\
\Gamma \vdash p2 \Vdash (a' \in A) \supset (a = a' \in A)\end{array}}
{\Gamma \vdash q \Vdash a = a' \in Relax(A)} \\
\\
\frac{\Gamma \vdash a \Vdash A \qquad \Gamma \vdash p \Vdash a = a' \in Relax(A)}
{\Gamma \vdash q \Vdash a = a' \in A}
\end{gathered}$$

### Equality

$$\begin{gathered}
\frac{\Gamma \vdash a1 \Vdash Relax(A) \qquad \Gamma \vdash a2 \Vdash Relax(A)}
{\Gamma \vdash a1 = a2 \in A\,type} \\
\\
\frac{\Gamma \vdash a1 = a2 \in A\,type}{\Gamma \vdash a1 \Vdash Relax(A)} \qquad
\frac{\Gamma \vdash a1 = a2 \in A\,type}{\Gamma \vdash a2 \Vdash Relax(A)} \\
\\
\\
\frac{\Gamma \vdash a \Vdash A}
{\Gamma \vdash q \Vdash p1 = p2 \in (a = a \in A)} \\
\\
\frac{\Gamma \vdash p \Vdash a = a' \in A}{\Gamma \vdash a \Vdash A} \\
\\
\frac{\Gamma \vdash p \Vdash a = a' \in A \qquad
\Gamma,x:A \vdash C\,type \qquad
\Gamma \vdash c \Vdash C[a/x]}
{\Gamma \vdash c \Vdash C[a'/x]}
\end{gathered}$$

### Identity

$$\begin{gathered}
\frac{\Gamma \vdash t1 \Vdash Comp \qquad \Gamma \vdash t2 \Vdash Comp}
{\Gamma \vdash t1 \equiv t2\,type} \\
\\
\\
\frac{}{\Gamma \vdash q \Vdash p1 = p2 \in (t \equiv t)} \\
\\
\frac{\Gamma \vdash p \Vdash t \equiv t' \qquad \Gamma \vdash c \Vdash C[t/x]}
{\Gamma \vdash c \Vdash C[t'/x]}
\end{gathered}$$

### Functions

$$\begin{gathered}
\frac{\Gamma \vdash A\,type \qquad \Gamma,x:A \vdash B\,type}
{\Gamma \vdash \Pi x:A.B\,type} \\
\\
\frac{\Gamma \vdash \Pi x:A.B\,type}{\Gamma \vdash A\,type} \\
\\
\frac{\Gamma \vdash \Pi x:A.B\,type \qquad \Gamma \vdash a \Vdash A}
{\Gamma \vdash B[a/x]\,type} \\
\\
\\
\frac{\Gamma \vdash f \Vdash \Pi x:A.B \qquad \Gamma \vdash a \Vdash A}
{\Gamma \vdash f\,a \Vdash B[a/x]} \\
\\
\frac{\Gamma \vdash A\,type \qquad
\Gamma,x:A \vdash p \Vdash f\,x = f'\,x \in B \qquad
x \notin FV(f,f')}
{\Gamma \vdash q \Vdash f = f' \in \Pi x:A.B}
\end{gathered}$$

### Intersection

$$\begin{gathered}
\frac{\Gamma \vdash A\,type \qquad \Gamma,x:A \vdash B\,type}
{\Gamma \vdash \cap x:A.B\,type} \\
\\
\frac{\Gamma \vdash \cap x:A.B\,type}{\Gamma \vdash A\,type} \\
\\
\frac{\Gamma \vdash \cap x:A.B\,type \qquad \Gamma \vdash a \Vdash A}
{\Gamma \vdash B[a/x]\,type} \\
\\
\\
\frac{\Gamma \vdash b \Vdash \cap x:A.B \qquad \Gamma \vdash a \Vdash A}
{\Gamma \vdash b \Vdash B[a/x]} \\
\\
\frac{\Gamma \vdash A\,type \qquad
\Gamma,x:A \vdash p \Vdash b = b' \in B \qquad
x \notin FV(b,b')}
{\Gamma \vdash q \Vdash b = b' \in \cap x:A.B}
\end{gathered}$$

### Subset

$$\begin{gathered}
\frac{\Gamma \vdash A\,type \qquad \Gamma,x:A \vdash B\,type}
{\Gamma \vdash \{x:A | B\}\,type} \\
\\
\frac{\Gamma \vdash \{x:A | B\}\,type}{\Gamma \vdash A\,type} \\
\\
\frac{\Gamma \vdash \{x:A | B\}\,type \qquad \Gamma \vdash a \Vdash A}
{\Gamma \vdash B[a/x]\,type} \\
\\
\\
\frac{\Gamma,x:A \vdash B\,type \qquad
\Gamma \vdash a \Vdash A \qquad \Gamma \vdash b \Vdash B[a/x]}
{\Gamma \vdash a \Vdash \{x:A | B\}} \\
\\
\frac{\Gamma \vdash a \Vdash \{x:A | B\} \qquad
\Gamma,x:A,y:B \vdash c \Vdash C \qquad y \notin FV(c,C)}
{\Gamma \vdash c[a/x] \Vdash C[a/x]}
\end{gathered}$$

### Computations

$$\begin{gathered}
\frac{}{\Gamma \vdash Comp\,type} \\
\\
\\
\frac{\Gamma,x:Comp \vdash b \Vdash Comp}{\Gamma \vdash \lambda x.b \Vdash Comp} \\
\\
\frac{\Gamma \vdash f \Vdash Comp \qquad \Gamma \vdash a \Vdash Comp}
{\Gamma \vdash f\,a \Vdash Comp} \\
\\
\\
\frac{\begin{array}{l}\Gamma \vdash a \Vdash A \qquad
\Gamma,y:A \vdash C\,type \\
\Gamma,x:Comp,x':Comp,h:(x = x' \in A) \vdash
p \Vdash c[x/y] = c'[x'/y] \in C[x/y] \\
x,x',h \notin FV(c,c')\end{array}}
{\Gamma \vdash q \Vdash c[a/y] = c'[a/y] \in C[a/y]}
\end{gathered}$$

### Booleans

$$\begin{gathered}
\frac{}{\Gamma \vdash Bool\,type} \\
\\
\frac{}{\Gamma \vdash tru \Vdash Bool} \qquad
\frac{}{\Gamma \vdash fls \Vdash Bool} \\
\\
\frac{\Gamma \vdash b \Vdash Bool \qquad
\Gamma \vdash c \Vdash C[tru/x] \qquad
\Gamma \vdash c \Vdash C[fls/x]}
{\Gamma \vdash c \Vdash C[b/x]}
\end{gathered}$$

### PER

$$\begin{gathered}
\frac{\begin{array}{l}\Gamma,x1:Comp,x2:Comp \vdash R\,type \\
\Gamma,y1:Comp,y2:Comp \vdash s \Vdash R[y1,y2/x1,x2] \supset R[y2,y1/x1,x2] \\
\Gamma,y1:Comp,y2:Comp,y3:Comp \vdash t \Vdash R[y1,y2/x1,x2] \supset R[y2,y3/x1,x2] \supset R[y1,y3/x1,x2]\end{array}}
{\Gamma \vdash \{x1 = x2 | R\}\,type} \\
\\
\\
\frac{\Gamma \vdash \{x1 = x2 | R\}\,type \qquad
\Gamma \vdash t2 \Vdash Comp \qquad
\Gamma \vdash p \Vdash R[t1,t2/x1,x2]}
{\Gamma \vdash q \Vdash t1 = t2 \in \{x1 = x2 | R\}} \\
\\
\frac{\begin{array}{l}
\Gamma \vdash p \Vdash t1 = t2 \in \{x1 = x2 | R\} \\
\Gamma \vdash R[t1,t2/x1,x2]\,type \\
\Gamma,h:R[t1,t2/x1,x2] \vdash c \Vdash C \qquad h \notin FV(c,C)
\end{array}}
{\Gamma \vdash c \Vdash C}
\end{gathered}$$

### Natural Numbers

$$\begin{gathered}
\frac{}{\Gamma \vdash Nat\,type} \\
\\
\\
\frac{}{\Gamma \vdash zro \Vdash Nat} \\
\\
\frac{\Gamma \vdash n \Vdash Nat}{\Gamma \vdash suc(n) \Vdash Nat} \\
\\
\\
\frac{\Gamma \vdash n \Vdash Nat}{\Gamma \vdash n \Vdash Comp} \\
\\
\frac{\begin{array}{l}
\Gamma \vdash n \Vdash Nat \qquad
\Gamma,x:Nat \vdash C\,type \\
\Gamma \vdash c \Vdash C[zro/x] \\
\Gamma,x:Nat,h:C \vdash c \Vdash C[suc(x)/x]
\end{array}}
{\Gamma \vdash c \Vdash C[n/x]}
\end{gathered}$$