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