Round-six lemma `rowB`
ProvedJ6Seg.PJ.Rn.rowBcomplexity-theoryinteger-multiplicationkappa-improvement
An auxiliary lemma of the round-six development, published as a separate node because its proof is long or shared.
The following holds (Lean statement, in the scope of module Solutions.J6SegILPreJK10):
theorem J6Seg.PJ.Rn.rowB (hNW : N < 2 ^ W) (hW2 : 2 ≤ W) (hu : BV W u)
(h6 : u 6 = i) (h9 : u 9 = 2 ^ Q) (h10 : u 10 = 2 ^ (Q + 1)) (h20 : u 20 = Q) (h21 : u 21 = R)
(h22 : u 22 = s) (h23 : u 23 = t) (h24 : u 24 = lam) (h25 : u 25 = α) (h26 : u 26 = B.w)
(h28 : u 28 = m)
(hi : i < m) (hL : D 30 = L.map (fun j : ℕ => (j : ℤ))) (hLm : L.length = m)
(hLs : ∀ j ∈ L, j < s) (hBs : B.s = s) (hs : 0 < s) (hB : BlocksOK s t B)
(hBl : ∀ j < s, B.len j ≤ lam)
(h32 : D 32 = (List.range s).map (fun j => (B.st j : ℤ)))
(h33 : D 33 = (List.range s).map (fun j => (B.len j : ℤ)))
(hTS : TabSt Q R W s t α lam D)
(hSAP : D SAP = []) (hSAM : D SAM = []) (hSMI : D SMI = []) (hSV : D SV = []) (hSC : D SC = [])
(h50 : D 50 = []) (h51 : D 51 = []) (h53 : D 53 = []) (h54 : D 54 = [])
(hCu : D PreT.Cu = [])
(hQW : Q ≤ W) (hsN : s ≤ N) (hlN : lam ≤ N) (hmN : m ≤ N) (hNMN : lam * (2 * B.w + 1) ≤ N)
(bss : s * s ≤ 2 ^ W) (hGB : GlobBnd Q W s t α lam)
(hRB : ∀ a < s, RowBnd Q R W s t α lam B a) :
Rn J6Seg.PJ.rowB u D (fun v' => Fxk BIG u v' ∧ BV W v')
(update D SMAT (rvL (fun k => capI Q (mkTables Q R s t α) B (Lg L i) (Lg L k)) m ++ D SMAT))
(cRowB W N lam (lam * (2 * B.w + 1)) m)
Context. B5 J side, part K10: one row of the capacitance matrix (Rn.rowB)
Formalization Note. Part of the Lean formalization of the round-six κ-improvement (integer-multiplication-kappa campaign, target IntMul.Kappa.jain_round6_framework). The statement is copied verbatim from the Lean development; the platform node carries the same declaration name. Definitions it mentions live in the IntMul_Kappa_R6_Defs* bundles (on top of the published κ bundles IntMul_Kappa_K_Defs*).
Preamble
-- Round-six κ development (integer-multiplication-kappa), generated by skeleton subtraction.
import Definitions.Def_IntMul_Kappa_R6_Defs71
set_option autoImplicit false
set_option relaxedAutoImplicit false
set_option maxHeartbeats 1000000
open J6Seg J6Seg.PJ
open IntMul NLogN NLogN.KIL NLogN.RS Function J6Seg.PJ.E Finset
variable {Q R W N s t α lam m i : ℕ} {B : Blocks} {L : List ℕ} {u : Vr} {D : Cs}
Formal statement
theorem J6Seg.PJ.Rn.rowB (hNW : N < 2 ^ W) (hW2 : 2 ≤ W) (hu : BV W u)
(h6 : u 6 = i) (h9 : u 9 = 2 ^ Q) (h10 : u 10 = 2 ^ (Q + 1)) (h20 : u 20 = Q) (h21 : u 21 = R)
(h22 : u 22 = s) (h23 : u 23 = t) (h24 : u 24 = lam) (h25 : u 25 = α) (h26 : u 26 = B.w)
(h28 : u 28 = m)
(hi : i < m) (hL : D 30 = L.map (fun j : ℕ => (j : ℤ))) (hLm : L.length = m)
(hLs : ∀ j ∈ L, j < s) (hBs : B.s = s) (hs : 0 < s) (hB : BlocksOK s t B)
(hBl : ∀ j < s, B.len j ≤ lam)
(h32 : D 32 = (List.range s).map (fun j => (B.st j : ℤ)))
(h33 : D 33 = (List.range s).map (fun j => (B.len j : ℤ)))
(hTS : TabSt Q R W s t α lam D)
(hSAP : D SAP = []) (hSAM : D SAM = []) (hSMI : D SMI = []) (hSV : D SV = []) (hSC : D SC = [])
(h50 : D 50 = []) (h51 : D 51 = []) (h53 : D 53 = []) (h54 : D 54 = [])
(hCu : D PreT.Cu = [])
(hQW : Q ≤ W) (hsN : s ≤ N) (hlN : lam ≤ N) (hmN : m ≤ N) (hNMN : lam * (2 * B.w + 1) ≤ N)
(bss : s * s ≤ 2 ^ W) (hGB : GlobBnd Q W s t α lam)
(hRB : ∀ a < s, RowBnd Q R W s t α lam B a) :
Rn J6Seg.PJ.rowB u D (fun v' => Fxk BIG u v' ∧ BV W v')
(update D SMAT (rvL (fun k => capI Q (mkTables Q R s t α) B (Lg L i) (Lg L k)) m ++ D SMAT))
(cRowB W N lam (lam * (2 * B.w + 1)) m) := by sorrySource
S. Jain, round-six networks for the integer-multiplication κ-improvement campaign (https://github.com/Swapnil-jain/integer-mult-kappa, commit 5868dc7) and D. Colkitt, integer-mult-bounds (https://github.com/CrocSwap/integer-mult-bounds); target `IntMul.Kappa.jain_round6_framework`. Lean declaration `J6Seg.PJ.Rn.rowB`, Solutions/J6SegILPreJK10.lean (lines 58–358) of the round-six development.