Step * 2 of Lemma int-prod-split


1. : ℤ
2. 0 < n
3. ∀[f:ℕ1 ⟶ ℤ]. ∀[m:ℕ(n 1) 1].  (f[x] x < 1) (f[x] x < m) * Π(f[x m] x < m)) ∈ ℤ)
4. : ℕn ⟶ ℤ
5. : ℕ1
⊢ Π(f[x] x < n) (f[x] x < m) * Π(f[x m] x < m)) ∈ ℤ
BY
(((RW (AddrC [3;2] UnfoldTopAbC) THEN RW (AddrC [2] UnfoldTopAbC) 0) THEN (RWO "primrec-unroll" THENA Auto))
   THEN Reduce 0
   THEN (OReduce THENA Auto)
   THEN Fold `int-prod` 0) }

1
1. : ℤ
2. 0 < n
3. ∀[f:ℕ1 ⟶ ℤ]. ∀[m:ℕ(n 1) 1].  (f[x] x < 1) (f[x] x < m) * Π(f[x m] x < m)) ∈ ℤ)
4. : ℕn ⟶ ℤ
5. : ℕ1
⊢ (f[x] x < 1) f[n 1])
(f[x] x < m) if m <then else Π(f[x m] x < 1) f[(n 1) m] fi )
∈ ℤ


Latex:


Latex:

1.  n  :  \mBbbZ{}
2.  0  <  n
3.  \mforall{}[f:\mBbbN{}n  -  1  {}\mrightarrow{}  \mBbbZ{}].  \mforall{}[m:\mBbbN{}(n  -  1)  +  1].
          (\mPi{}(f[x]  |  x  <  n  -  1)  =  (\mPi{}(f[x]  |  x  <  m)  *  \mPi{}(f[x  +  m]  |  x  <  n  -  1  -  m)))
4.  f  :  \mBbbN{}n  {}\mrightarrow{}  \mBbbZ{}
5.  m  :  \mBbbN{}n  +  1
\mvdash{}  \mPi{}(f[x]  |  x  <  n)  =  (\mPi{}(f[x]  |  x  <  m)  *  \mPi{}(f[x  +  m]  |  x  <  n  -  m))


By


Latex:
(((RW  (AddrC  [3;2]  UnfoldTopAbC)  0  THEN  RW  (AddrC  [2]  UnfoldTopAbC)  0)
    THEN  (RWO  "primrec-unroll"  0  THENA  Auto)
    )
  THEN  Reduce  0
  THEN  (OReduce  0  THENA  Auto)
  THEN  Fold  `int-prod`  0)




Home Index