Commit 0e533af 1 parent ed32ce5 commit 0e533af Copy full SHA for 0e533af
File tree 1 file changed +7
-7
lines changed
src/Categories/Category/Lift
1 file changed +7
-7
lines changed Original file line number Diff line number Diff line change @@ -13,19 +13,19 @@ import Categories.Morphism.Reasoning.Core as MR
13
13
unliftF-liftF-weakInverse : ∀ {o ℓ e} o′ ℓ′ e′ (C : Category o ℓ e) → WeakInverse (unliftF o′ ℓ′ e′ C) (liftF o′ ℓ′ e′ C)
14
14
unliftF-liftF-weakInverse o′ ℓ′ e′ C = record
15
15
{ F∘G≈id = niHelper record
16
- { η = λ X → id
17
- ; η⁻¹ = λ X → id
16
+ { η = λ _ → id
17
+ ; η⁻¹ = λ _ → id
18
18
; commute = λ f → id-comm-sym
19
- ; iso = λ X → record
19
+ ; iso = λ _ → record
20
20
{ isoˡ = identity²
21
21
; isoʳ = identity²
22
22
}
23
23
}
24
24
; G∘F≈id = niHelper record
25
- { η = λ X → lift id
26
- ; η⁻¹ = λ X → lift id
27
- ; commute = λ f → lift id-comm-sym
28
- ; iso = λ X → record
25
+ { η = λ _ → lift id
26
+ ; η⁻¹ = λ _ → lift id
27
+ ; commute = λ _ → lift id-comm-sym
28
+ ; iso = λ _ → record
29
29
{ isoˡ = lift identity²
30
30
; isoʳ = lift identity²
31
31
}
You can’t perform that action at this time.
0 commit comments