module foundations.dependent-map where
open import foundations.universe open import foundations.identity-type open import foundations.transport open import foundations.groupoid-laws open import foundations.functions-are-functors
private variable
ℓ : Level
A : Type ℓ
B : A → Type ℓ
C : Type ℓ
apd : ∀ {x y : A}
→ (f : (a : A) → B a)
→ (p : x = y)
→ subst B p (f x) = f y
apd _ refl = refl
apdとapは次のように関連付けられる。
apd=substConst∙ap : ∀ {x y : A}
→ (f : A → C)
→ (p : x = y)
→ apd f p = substConst p (f x) ∙ ap f p
apd=substConst∙ap _ refl = sym (lunitId refl)