Merge branch 'dev' of github.com:plfa/plfa.github.io into dev
This commit is contained in:
commit
af45cdcfdb
1 changed files with 5 additions and 5 deletions
|
@ -463,21 +463,21 @@ And to establish the following properties:
|
|||
to (from b) ≡ b
|
||||
|
||||
Using the above, establish that there is an isomorphism between `ℕ` and
|
||||
`∃[ b ](Can b)`.
|
||||
`∃[ b ] Can b`.
|
||||
|
||||
We recommend proving the following lemmas which show that, for a given
|
||||
binary number `b`, there is only one proof of `One b` and similarly
|
||||
for `Can b`.
|
||||
|
||||
≡One : ∀{b : Bin} (o o' : One b) → o ≡ o'
|
||||
≡One : ∀ {b : Bin} (o o′ : One b) → o ≡ o′
|
||||
|
||||
≡Can : ∀{b : Bin} (cb : Can b) (cb' : Can b) → cb ≡ cb'
|
||||
≡Can : ∀ {b : Bin} (cb cb′ : Can b) → cb ≡ cb′
|
||||
|
||||
Many of the alternatives for proving `to∘from` turn out to be tricky.
|
||||
However, the proof can be straightforward if you use the following lemma,
|
||||
which is a corollary of `≡Can`.
|
||||
|
||||
proj₁≡→Can≡ : {cb cb′ : ∃[ b ](Can b)} → proj₁ cb ≡ proj₁ cb′ → cb ≡ cb′
|
||||
proj₁≡→Can≡ : {cb cb′ : ∃[ b ] Can b} → proj₁ cb ≡ proj₁ cb′ → cb ≡ cb′
|
||||
|
||||
```
|
||||
-- Your code goes here
|
||||
|
|
Loading…
Reference in a new issue