Skip to content

Commit

Permalink
Prettier
Browse files Browse the repository at this point in the history
  • Loading branch information
robin-carlier committed Sep 30, 2024
1 parent 6415980 commit b10c90a
Showing 1 changed file with 8 additions and 10 deletions.
18 changes: 8 additions & 10 deletions src/simplicial-hott/09-yoneda.rzk.md
Original file line number Diff line number Diff line change
Expand Up @@ -1441,15 +1441,14 @@ initial object by `#!rzk is-initial-id-hom-is-segal`.
```

The other direction is a bit longer. We follow the proof of RS17 9.10:
given `#!rzk (a, u) : Σ (x : A) , C x` an initial object of
`#!rzk Σ (x : A) , C x`, evaluating `#!rzk yon` at `#!rzk u : C a`
yields a family of maps `#!rzk (x : A) → hom A a x → C x`. This is a
contractible map as its fiber at `#!rzk (b : A, v : C b)` is equivalent
to the hom type `#!rzk hom (Σ (x : A) , C x) (a, u) (b, v)` through
the composite of `#!rzk covariant-uniqueness-curried` and
`#!rzk axiom-choice` and it is thus an equivalence using
`#!rzk is-equiv-is-contr-map`.
The other direction is a bit longer. We follow the proof of RS17 9.10: given
`#!rzk (a, u) : Σ (x : A) , C x` an initial object of `#!rzk Σ (x : A) , C x`,
evaluating `#!rzk yon` at `#!rzk u : C a` yields a family of maps
`#!rzk (x : A) → hom A a x → C x`. This is a contractible map as its fiber at
`#!rzk (b : A, v : C b)` is equivalent to the hom type
`#!rzk hom (Σ (x : A) , C x) (a, u) (b, v)` through the composite of
`#!rzk covariant-uniqueness-curried` and `#!rzk axiom-choice` and it is thus an
equivalence using `#!rzk is-equiv-is-contr-map`.

```rzk
#def is-representable-family-has-initial-tot
Expand Down Expand Up @@ -1598,4 +1597,3 @@ the composite of `#!rzk covariant-uniqueness-curried` and
( is-covariant-C)
( has-initial-tot-A))
```

0 comments on commit b10c90a

Please sign in to comment.