---

Step * of Lemma real-vec-extend_wf

∀[k:ℕ+]. ∀[a:ℝ^k - 1]. ∀[z:ℝ].  (a++z ∈ ℝ^k)
BY
{ (Auto THEN All (Unfold `real-vec`) THEN (FunExt THENA Auto) THEN RepUR ``real-vec-extend`` 0 THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[k:\mBbbN{}\msupplus{}].  \mforall{}[a:\mBbbR{}\^{}k  -  1].  \mforall{}[z:\mBbbR{}].    (a++z  \mmember{}  \mBbbR{}\^{}k)


By

---

Latex:
(Auto
  THEN  All  (Unfold  `real-vec`)
  THEN  (FunExt  THENA  Auto)
  THEN  RepUR  ``real-vec-extend``  0
  THEN  Auto)

---

Home Index