fact: Definition lifted_solution@{i j} (Γ : Tel@{i}) (u v : Γ) (Γ' : Tel@{i}) (Δ : Tel@{i}) (a b : Γ -> Δ) (eqΔ := λ ρ, a ρ =={Δ} b ρ) (r : eqΔ u) (s : eqΔ v) (f : extend_tele Γ eqΔ <~> Γ') : tele (e : u =={Γ} v) in square_tel r s (cong_tel a e) (cong_tel b e) <~> f (inj_extend_tel Γ eqΔ u r) =={Γ'} f (inj_extend_tel Γ eqΔ v s).
imports: Equations Utf8 DepElimDec EqDecInstances