Skip to content

Commit 901c31d

Browse files
Fix a sentence regarding pattern matching in Connectives (#1098)
Closes #1097 --------- Co-authored-by: Wen Kokke <[email protected]>
1 parent 822982d commit 901c31d

File tree

1 file changed

+5
-5
lines changed

1 file changed

+5
-5
lines changed

src/plfa/part1/Connectives.lagda.md

Lines changed: 5 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -258,8 +258,9 @@ Given evidence that `⊤` holds, there is nothing more of interest we
258258
can conclude. Since truth always holds, knowing that it holds tells
259259
us nothing new.
260260

261-
The nullary case of `η-×` is `η-⊤`, which asserts that any
262-
value of type `` must be equal to `tt`:
261+
The nullary case of `η-×` is `η-⊤`.
262+
While proving `η-⊤`, we do not have to pattern match on `w`---Agda *knows* it
263+
is equal to `tt`:
263264
```agda
264265
η-⊤ : ∀ (w : ⊤) → tt ≡ w
265266
η-⊤ w = refl
@@ -281,9 +282,8 @@ data ⊤′ : Set where
281282
⊤′
282283
```
283284
As with the product, the record type `` and the data type `⊤′` behave
284-
similarly, but η-equality holds *by definition* for the record type. While
285-
proving `η-⊤′`, we do not have to pattern match on `w`---Agda *knows* it is
286-
equal to `tt′`:
285+
similarly, but while η-equality holds *by definition* for the record type,
286+
it does not for the data type, so we need to pattern match on `w`:
287287
```agda
288288
η-⊤′ : ∀ (w : ⊤′) → tt′ ≡ w
289289
η-⊤′ tt′ = refl

0 commit comments

Comments
 (0)