A wanted-item execution combines the dense guard with terminal search
ProvedThreeSum.LightReportingWanted.program_meetsLet be a key-consistent wanted item for raw incidences , and fix . Suppose memory stores exact source stages, all required catalogs, decoded output rows, occurrence and cover data, and residue buckets and values for physical arrays . The retained counter stores and its threshold stores ; let be the actual root mass.
Assume the stated source and catalog bounds, separated counter/row/frontier and terminal layouts, query-scratch contracts, and terminal resource bounds. In particular , all values and targets, and fit words; , and the depth allowance is , where . Execution returns a Boolean with
It preserves memory below packed rows except the counter. Time is initialization plus , with the search budget added only if the guard does not fire.
This is the complete guarded contract for one wanted item.
/- Copyright (c) 2026 Anthropic, PBC. All rights reserved. Released under Apache 2.0 license as described in the file LICENSE. SPDX-License-Identifier: Apache-2.0 -/ import Aesop import Definitions.Def_APSPSource_RemainingDefinitions import Definitions.Def_APSPSource_ThreeSumApsp_Lang_Logic import Definitions.Def_APSPSource_ThreeSumApsp_Lang_Regions import Definitions.Def_APSPSource_ThreeSumApsp_Lang_Syntax import Definitions.Def_ThreeSum1962Source_Bundle01 import Definitions.Def_ThreeSum1962Source_Bundle02 import Definitions.Def_ThreeSum1962Source_Bundle03 import Definitions.Def_ThreeSum1962Source_Bundle04 import Definitions.Def_ThreeSum1962Source_Bundle05 import Definitions.Def_ThreeSum1962Source_Bundle07 import Definitions.Def_ThreeSum1962Source_Bundle08 import Definitions.Def_ThreeSum1962Source_Bundle09 import Definitions.Def_ThreeSum1962Source_Bundle10 import Definitions.Def_ThreeSum1962Source_Bundle11 import Definitions.Def_ThreeSum1962Source_Bundle12 import Definitions.Def_ThreeSum1962Source_Bundle13 import Definitions.Def_ThreeSum1962Source_Bundle14 import Definitions.Def_ThreeSum1962Source_Bundle15 import Definitions.Def_ThreeSum1962Source_Bundle17 import Lean.Elab.Tactic.Omega import Mathlib.Algebra.BigOperators.Fin import Mathlib.Algebra.BigOperators.Group.Finset.Basic import Mathlib.Algebra.BigOperators.Group.Finset.Piecewise import Mathlib.Algebra.BigOperators.Group.Finset.Powerset import Mathlib.Algebra.BigOperators.Group.Finset.Sigma import Mathlib.Algebra.BigOperators.Ring.Finset import Mathlib.Algebra.Field.ZMod import Mathlib.Algebra.Group.Equiv.Basic import Mathlib.Algebra.Group.Int.Defs import Mathlib.Algebra.GroupWithZero.Nat import Mathlib.Algebra.Order.BigOperators.Group.Finset import Mathlib.Algebra.Order.BigOperators.Group.List import Mathlib.Algebra.Order.BigOperators.Group.Multiset import Mathlib.Algebra.Order.Chebyshev import Mathlib.Algebra.Order.Field.Basic import Mathlib.Algebra.Order.Floor.Div import Mathlib.Algebra.Order.Group.Abs import Mathlib.Algebra.Order.Group.Int import Mathlib.Algebra.Order.Group.Nat import Mathlib.Algebra.Order.Group.Unbundled.Abs import Mathlib.Algebra.Order.Ring.Abs import Mathlib.Algebra.Order.Ring.Int import Mathlib.Algebra.Order.Ring.Nat import Mathlib.Algebra.Order.Ring.Pow import Mathlib.Algebra.Polynomial.Basic import Mathlib.Algebra.Polynomial.Coeff import Mathlib.Algebra.Ring.Nat import Mathlib.Combinatorics.Colex import Mathlib.Data.Bool.Basic import Mathlib.Data.Fin.Embedding import Mathlib.Data.Fin.VecNotation import Mathlib.Data.Finset.Basic import Mathlib.Data.Finset.Card import Mathlib.Data.Finset.Max import Mathlib.Data.Finset.Powerset import Mathlib.Data.Finset.Prod import Mathlib.Data.Finset.Range import Mathlib.Data.Finset.Sigma import Mathlib.Data.Finset.Sort import Mathlib.Data.Fintype.BigOperators import Mathlib.Data.Fintype.Card import Mathlib.Data.Fintype.EquivFin import Mathlib.Data.Fintype.Fin import Mathlib.Data.Fintype.Pi import Mathlib.Data.Fintype.Prod import Mathlib.Data.Int.Cast.Lemmas import Mathlib.Data.Int.ModEq import Mathlib.Data.Int.Notation import Mathlib.Data.Int.SuccPred import Mathlib.Data.List.Basic import Mathlib.Data.List.GetD import Mathlib.Data.List.MinMax import Mathlib.Data.List.Nodup import Mathlib.Data.List.OfFn import Mathlib.Data.List.Pi import Mathlib.Data.List.ProdSigma import Mathlib.Data.List.Range import Mathlib.Data.List.Sublists import Mathlib.Data.List.TakeDrop import Mathlib.Data.Nat.Cast.Order.Ring import Mathlib.Data.Nat.Choose.Basic import Mathlib.Data.Nat.Choose.Bounds import Mathlib.Data.Nat.Choose.Central import Mathlib.Data.Nat.Choose.Sum import Mathlib.Data.Nat.Count import Mathlib.Data.Nat.Log import Mathlib.Data.Nat.Notation import Mathlib.Data.Nat.Size import Mathlib.Data.Nat.Sqrt import Mathlib.Data.Nat.SuccPred import Mathlib.Data.Real.Basic import Mathlib.Data.ZMod.Basic import Mathlib.GroupTheory.Index import Mathlib.LinearAlgebra.Dual.Lemmas import Mathlib.LinearAlgebra.Matrix.Defs import Mathlib.LinearAlgebra.Matrix.Dual import Mathlib.LinearAlgebra.Matrix.ToLin import Mathlib.Logic.Equiv.Fin.Basic import Mathlib.Logic.Function.Basic import Mathlib.NumberTheory.Bertrand import Mathlib.Order.ConditionallyCompleteLattice.Basic import Mathlib.RingTheory.Coprime.Lemmas import Mathlib.Tactic import Mathlib.Tactic.Abel import Mathlib.Tactic.ByContra import Mathlib.Tactic.FieldSimp import Mathlib.Tactic.FinCases import Mathlib.Tactic.GCongr import Mathlib.Tactic.Linarith import Mathlib.Tactic.NormNum import Mathlib.Tactic.Positivity import Mathlib.Tactic.Push import Mathlib.Tactic.Ring import Mathlib.Tactic.SplitIfs import Mathlib.Tactic.Tauto import Theorems.Thm_ThreeSum_BlockSourceCoverInput_Input_of_kept import Theorems.Thm_ThreeSum_LightReportingWantedInitializeSeparated_program_meets import Theorems.Thm_ThreeSum_LightReportingWantedSearch_program_meets import Theorems.Thm_ThreeSum_ReportingHostLevelData_Stored_of_kept import Theorems.Thm_ThreeSum_SubsetAddress_layerRank_lt set_option autoImplicit false set_option relaxedAutoImplicit false set_option Elab.async false namespace Light end Light namespace ThreeSum.BlockCoefficientRows end ThreeSum.BlockCoefficientRows namespace ThreeSum.BlockEncoding end ThreeSum.BlockEncoding namespace ThreeSum.BlockForced end ThreeSum.BlockForced namespace ThreeSum.BlockIndex end ThreeSum.BlockIndex namespace ThreeSum.BlockIndexedQuery end ThreeSum.BlockIndexedQuery namespace ThreeSum.BlockMaskLayout end ThreeSum.BlockMaskLayout namespace ThreeSum.BlockRows end ThreeSum.BlockRows namespace ThreeSum.BlockSourceEncoding end ThreeSum.BlockSourceEncoding namespace ThreeSum.GlobalEncoding end ThreeSum.GlobalEncoding namespace ThreeSum.LightBlockQuery end ThreeSum.LightBlockQuery namespace ThreeSum.LightBlockSourceBuild end ThreeSum.LightBlockSourceBuild namespace ThreeSum.LightHistogram end ThreeSum.LightHistogram namespace ThreeSum.LightPascal end ThreeSum.LightPascal namespace ThreeSum.LightReportingPrefixCatalog end ThreeSum.LightReportingPrefixCatalog namespace ThreeSum.LightReportingSuffixCatalog end ThreeSum.LightReportingSuffixCatalog namespace ThreeSum.LightReportingTerminalMasks end ThreeSum.LightReportingTerminalMasks namespace ThreeSum.LightResidues end ThreeSum.LightResidues namespace ThreeSum.LightSourceResidues end ThreeSum.LightSourceResidues namespace ThreeSum.LightZetaCell end ThreeSum.LightZetaCell namespace ThreeSum.LocalCoverBounds end ThreeSum.LocalCoverBounds namespace ThreeSum.MaskDecode end ThreeSum.MaskDecode namespace ThreeSum.RawIncidences end ThreeSum.RawIncidences namespace ThreeSum.RawPrefixCounts end ThreeSum.RawPrefixCounts namespace ThreeSum.RawReporting end ThreeSum.RawReporting namespace ThreeSum.ReportingHostBucketTest end ThreeSum.ReportingHostBucketTest namespace ThreeSum.ReportingHostFrontierLayout end ThreeSum.ReportingHostFrontierLayout namespace ThreeSum.ReportingHostLevelData end ThreeSum.ReportingHostLevelData namespace ThreeSum.ReportingHostMasks end ThreeSum.ReportingHostMasks namespace ThreeSum.ReportingHostPrefixOrder end ThreeSum.ReportingHostPrefixOrder namespace ThreeSum.ReportingHostSuffix end ThreeSum.ReportingHostSuffix namespace ThreeSum.SourceBuckets end ThreeSum.SourceBuckets namespace ThreeSum.StoredReporting end ThreeSum.StoredReporting namespace ThreeSum.SubsetAddress end ThreeSum.SubsetAddress namespace ThreeSumApsp end ThreeSumApsp universe u_1 u_2 u_3
theorem ThreeSum.LightReportingWanted.program_meets : ∀ {lim : Light.Limits} {α : Type u_1} {β : Type u_2} {γ : Type u_3} [Fintype.{u_1} α] [Fintype.{u_2} β]
[Fintype.{u_3} γ] [inst : DecidableEq.{u_1 + 1} α] [DecidableEq.{u_2 + 1} β] [DecidableEq.{u_3 + 1} γ] {μ : Nat → Int}
{h J K srcL srcR offsetsL offsetsR flatL flatR NL NR occ maps candidates histL histR root catalogs rawRows rows cover
counter baseL baseR masks childL childR counts selected maskBase work terminalMasks masksL masksR base bitBase
rowOut old threshold d : Nat}
(p : Nat) (shift : Int) (left right : Nat → Int) (A : Finset.{u_1} α) (B : Finset.{u_2} β) (C : Finset.{u_3} γ)
(a : α → Int) (b : β → Int) (c : γ → Int) (w : ThreeSum.RawReporting.Wanted.{u_1} h J α)
(D : Nat → ThreeSum.ReportingHostLevelData.Catalog) (hK : @LE.le.{0} Nat instLENat K J)
(hkey :
And
(@Membership.mem.{u_1, u_1} α (Finset.{u_1} α)
(@SetLike.instMembership.{u_1, u_1} (Finset.{u_1} α) α (@Finset.instSetLike.{u_1} α)) A
(@Prod.fst.{u_1, 0} α
(Prod.{0, 0} (Fin (@OfNat.ofNat.{0} Nat (nat_lit 3) (instOfNatNat (nat_lit 3))))
(ThreeSum.GlobalEncoding.GlobalOutput h J))
w))
(@Dvd.dvd.{0} Int Int.instDvd (ThreeSum.GlobalEncoding.globalModulus h J)
(@HSub.hSub.{0, 0, 0} Int Int Int (@instHSub.{0} Int Int.instSub)
(@HAdd.hAdd.{0, 0, 0} Int Int Int (@instHAdd.{0} Int Int.instAdd)
(@HAdd.hAdd.{0, 0, 0} Int Int Int (@instHAdd.{0} Int Int.instAdd)
(@HMod.hMod.{0, 0, 0} Int Int Int (@instHMod.{0} Int Int.instMod)
(a
(@Prod.fst.{u_1, 0} α
(Prod.{0, 0} (Fin (@OfNat.ofNat.{0} Nat (nat_lit 3) (instOfNatNat (nat_lit 3))))
(ThreeSum.GlobalEncoding.GlobalOutput h J))
w))
(@Nat.cast.{0} Int instNatCastInt p))
(@HMul.hMul.{0, 0, 0} Int Int Int (@instHMul.{0} Int Int.instMul)
(ThreeSum.RawIncidences.lift
(@Prod.fst.{0, 0} (Fin (@OfNat.ofNat.{0} Nat (nat_lit 3) (instOfNatNat (nat_lit 3))))
(ThreeSum.GlobalEncoding.GlobalOutput h J)
(@Prod.snd.{u_1, 0} α
(Prod.{0, 0} (Fin (@OfNat.ofNat.{0} Nat (nat_lit 3) (instOfNatNat (nat_lit 3))))
(ThreeSum.GlobalEncoding.GlobalOutput h J))
w)))
(@Nat.cast.{0} Int instNatCastInt p)))
shift)
(@ThreeSum.GlobalEncoding.globalKey h J
(@Prod.snd.{0, 0} (Fin (@OfNat.ofNat.{0} Nat (nat_lit 3) (instOfNatNat (nat_lit 3))))
(ThreeSum.GlobalEncoding.GlobalOutput h J)
(@Prod.snd.{u_1, 0} α
(Prod.{0, 0} (Fin (@OfNat.ofNat.{0} Nat (nat_lit 3) (instOfNatNat (nat_lit 3))))
(ThreeSum.GlobalEncoding.GlobalOutput h J))
w))))))
(hw : @LE.le.{0} Int Int.instLEInt (@Nat.cast.{0} Int instNatCastInt lim.space) lim.word)
(HS :
@ThreeSum.ReportingHostLevelData.Sources.{u_2, u_3} β γ h J μ (@Nat.cast.{0} Int instNatCastInt p) shift B C b c
(@Prod.snd.{0, 0} (Fin (@OfNat.ofNat.{0} Nat (nat_lit 3) (instOfNatNat (nat_lit 3))))
(ThreeSum.GlobalEncoding.GlobalOutput h J)
(@Prod.snd.{u_1, 0} α
(Prod.{0, 0} (Fin (@OfNat.ofNat.{0} Nat (nat_lit 3) (instOfNatNat (nat_lit 3))))
(ThreeSum.GlobalEncoding.GlobalOutput h J))
w))
baseL baseR)
(HC :
∀ (j : Nat) (hj : @LE.le.{0} Nat instLENat j K),
@ThreeSum.ReportingHostLevelData.Stored.{u_2, u_3} β γ h J j μ (D j)
(@LE.le.trans.{0} Nat Nat.instPreorder j K J hj hK) (@Nat.cast.{0} Int instNatCastInt p) shift B C b c
(@Prod.snd.{0, 0} (Fin (@OfNat.ofNat.{0} Nat (nat_lit 3) (instOfNatNat (nat_lit 3))))
(ThreeSum.GlobalEncoding.GlobalOutput h J)
(@Prod.snd.{u_1, 0} α
(Prod.{0, 0} (Fin (@OfNat.ofNat.{0} Nat (nat_lit 3) (instOfNatNat (nat_lit 3))))
(ThreeSum.GlobalEncoding.GlobalOutput h J))
w)))
(HB :
∀ (j : Nat), @LE.le.{0} Nat instLENat j K → ThreeSum.ReportingHostLevelData.Bounds h J j (D j) baseL baseR counter)
(HW :
∀ (j : Nat),
@LE.le.{0} Nat instLENat j K →
ThreeSum.ReportingHostLevelData.Scratch lim h J j (D j) (@Finset.card.{u_2} β B) (@Finset.card.{u_3} γ C)
maskBase work)
(hmeta :
∀ (j : Nat),
@LE.le.{0} Nat instLENat j K →
Light.SegN μ
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) catalogs
(@HMul.hMul.{0, 0, 0} Nat Nat Nat (@instHMul.{0} Nat instMulNat)
(@OfNat.ofNat.{0} Nat (nat_lit 5) (instOfNatNat (nat_lit 5))) j))
((D j).record h j))
(hmetaEnd :
@LE.le.{0} Nat instLENat
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) catalogs
(@HMul.hMul.{0, 0, 0} Nat Nat Nat (@instHMul.{0} Nat instMulNat)
(@OfNat.ofNat.{0} Nat (nat_lit 5) (instOfNatNat (nat_lit 5)))
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) K
(@OfNat.ofNat.{0} Nat (nat_lit 1) (instOfNatNat (nat_lit 1))))))
counter)
(hraw : @LE.le.{0} Nat instLENat (@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) rawRows J) rows)
(hrows : @LE.le.{0} Nat instLENat (@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) rows J) root)
(hcounter :
@LE.le.{0} Nat instLENat
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) counter
(@OfNat.ofNat.{0} Nat (nat_lit 2) (instOfNatNat (nat_lit 2))))
rawRows)
(hgroup :
@Eq.{1} Int
(μ
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) cover
(@OfNat.ofNat.{0} Nat (nat_lit 3) (instOfNatNat (nat_lit 3)))))
(@Nat.cast.{0} Int instNatCastInt (ThreeSum.LocalCoverBounds.groupSize h)))
(hcoverEnd :
@LE.le.{0} Nat instLENat
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) cover
(@OfNat.ofNat.{0} Nat (nat_lit 4) (instOfNatNat (nat_lit 4))))
counter)
(hreadRaw :
Light.SegN μ rawRows
(@ThreeSum.BlockMaskLayout.rawMasks J
(@HMul.hMul.{0, 0, 0} Nat Nat Nat (@instHMul.{0} Nat instMulNat)
(@OfNat.ofNat.{0} Nat (nat_lit 512) (instOfNatNat (nat_lit 512))) h)
(@ThreeSum.BlockForced.outputRows h J
(@Prod.snd.{0, 0} (Fin (@OfNat.ofNat.{0} Nat (nat_lit 3) (instOfNatNat (nat_lit 3))))
(ThreeSum.GlobalEncoding.GlobalOutput h J)
(@Prod.snd.{u_1, 0} α
(Prod.{0, 0} (Fin (@OfNat.ofNat.{0} Nat (nat_lit 3) (instOfNatNat (nat_lit 3))))
(ThreeSum.GlobalEncoding.GlobalOutput h J))
w)))))
(hcounterRead : @Eq.{1} Int (μ counter) (@Nat.cast.{0} Int instNatCastInt old))
(hthreshold :
@Eq.{1} Int
(μ
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) counter
(@OfNat.ofNat.{0} Nat (nat_lit 1) (instOfNatNat (nat_lit 1)))))
(@Nat.cast.{0} Int instNatCastInt threshold))
(hguardWord :
@LE.le.{0} Int Int.instLEInt
(@Nat.cast.{0} Int instNatCastInt
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat)
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat)
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) old
(@ThreeSum.ReportingHostFrontierLayout.rootMass.{u_1, u_2, u_3} α β γ inst h J
(@ThreeSum.RawIncidences.rawOn.{u_1, u_2, u_3} α β γ h J (@Nat.cast.{0} Int instNatCastInt p) shift
(@SProd.sprod.{u_1, max u_2 u_3, max (max u_1 u_2) u_3} (Finset.{u_1} α)
(Finset.{max u_3 u_2} (Prod.{u_2, u_3} β γ))
(Finset.{max (max u_2 u_3) u_1} (Prod.{u_1, max u_2 u_3} α (Prod.{u_2, u_3} β γ)))
(@Finset.instSProd.{u_1, max u_2 u_3} α (Prod.{u_2, u_3} β γ)) A
(@SProd.sprod.{u_2, u_3, max u_2 u_3} (Finset.{u_2} β) (Finset.{u_3} γ)
(Finset.{max u_3 u_2} (Prod.{u_2, u_3} β γ)) (@Finset.instSProd.{u_2, u_3} β γ) B C))
a b c)
w))
threshold)
(@OfNat.ofNat.{0} Nat (nat_lit 2) (instOfNatNat (nat_lit 2)))))
lim.word)
(hout :
@LE.le.{0} Nat instLENat
(ThreeSum.ReportingHostFrontierLayout.slot root
(@ThreeSum.ReportingHostFrontierLayout.capacity.{u_1, u_2, u_3} α β γ inst h J
(@ThreeSum.RawIncidences.rawOn.{u_1, u_2, u_3} α β γ h J (@Nat.cast.{0} Int instNatCastInt p) shift
(@SProd.sprod.{u_1, max u_2 u_3, max (max u_1 u_2) u_3} (Finset.{u_1} α)
(Finset.{max u_3 u_2} (Prod.{u_2, u_3} β γ))
(Finset.{max (max u_2 u_3) u_1} (Prod.{u_1, max u_2 u_3} α (Prod.{u_2, u_3} β γ)))
(@Finset.instSProd.{u_1, max u_2 u_3} α (Prod.{u_2, u_3} β γ)) A
(@SProd.sprod.{u_2, u_3, max u_2 u_3} (Finset.{u_2} β) (Finset.{u_3} γ)
(Finset.{max u_3 u_2} (Prod.{u_2, u_3} β γ)) (@Finset.instSProd.{u_2, u_3} β γ) B C))
a b c)
w)
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) K
(@OfNat.ofNat.{0} Nat (nat_lit 1) (instOfNatNat (nat_lit 1)))))
masks)
(hmasks :
@LE.le.{0} Nat instLENat
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) masks (ThreeSum.LocalCoverBounds.groupSize h))
childL)
(hchildL :
@LE.le.{0} Nat instLENat
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) childL (ThreeSum.LocalCoverBounds.groupSize h))
childR)
(hchildR :
@LE.le.{0} Nat instLENat
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) childR (ThreeSum.LocalCoverBounds.groupSize h))
counts)
(hcounts :
@LE.le.{0} Nat instLENat
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) counts (ThreeSum.LocalCoverBounds.groupSize h))
selected)
(hselected :
@LE.le.{0} Nat instLENat
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) selected (ThreeSum.LocalCoverBounds.groupSize h))
maskBase)
(hparams :
@LE.le.{0} Nat instLENat
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat)
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat)
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) J
(@HMul.hMul.{0, 0, 0} Nat Nat Nat (@instHMul.{0} Nat instMulNat)
(@OfNat.ofNat.{0} Nat (nat_lit 512) (instOfNatNat (nat_lit 512))) h))
(ThreeSum.LocalCoverBounds.groupSize h))
(ThreeSum.LightBlockQuery.sourceCut h J))
lim.space)
(hpackSpace :
@LE.le.{0} Nat instLENat
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) work
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat)
(@HMul.hMul.{0, 0, 0} Nat Nat Nat (@instHMul.{0} Nat instMulNat)
(@OfNat.ofNat.{0} Nat (nat_lit 512) (instOfNatNat (nat_lit 512))) h)
(@OfNat.ofNat.{0} Nat (nat_lit 1) (instOfNatNat (nat_lit 1)))))
lim.space)
(HL :
ThreeSum.SourceBuckets.Stored μ
(fun (i : Nat) =>
ThreeSum.LightSourceResidues.key p (ThreeSum.BlockSourceEncoding.modulus h J)
(@OfNat.ofNat.{0} Int (nat_lit 0) (@instOfNat (nat_lit 0))) (left i))
NL (ThreeSum.BlockSourceEncoding.modulus h J) offsetsL flatL)
(HR :
ThreeSum.SourceBuckets.Stored μ
(fun (i : Nat) => ThreeSum.LightSourceResidues.key p (ThreeSum.BlockSourceEncoding.modulus h J) shift (right i))
NR (ThreeSum.BlockSourceEncoding.modulus h J) offsetsR flatR)
(hsrcL : @LE.le.{0} Nat instLENat (@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) srcL NL) counter)
(hsrcR : @LE.le.{0} Nat instLENat (@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) srcR NR) counter)
(hoffsetsL :
@LE.le.{0} Nat instLENat
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat)
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) offsetsL
(ThreeSum.BlockSourceEncoding.modulus h J))
(@OfNat.ofNat.{0} Nat (nat_lit 1) (instOfNatNat (nat_lit 1))))
counter)
(hoffsetsR :
@LE.le.{0} Nat instLENat
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat)
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) offsetsR
(ThreeSum.BlockSourceEncoding.modulus h J))
(@OfNat.ofNat.{0} Nat (nat_lit 1) (instOfNatNat (nat_lit 1))))
counter)
(hflatL : @LE.le.{0} Nat instLENat (@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) flatL NL) counter)
(hflatR : @LE.le.{0} Nat instLENat (@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) flatR NR) counter)
(hocc : @LE.le.{0} Nat instLENat (@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) occ J) rows)
(hoccApart : Light.Apart counter (@OfNat.ofNat.{0} Nat (nat_lit 1) (instOfNatNat (nat_lit 1))) occ J)
(hmaps :
@LE.le.{0} Nat instLENat
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) maps
(@HMul.hMul.{0, 0, 0} Nat Nat Nat (@instHMul.{0} Nat instMulNat)
(@HMul.hMul.{0, 0, 0} Nat Nat Nat (@instHMul.{0} Nat instMulNat)
(@OfNat.ofNat.{0} Nat (nat_lit 2) (instOfNatNat (nat_lit 2)))
(@HMul.hMul.{0, 0, 0} Nat Nat Nat (@instHMul.{0} Nat instMulNat)
(@OfNat.ofNat.{0} Nat (nat_lit 512) (instOfNatNat (nat_lit 512))) h))
(ThreeSum.GlobalEncoding.scheduleSize h)))
counter)
(hcandidates :
@LE.le.{0} Nat instLENat
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) candidates
(ThreeSum.GlobalEncoding.scheduleSize h))
counter)
(hleft :
@LE.le.{0} Nat instLENat
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) histL
(@HMul.hMul.{0, 0, 0} Nat Nat Nat (@instHMul.{0} Nat instMulNat) (ThreeSum.LightLocalCoverSchedule.rows h)
(ThreeSum.LocalCoverBounds.localPrime h)))
counter)
(hright :
@LE.le.{0} Nat instLENat
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) histR
(@HMul.hMul.{0, 0, 0} Nat Nat Nat (@instHMul.{0} Nat instMulNat) (ThreeSum.LightLocalCoverSchedule.rows h)
(ThreeSum.LocalCoverBounds.localPrime h)))
counter)
(hterminalSlot :
@LE.le.{0} Nat instLENat
(ThreeSum.ReportingHostFrontierLayout.slot root
(@ThreeSum.ReportingHostFrontierLayout.capacity.{u_1, u_2, u_3} α β γ inst h J
(@ThreeSum.RawIncidences.rawOn.{u_1, u_2, u_3} α β γ h J (@Nat.cast.{0} Int instNatCastInt p) shift
(@SProd.sprod.{u_1, max u_2 u_3, max (max u_1 u_2) u_3} (Finset.{u_1} α)
(Finset.{max u_3 u_2} (Prod.{u_2, u_3} β γ))
(Finset.{max (max u_2 u_3) u_1} (Prod.{u_1, max u_2 u_3} α (Prod.{u_2, u_3} β γ)))
(@Finset.instSProd.{u_1, max u_2 u_3} α (Prod.{u_2, u_3} β γ)) A
(@SProd.sprod.{u_2, u_3, max u_2 u_3} (Finset.{u_2} β) (Finset.{u_3} γ)
(Finset.{max u_3 u_2} (Prod.{u_2, u_3} β γ)) (@Finset.instSProd.{u_2, u_3} β γ) B C))
a b c)
w)
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) K
(@OfNat.ofNat.{0} Nat (nat_lit 1) (instOfNatNat (nat_lit 1)))))
terminalMasks)
(hterminalMasks :
@LE.le.{0} Nat instLENat
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) terminalMasks
(ThreeSum.LightReportingTerminalMasks.count h J K))
masksL)
(hmasksL :
@LE.le.{0} Nat instLENat
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) masksL
(ThreeSum.LightReportingTerminalMasks.count h J K))
masksR)
(hmasksR :
@LE.le.{0} Nat instLENat
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) masksR
(ThreeSum.LightReportingTerminalMasks.count h J K))
base)
(hstop :
@LE.le.{0} Nat instLENat
(ThreeSum.LightReportingTerminalPreparation.stop base
(@HMul.hMul.{0, 0, 0} Nat Nat Nat (@instHMul.{0} Nat instMulNat) J
(@HMul.hMul.{0, 0, 0} Nat Nat Nat (@instHMul.{0} Nat instMulNat)
(@OfNat.ofNat.{0} Nat (nat_lit 512) (instOfNatNat (nat_lit 512))) h))
(ThreeSum.LightReportingTerminalMasks.count h J K))
bitBase)
(hbits :
@LE.le.{0} Nat instLENat
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) bitBase
(@HMul.hMul.{0, 0, 0} Nat Nat Nat (@instHMul.{0} Nat instMulNat) J
(@HMul.hMul.{0, 0, 0} Nat Nat Nat (@instHMul.{0} Nat instMulNat)
(@OfNat.ofNat.{0} Nat (nat_lit 512) (instOfNatNat (nat_lit 512))) h)))
rowOut)
(hrowOut :
@LE.le.{0} Nat instLENat
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) rowOut
(@OfNat.ofNat.{0} Nat (nat_lit 2) (instOfNatNat (nat_lit 2))))
work)
(hspace : @LE.le.{0} Nat instLENat (ThreeSum.LightReportingTerminal.space work h J) lim.space)
(hword :
@LE.le.{0} Int Int.instLEInt (@Nat.cast.{0} Int instNatCastInt (ThreeSum.LightReportingTerminal.word h J)) lim.word)
(hoccRead :
∀ (j : Nat),
@LT.lt.{0} Nat instLTNat j J →
@Eq.{1} Int (μ (@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) occ j))
(@Nat.cast.{0} Int instNatCastInt
(@ThreeSum.BlockCoefficientRows.occurrenceIndices h J
(@ThreeSum.BlockEncoding.outputOccurrences h J
(@Prod.snd.{0, 0} (Fin (@OfNat.ofNat.{0} Nat (nat_lit 3) (instOfNatNat (nat_lit 3))))
(ThreeSum.GlobalEncoding.GlobalOutput h J)
(@Prod.snd.{u_1, 0} α
(Prod.{0, 0} (Fin (@OfNat.ofNat.{0} Nat (nat_lit 3) (instOfNatNat (nat_lit 3))))
(ThreeSum.GlobalEncoding.GlobalOutput h J))
w)))
j)))
(hcover : ThreeSum.BlockSourceCoverInput.Input μ h maps candidates histL histR)
(hreadL :
∀ (i : Nat),
@LT.lt.{0} Nat instLTNat i NL →
@Eq.{1} Int (μ (@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) srcL i)) (left i))
(hreadR :
∀ (j : Nat),
@LT.lt.{0} Nat instLTNat j NR →
@Eq.{1} Int (μ (@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) srcR j)) (right j))
(hvaluesL :
∀ (i : Nat),
@LT.lt.{0} Nat instLTNat i NL →
@LE.le.{0} Int Int.instLEInt (@abs.{0} Int instLatticeInt Int.instAddGroup (left i)) lim.word)
(hvaluesR :
∀ (j : Nat),
@LT.lt.{0} Nat instLTNat j NR →
@LE.le.{0} Int Int.instLEInt (@abs.{0} Int instLatticeInt Int.instAddGroup (right j)) lim.word)
(ha :
@LE.le.{0} Int Int.instLEInt
(@abs.{0} Int instLatticeInt Int.instAddGroup
(a
(@Prod.fst.{u_1, 0} α
(Prod.{0, 0} (Fin (@OfNat.ofNat.{0} Nat (nat_lit 3) (instOfNatNat (nat_lit 3))))
(ThreeSum.GlobalEncoding.GlobalOutput h J))
w)))
lim.word)
(htarget :
∀ (i : Nat),
@LT.lt.{0} Nat instLTNat i NL →
@LE.le.{0} Int Int.instLEInt
(@abs.{0} Int instLatticeInt Int.instAddGroup
(@HAdd.hAdd.{0, 0, 0} Int Int Int (@instHAdd.{0} Int Int.instAdd)
(a
(@Prod.fst.{u_1, 0} α
(Prod.{0, 0} (Fin (@OfNat.ofNat.{0} Nat (nat_lit 3) (instOfNatNat (nat_lit 3))))
(ThreeSum.GlobalEncoding.GlobalOutput h J))
w))
(left i)))
lim.word)
(hcountWord :
@LE.le.{0} Int Int.instLEInt
(@Nat.cast.{0} Int instNatCastInt (@HMul.hMul.{0, 0, 0} Nat Nat Nat (@instHMul.{0} Nat instMulNat) NL NR))
lim.word)
(hd :
@LE.le.{0} Nat instLENat
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat)
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat)
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat)
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat)
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) d K)
(@HMul.hMul.{0, 0, 0} Nat Nat Nat (@instHMul.{0} Nat instMulNat)
(@OfNat.ofNat.{0} Nat (nat_lit 2) (instOfNatNat (nat_lit 2))) (ThreeSum.LightBlockQuery.width h J)))
(@List.length.{0}
(List.{0}
(Finset.{0}
(Fin
(@HMul.hMul.{0, 0, 0} Nat Nat Nat (@instHMul.{0} Nat instMulNat)
(@OfNat.ofNat.{0} Nat (nat_lit 512) (instOfNatNat (nat_lit 512))) h))))
(@ThreeSum.ReportingHostFrontier.frontier.{u_1, u_2, u_3} α β γ inst h J
(@ThreeSum.RawIncidences.rawOn.{u_1, u_2, u_3} α β γ h J (@Nat.cast.{0} Int instNatCastInt p) shift
(@SProd.sprod.{u_1, max u_2 u_3, max (max u_1 u_2) u_3} (Finset.{u_1} α)
(Finset.{max u_3 u_2} (Prod.{u_2, u_3} β γ))
(Finset.{max (max u_2 u_3) u_1} (Prod.{u_1, max u_2 u_3} α (Prod.{u_2, u_3} β γ)))
(@Finset.instSProd.{u_1, max u_2 u_3} α (Prod.{u_2, u_3} β γ)) A
(@SProd.sprod.{u_2, u_3, max u_2 u_3} (Finset.{u_2} β) (Finset.{u_3} γ)
(Finset.{max u_3 u_2} (Prod.{u_2, u_3} β γ)) (@Finset.instSProd.{u_2, u_3} β γ) B C))
a b c)
w K)))
(ThreeSum.LightReportingTerminalMasks.count h J K))
(@OfNat.ofNat.{0} Nat (nat_lit 27) (instOfNatNat (nat_lit 27))))
lim.depth),
Light.Meets lim ThreeSum.LightReportingWanted.program
(@OfNat.ofNat.{0} Nat (nat_lit 137) (instOfNatNat (nat_lit 137))) d
(have y :=
have y :=
have y :=
@List.cons.{0} Nat base
(@List.cons.{0} Nat bitBase
(@List.cons.{0} Nat rowOut
(@List.cons.{0} Nat rawRows
(@List.cons.{0} Nat cover (@List.cons.{0} Nat counter (@List.nil.{0} Nat))))));
@List.cons.{0} Nat (@OfNat.ofNat.{0} Nat (nat_lit 0) (instOfNatNat (nat_lit 0)))
(@List.cons.{0} Nat (ThreeSum.LightBlockQuery.sourceCut h J)
(@List.cons.{0} Nat terminalMasks (@List.cons.{0} Nat masksL (@List.cons.{0} Nat masksR y))));
have y :=
@List.cons.{0} Nat childL
(@List.cons.{0} Nat childR
(@List.cons.{0} Nat counts
(@List.cons.{0} Nat selected (@List.cons.{0} Nat maskBase (@List.cons.{0} Nat work y)))));
@List.cons.{0} Nat catalogs
(@List.cons.{0} Nat rows (@List.cons.{0} Nat baseL (@List.cons.{0} Nat baseR (@List.cons.{0} Nat masks y))));
have y :=
have y :=
@List.cons.{0} Nat maps
(@List.cons.{0} Nat candidates
(@List.cons.{0} Nat histL (@List.cons.{0} Nat histR (@List.cons.{0} Nat K (@List.cons.{0} Nat root y)))));
@List.cons.{0} Nat
(@HMul.hMul.{0, 0, 0} Nat Nat Nat (@instHMul.{0} Nat instMulNat)
(@OfNat.ofNat.{0} Nat (nat_lit 512) (instOfNatNat (nat_lit 512))) h)
(@List.cons.{0} Nat h
(@List.cons.{0} Nat (ThreeSum.LocalCoverBounds.localPrime h)
(@List.cons.{0} Nat (ThreeSum.LocalCoverBounds.localBucketCap h) (@List.cons.{0} Nat occ y))));
have y :=
@List.cons.{0} Nat offsetsR
(@List.cons.{0} Nat flatR
(@List.cons.{0} Nat NL
(@List.cons.{0} Nat NR
(@List.cons.{0} Nat (ThreeSum.BlockSourceEncoding.modulus h J) (@List.cons.{0} Nat J y)))));
@List.cons.{0} Int
(a
(@Prod.fst.{u_1, 0} α
(Prod.{0, 0} (Fin (@OfNat.ofNat.{0} Nat (nat_lit 3) (instOfNatNat (nat_lit 3))))
(ThreeSum.GlobalEncoding.GlobalOutput h J))
w))
(@List.cons.{0} Int (@Nat.cast.{0} Int instNatCastInt srcL)
(@List.cons.{0} Int (@Nat.cast.{0} Int instNatCastInt srcR)
(@List.cons.{0} Int (@Nat.cast.{0} Int instNatCastInt offsetsL)
(@List.cons.{0} Int (@Nat.cast.{0} Int instNatCastInt flatL)
(@Bind.bind.{0, 0} List.{0} (@Monad.toBind.{0, 0} List.{0} List.instMonad.{0}) Nat Int y fun (a : Nat) =>
@Pure.pure.{0, 0} List.{0}
(@Applicative.toPure.{0, 0} List.{0} (@Monad.toApplicative.{0, 0} List.{0} List.instMonad.{0})) Int
(@Nat.cast.{0} Int instNatCastInt a)))))))
μ
(@ThreeSum.LightReportingWanted.time.{u_1, u_2, u_3} α β γ inst h J p shift left right NL NR old threshold
(@ThreeSum.RawIncidences.rawOn.{u_1, u_2, u_3} α β γ h J (@Nat.cast.{0} Int instNatCastInt p) shift
(@SProd.sprod.{u_1, max u_2 u_3, max (max u_1 u_2) u_3} (Finset.{u_1} α)
(Finset.{max u_3 u_2} (Prod.{u_2, u_3} β γ))
(Finset.{max (max u_2 u_3) u_1} (Prod.{u_1, max u_2 u_3} α (Prod.{u_2, u_3} β γ)))
(@Finset.instSProd.{u_1, max u_2 u_3} α (Prod.{u_2, u_3} β γ)) A
(@SProd.sprod.{u_2, u_3, max u_2 u_3} (Finset.{u_2} β) (Finset.{u_3} γ)
(Finset.{max u_3 u_2} (Prod.{u_2, u_3} β γ)) (@Finset.instSProd.{u_2, u_3} β γ) B C))
a b c)
w D K)
fun (r : Int) (ν : Nat → Int) =>
have I :=
@ThreeSum.RawIncidences.rawOn.{u_1, u_2, u_3} α β γ h J (@Nat.cast.{0} Int instNatCastInt p) shift
(@SProd.sprod.{u_1, max u_2 u_3, max (max u_1 u_2) u_3} (Finset.{u_1} α)
(Finset.{max u_3 u_2} (Prod.{u_2, u_3} β γ))
(Finset.{max (max u_2 u_3) u_1} (Prod.{u_1, max u_2 u_3} α (Prod.{u_2, u_3} β γ)))
(@Finset.instSProd.{u_1, max u_2 u_3} α (Prod.{u_2, u_3} β γ)) A
(@SProd.sprod.{u_2, u_3, max u_2 u_3} (Finset.{u_2} β) (Finset.{u_3} γ)
(Finset.{max u_3 u_2} (Prod.{u_2, u_3} β γ)) (@Finset.instSProd.{u_2, u_3} β γ) B C))
a b c;
And
(Or (@Eq.{1} Int r (@OfNat.ofNat.{0} Int (nat_lit 0) (@instOfNat (nat_lit 0))))
(@Eq.{1} Int r (@OfNat.ofNat.{0} Int (nat_lit 1) (@instOfNat (nat_lit 1)))))
(And
(Iff (@Eq.{1} Int r (@OfNat.ofNat.{0} Int (nat_lit 1) (@instOfNat (nat_lit 1))))
(Or
(@LT.lt.{0} Nat instLTNat threshold
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) old
(@ThreeSum.ReportingHostFrontierLayout.rootMass.{u_1, u_2, u_3} α β γ inst h J I w)))
(∃ (pre :
List.{0}
(Finset.{0}
(Fin
(@HMul.hMul.{0, 0, 0} Nat Nat Nat (@instHMul.{0} Nat instMulNat)
(@OfNat.ofNat.{0} Nat (nat_lit 512) (instOfNatNat (nat_lit 512))) h)))),
And
(@Membership.mem.{0, 0}
(List.{0}
(Finset.{0}
(Fin
(@HMul.hMul.{0, 0, 0} Nat Nat Nat (@instHMul.{0} Nat instMulNat)
(@OfNat.ofNat.{0} Nat (nat_lit 512) (instOfNatNat (nat_lit 512))) h))))
(List.{0}
(List.{0}
(Finset.{0}
(Fin
(@HMul.hMul.{0, 0, 0} Nat Nat Nat (@instHMul.{0} Nat instMulNat)
(@OfNat.ofNat.{0} Nat (nat_lit 512) (instOfNatNat (nat_lit 512))) h)))))
(@List.instMembership.{0}
(List.{0}
(Finset.{0}
(Fin
(@HMul.hMul.{0, 0, 0} Nat Nat Nat (@instHMul.{0} Nat instMulNat)
(@OfNat.ofNat.{0} Nat (nat_lit 512) (instOfNatNat (nat_lit 512))) h)))))
(@ThreeSum.ReportingHostFrontier.frontier.{u_1, u_2, u_3} α β γ inst h J I w K) pre)
(@ThreeSum.ReportingHostTerminalBatch.Hit h J
(a
(@Prod.fst.{u_1, 0} α
(Prod.{0, 0} (Fin (@OfNat.ofNat.{0} Nat (nat_lit 3) (instOfNatNat (nat_lit 3))))
(ThreeSum.GlobalEncoding.GlobalOutput h J))
w))
p shift left right NL NR
(@Prod.snd.{0, 0} (Fin (@OfNat.ofNat.{0} Nat (nat_lit 3) (instOfNatNat (nat_lit 3))))
(ThreeSum.GlobalEncoding.GlobalOutput h J)
(@Prod.snd.{u_1, 0} α
(Prod.{0, 0} (Fin (@OfNat.ofNat.{0} Nat (nat_lit 3) (instOfNatNat (nat_lit 3))))
(ThreeSum.GlobalEncoding.GlobalOutput h J))
w))
K pre))))
(And
(@Eq.{1} Int (ν counter)
(@Nat.cast.{0} Int instNatCastInt
(@HAdd.hAdd.{0, 0, 0} Nat Nat Nat (@instHAdd.{0} Nat instAddNat) old
(@ThreeSum.ReportingHostFrontierLayout.rootMass.{u_1, u_2, u_3} α β γ inst h J I w))))
(Light.KeptBut μ ν rows counter (@OfNat.ofNat.{0} Nat (nat_lit 1) (instOfNatNat (nat_lit 1)))))) := by
sorry