diff --git a/src/plfa/part2/Inference.lagda.md b/src/plfa/part2/Inference.lagda.md index 0000f9ed..5be2978f 100644 --- a/src/plfa/part2/Inference.lagda.md +++ b/src/plfa/part2/Inference.lagda.md @@ -191,12 +191,12 @@ We can extract the grammar for terms from the above: M⁻ ↓ A switch to inherited L⁻, M⁻, N⁻ ::= terms with inherited type - ƛ x ⇒ N abstraction + ƛ x ⇒ N⁻ abstraction `zero zero `suc M⁻ successor case L⁺ [zero⇒ M⁻ |suc x ⇒ N⁻ ] case - μ x ⇒ N fixpoint - M ↑ switch to synthesized + μ x ⇒ N⁻ fixpoint + M⁺ ↑ switch to synthesized We will formalise the above shortly.