Step * of Lemma add-polynom-int-val

[n:ℕ]. ∀[l:{l:ℤ List| ||l|| n ∈ ℤ]. ∀[p,q:polyform(n)]. ∀[rmz:𝔹].  (add-polynom(n;rmz;p;q)@l (p@l q@l) ∈ ℤ)
BY
(CompleteInductionOnNat THEN RecUnfold `polyform` THEN AutoSplit) }

1
1. : ℕ
2. ∀n:ℕn. ∀[l:{l:ℤ List| ||l|| n ∈ ℤ]. ∀[p,q:polyform(n)]. ∀[rmz:𝔹].  (add-polynom(n;rmz;p;q)@l (p@l q@l) ∈ ℤ)
3. 0 ∈ ℤ
⊢ ∀[l:{l:ℤ List| ||l|| n ∈ ℤ]. ∀[p,q:ℤ]. ∀[rmz:𝔹].  (add-polynom(n;rmz;p;q)@l (p@l q@l) ∈ ℤ)

2
1. {1...}
2. ∀n:ℕn. ∀[l:{l:ℤ List| ||l|| n ∈ ℤ]. ∀[p,q:polyform(n)]. ∀[rmz:𝔹].  (add-polynom(n;rmz;p;q)@l (p@l q@l) ∈ ℤ)
⊢ ∀[l:{l:ℤ List| ||l|| n ∈ ℤ]. ∀[p,q:polyform(n 1) List]. ∀[rmz:𝔹].  (add-polynom(n;rmz;p;q)@l (p@l q@l) ∈ ℤ)


Latex:


Latex:
\mforall{}[n:\mBbbN{}].  \mforall{}[l:\{l:\mBbbZ{}  List|  ||l||  =  n\}  ].  \mforall{}[p,q:polyform(n)].  \mforall{}[rmz:\mBbbB{}].
    (add-polynom(n;rmz;p;q)@l  =  (p@l  +  q@l))


By


Latex:
(CompleteInductionOnNat  THEN  RecUnfold  `polyform`  0  THEN  AutoSplit)




Home Index