auto gitdoc commit
This commit is contained in:
parent
4fedf3d1a3
commit
fab11e6119
1 changed files with 5 additions and 2 deletions
|
@ -407,9 +407,12 @@ theorem2∙13∙1 m n = encode m n , equiv
|
|||
what : code m n
|
||||
-- what = encode (suc m) (suc n) (ap suc (decode m n c))
|
||||
-- what = transport (λ n → code (suc m) n) (ap suc (decode m n c)) (r (suc m))
|
||||
what = transport (λ n → code (suc m) (suc n)) (decode m n c) (r (suc m))
|
||||
-- what = transport (λ n → code (suc m) (suc n)) (decode m n c) (r (suc m))
|
||||
-- what = transport (λ n → code m n) (decode m n c) (r m)
|
||||
-- what = transport (λ n → code m n) (decode m n c) (r m)
|
||||
what = transport (λ n → code m n) (decode m n c) (r m)
|
||||
res : what ≡ c
|
||||
res = {! !}
|
||||
res = IH
|
||||
in {! !}
|
||||
|
||||
equiv = record
|
||||
|
|
Loading…
Reference in a new issue