Step
*
2
1
of Lemma
add-polynom_wf1
1. n : {1...}
2. ∀[p,q:polyform(n - 1)]. ∀[rmz:𝔹].  (add-polynom(n - 1;rmz;p;q) ∈ polyform(n - 1))
⊢ ∀[p,q:polyform(n - 1) List]. ∀[rmz:𝔹].  (add-polynom(n;rmz;p;q) ∈ polyform(n - 1) List)
BY
{ (InductionOnList THEN Auto) }
1
1. n : {1...}
2. ∀[p,q:polyform(n - 1)]. ∀[rmz:𝔹].  (add-polynom(n - 1;rmz;p;q) ∈ polyform(n - 1))
3. q : polyform(n - 1) List
4. rmz : 𝔹
⊢ add-polynom(n;rmz;[];q) ∈ polyform(n - 1) List
2
1. n : {1...}
2. ∀[p,q:polyform(n - 1)]. ∀[rmz:𝔹].  (add-polynom(n - 1;rmz;p;q) ∈ polyform(n - 1))
3. u : polyform(n - 1)
4. v : polyform(n - 1) List
5. ∀[q:polyform(n - 1) List]. ∀[rmz:𝔹].  (add-polynom(n;rmz;v;q) ∈ polyform(n - 1) List)
6. q : polyform(n - 1) List
7. rmz : 𝔹
⊢ add-polynom(n;rmz;[u / v];q) ∈ polyform(n - 1) List
Latex:
Latex:
1.  n  :  \{1...\}
2.  \mforall{}[p,q:polyform(n  -  1)].  \mforall{}[rmz:\mBbbB{}].    (add-polynom(n  -  1;rmz;p;q)  \mmember{}  polyform(n  -  1))
\mvdash{}  \mforall{}[p,q:polyform(n  -  1)  List].  \mforall{}[rmz:\mBbbB{}].    (add-polynom(n;rmz;p;q)  \mmember{}  polyform(n  -  1)  List)
By
Latex:
(InductionOnList  THEN  Auto)
Home
Index