edit 1FundamentalGroup/Quest0Part2

This commit is contained in:
Jlh18 2021-09-16 12:24:04 +01:00
parent 6ae6455796
commit d3e5063e5f

View File

@ -108,7 +108,7 @@ We proceed in steps :
<details>
<summary>Skipped step</summary>
- To find out why we put `s b` on the left you can try
- To find out why we put `s b` on the left you can try
```agda
flipIso : Bool ≅ Bool
flipIso = iso Flip Flip s r where
@ -119,12 +119,12 @@ We proceed in steps :
r : retract Flip Flip
r = {!!}
```
- Check the goal of the hole `s = {!!}` and try using `C-c C-r`.
- Check the goal of the hole `s = {!!}` and try using `C-c C-r`.
It should give you `λ x → {!!}`.
This says it's asking for some new proof for each `x : Bool`.
If you check the goal you can find out what proof it wants
and that `x : Bool`.
- To do a proof for each `x : Bool`, we can also just stick
- To do a proof for each `x : Bool`, we can also just stick
`x` before the `=` and do away with the `λ`.
</details>
</p>
@ -135,8 +135,6 @@ We proceed in steps :
—————————————————————————————————
b : Bool
```
This says it suffices to find a path from `Flip (Flip b)` to `b`
in the space `Bool`.
Try to prove this.
<p>
<details>