auto gitdoc commit
This commit is contained in:
parent
61649a0c57
commit
0cb341072c
1 changed files with 6 additions and 6 deletions
|
@ -56,12 +56,12 @@ transport {l₁} {l₂} {A} {x} {y} P p = J (λ x y p → P x → P y) (λ x →
|
|||
TODO
|
||||
|
||||
```
|
||||
lift : {A : Set} (P : A → Set) {x y : A}
|
||||
→ (u : P x)
|
||||
→ (p : x ≡ y)
|
||||
→ (x , u) ≡ (y , transport P p u)
|
||||
lift {A} P {x} {y} u p =
|
||||
J (λ a b p → (a , {! !}) ≡ (b , {! !})) (λ x → {! !}) x y p
|
||||
-- lift : {A : Set} (P : A → Set) {x y : A}
|
||||
-- → (u : P x)
|
||||
-- → (p : x ≡ y)
|
||||
-- → (x , u) ≡ (y , transport P p u)
|
||||
-- lift {A} P {x} {y} u p =
|
||||
-- J (λ a b p → (x , {! !}) ≡ (y , {! !})) (λ x → {! !}) x y p
|
||||
```
|
||||
|
||||
Verifying its property:
|
||||
|
|
Loading…
Reference in a new issue