---

Step * 2 of Lemma rng_prod_unroll_hi


1. r : CRng
2. n : ℕ+
3. F : ℕn ⟶ |r|
4. ¬(n = 1 ∈ ℤ)
⊢ (Π(r) 0 ≤ i < n. F[i]) = ((Π(r) 0 ≤ i < n - 1. F[i]) * F[n - 1]) ∈ |r|
BY
{ (RW (AddrC [2] UnfoldTopAbC) 0
   THEN RWO "mon_itop_unroll_hi" 0
   THEN Auto
   THEN All (Fold `rng_prod`)
   THEN Subst' * ~ * 0
   THEN Auto) }

1
.....equality..... 
1. r : CRng
2. n : ℕ+
3. F : ℕn ⟶ |r|
4. ¬(n = 1 ∈ ℤ)
⊢ * ~ *

---

Latex:

---

Latex:

1.  r  :  CRng
2.  n  :  \mBbbN{}\msupplus{}
3.  F  :  \mBbbN{}n  {}\mrightarrow{}  |r|
4.  \mneg{}(n  =  1)
\mvdash{}  (\mPi{}(r)  0  \mleq{}  i  <  n.  F[i])  =  ((\mPi{}(r)  0  \mleq{}  i  <  n  -  1.  F[i])  *  F[n  -  1])


By

---

Latex:
(RW  (AddrC  [2]  UnfoldTopAbC)  0
  THEN  RWO  "mon\_itop\_unroll\_hi"  0
  THEN  Auto
  THEN  All  (Fold  `rng\_prod`)
  THEN  Subst'  *  \msim{}  *  0
  THEN  Auto)

---

Home Index