The chirp call
ProvedNLogN.KFM.chirp_phaseThe chirp call.
The following holds (Lean statement, in the scope of module Solutions.KFMBig2):
theorem NLogN.KFM.chirp_phase [∀ i, NeZero (tBD n D i)] {eC : Fin (7 + P')} {dS : Fin HS} {C₀ : ℝ} {A : ℕ}
{θt θit at' bt : ((i : Fin (D + 1)) → ZMod (tBD n D i)) → ℂ} (hd0 : dS ≠ 0)
(hC : chirpGN Isym ext eC dS C₀ A n D θt θit at' bt) (Bd : ℕ)
(hBd : ∀ x ∈ descChirpN n, zsz x ≤ Bd)
(t : IState HS) (hR : BaseOK t n) (xs : List GI) (x : ((i : Fin (D + 1)) → ZMod (tBD n D i)) → ℂ)
(R0 : List Item) (h0 : t.G 0 = ints (gflat xs) ++ R0)
(hx : RepFull (pP n) (tBD n D) xs x) (hx1 : ‖x‖ ≤ 6 / 10) :
∃ (Mrt : (((i : Fin (D + 1)) → ZMod (tBD n D i)) → ℂ) →
(((i : Fin (D + 1)) → ZMod (tBD n D i)) → ℂ) →
(((i : Fin (D + 1)) → ZMod (tBD n D i)) → ℂ)),
(∀ f g, Grid (pP n) f → Grid (pP n) g → ‖f‖ ≤ 1 → ‖g‖ ≤ 1 →
‖Mrt f g - mrX (tBD n D) f g‖ ≤ ErC n D * hp (pP n)) ∧
∃ (ys : List GI) (c : ℕ),
IRuns Isym iprog (callW (descChirpP (bX dS)) (bX dS) (bY dS) dS (g eC)) t
(t.upd 0 (ints (gflat ys) ++ R0)) c ∧
RepFull (pP n) (tBD n D) ys (chirpT (pP n) (mcT (pP n) Mrt θt θit) bt at' x) ∧
NLogN.KFB.GB (pP n + 2) ys ∧ (c : ℝ) ≤ kChirp n Bd C₀ A
Context. The lemma belongs to the part KFM Big2: the interface calls of bigE: Every interface call is callW bld X Y dS e (KFMCall) with the descriptor builder bld (KFMSB,
KFMSF) on the builder stack X = bX dS and the scratch Y = bY dS (both differ from the
interface's descriptor stack dS). A run of the interface in its own table kTable ext is a run
in the merged table (IRuns.relabel).
Formalization Note. This lemma belongs to layer 5 of the Lean formalization (integer-multiplication-kappa campaign) of the OpenAI preprint Integer multiplication below : the uniform item-language machine (register programs over the NLogN multitape framework) assembling the Proposition 14 / Lemma 13 / Proposition 18 pieces, the resampling and chirp stages and the cost recurrences into one fixed machine, culminating in NLogN.KFTop.kappa_bound : IntMul.KappaBound (1 / 2 ^ 182) (the bound of Def_IntMul_MultitapeModel). All names refer to the definition bundles up to IntMul_Kappa_K_Defs33.
-- OpenAI-preprint / κ-improvement development (integer-multiplication-kappa), generated by skeleton subtraction.
import Definitions.Def_IntMul_Kappa_K_Defs33
set_option autoImplicit false
set_option relaxedAutoImplicit false
set_option maxHeartbeats 1000000
set_option linter.unusedSimpArgs false
set_option linter.unusedVariables false
open NLogN
open NLogN.KFM
open AModel AModelL12 IntMul KIL KFB KFT RS IntMul.HvdH IntMul.OpenAI.RT IntMul.OpenAI.RC IntMul.OpenAI.Glue
IntMul.OpenAI.RCost
variable {P P' : ℕ} {Isym : List Sym} {iprog : Fin P → IStmt HS P}
{ext : Fin P' → IStmt HS (7 + P')} {g : Fin (7 + P') → Fin P}
(hprog : ∀ j, iprog (g j) = (kTable ext j).ren id g)
{n D : ℕ} (hn : n0 ≤ n) (hD : dP n = D + 1)
include hprog hn
theorem NLogN.KFM.chirp_phase [∀ i, NeZero (tBD n D i)] {eC : Fin (7 + P')} {dS : Fin HS} {C₀ : ℝ} {A : ℕ}
{θt θit at' bt : ((i : Fin (D + 1)) → ZMod (tBD n D i)) → ℂ} (hd0 : dS ≠ 0)
(hC : chirpGN Isym ext eC dS C₀ A n D θt θit at' bt) (Bd : ℕ)
(hBd : ∀ x ∈ descChirpN n, zsz x ≤ Bd)
(t : IState HS) (hR : BaseOK t n) (xs : List GI) (x : ((i : Fin (D + 1)) → ZMod (tBD n D i)) → ℂ)
(R0 : List Item) (h0 : t.G 0 = ints (gflat xs) ++ R0)
(hx : RepFull (pP n) (tBD n D) xs x) (hx1 : ‖x‖ ≤ 6 / 10) :
∃ (Mrt : (((i : Fin (D + 1)) → ZMod (tBD n D i)) → ℂ) →
(((i : Fin (D + 1)) → ZMod (tBD n D i)) → ℂ) →
(((i : Fin (D + 1)) → ZMod (tBD n D i)) → ℂ)),
(∀ f g, Grid (pP n) f → Grid (pP n) g → ‖f‖ ≤ 1 → ‖g‖ ≤ 1 →
‖Mrt f g - mrX (tBD n D) f g‖ ≤ ErC n D * hp (pP n)) ∧
∃ (ys : List GI) (c : ℕ),
IRuns Isym iprog (callW (descChirpP (bX dS)) (bX dS) (bY dS) dS (g eC)) t
(t.upd 0 (ints (gflat ys) ++ R0)) c ∧
RepFull (pP n) (tBD n D) ys (chirpT (pP n) (mcT (pP n) Mrt θt θit) bt at' x) ∧
NLogN.KFB.GB (pP n + 2) ys ∧ (c : ℝ) ≤ kChirp n Bd C₀ A := by sorry