Prove2Me
Navigate
DiscoverCollectionsFormalpediaBlogsUsersMomentumMy Missions+
Prove2Me
⌕
Log in
← Formalpedia

Analytic construction propositions, part 2

Definition
erdos390_remaining_analytic_propositions_002

by doctosil · Sep 17, 2026 · Mathlib c5ea003 (Lean v4.30.0)

analytic-number-theoryerdos-390

Named propositions for the remaining analytic and finite construction estimates in the Erdős 390 central-anchor proof. Each name expands to the complete quantified statement, including every hypothesis and universe parameter. These definitions introduce no assertion of the propositions; their proofs are submitted separately. This part includes the following source declarations: exists_eventually_canonicalPhysical_powerCorrection_row, exists_global_cutoff_eventually_canonical_nonstepSlowResidualRow_le, exists_global_cutoff_eventually_canonical_squarefreeSlowRow_sub_reference, exists_paperFineMesh_cutoff_eventually_canonical_lemma86_geometry_coefficients.

Definition code
import Definitions.Def_erdos390_analytic_foundations_001
import Definitions.Def_erdos390_analytic_foundations_002
import Definitions.Def_erdos390_analytic_foundations_003
import Definitions.Def_erdos390_analytic_foundations_004
import Definitions.Def_erdos390_analytic_foundations_005
import Definitions.Def_erdos390_analytic_nonstep_certificate
import Definitions.Def_erdos390_dickman_step_function
import Definitions.Def_erdos390_source_bank_interface
import Mathlib
import Theorems.Thm_Erdos390_Full_DickmanBasic_kernel_product_bound
import Theorems.Thm_Erdos390_Full_DickmanBasic_kernel_secondDerivative_first_bound
import Theorems.Thm_Erdos390_Full_DickmanBasic_rho_pos_on_zero_five
import Theorems.Thm_MediumPNT
universe u_1 u_2
set_option maxRecDepth 10000
set_option maxHeartbeats 0


noncomputable def Erdos390.RemainingAnalyticGoal002_001 : Prop :=
∀ {Head : Type u_1} [inst : Fintype.{u_1} Head] [inst_1 : DecidableEq.{u_1 + 1} Head] [inst_2 : Nonempty.{u_1 + 1} Head] (P : Head → Erdos390.Full.HeadPattern.Pattern)
  (I : Erdos390.Full.PaperGuardCensus.PhysicalIntervals) (Cmax : Real),
  (∀ (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign), LE.le.{0} (1 : Real) (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.lower I sigma)) →
    (∀ (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign), LE.le.{0} (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.upper I sigma) Cmax) →
      ∀ (Cprom Cbank : Nat) (ledger : (n : Nat) → Erdos390.Full.PaperGuardCensus.Ledger n Cprom Cbank) (W : Nat),
        LT.lt.{0} (1 : Nat) W →
          ∀ (Acoef Aphys : Real),
            LE.le.{0} (0 : Real) Acoef →
              LE.le.{0} (0 : Real) Aphys →
                have G := Erdos390.Full.PaperBridgeFit.BridgeData.canonicalPhysicalPowerCorrectionConstant.{u_1} P I Cmax W Acoef;
                have epsilon := Erdos390.Full.PaperBridgeFit.BridgeData.canonicalPhysicalPowerCorrectionEpsilon Aphys Cmax;
                And (LE.le.{0} (0 : Real) G)
                  (And
                    (Filter.Tendsto.{0, 0}
                      (fun (n : Nat) => HMul.hMul.{0, 0, 0} (Erdos390.Full.PaperBridgeFit.BridgeData.physicalPowerCorrectionRowError (epsilon n) G n W) (Real.log (Erdos390.Full.Scale.L n)))
                      Filter.atTop.{0} (nhds.{0} (0 : Real)))
                    (∃ (N₀ : Nat),
                      ∀ {Band : Type u_2} [inst_3 : Fintype.{u_2} Band] [inst_4 : DecidableEq.{u_2 + 1} Band] (B : Erdos390.Full.PaperBridgeFit.BridgeData.{u_1, u_2} Head Band)
                        (xi : Erdos390.Full.PaperBridgeFit.BridgeData.ParamSpace.{u_1, u_2} B),
                        LE.le.{0} N₀ (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, u_2} B)) →
                          Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, u_2} B)) W →
                            ∀
                              (hsep :
                                LT.lt.{0}
                                  (Erdos390.Full.ArithmeticModel.physicalBound (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.upper I Erdos390.Full.PaperBridgeFit.PhysicalSign.minus)
                                    (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, u_2} B)))
                                  (Erdos390.Full.ArithmeticModel.physicalBound (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.lower I Erdos390.Full.PaperBridgeFit.PhysicalSign.plus)
                                    (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, u_2} B))))
                              (hremaining :
                                ∀ (c : Erdos390.Full.PaperBridgeFit.Cell.{u_1} Head),
                                  Finset.Nonempty.{0}
                                    (SDiff.sdiff.{0}
                                      (Erdos390.Full.PaperGuardCensus.rawCell.{u_1} P I
                                        (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, u_2} B)) c)
                                      (Erdos390.Full.PaperGuardCensus.Ledger.guards (n :=
                                        Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, u_2} B))
                                        (ledger (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, u_2} B)))))),
                              Eq.{u_1 + 1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, u_2} B)
                                  (Erdos390.Full.PaperGuardCensus.canonicalSampleData.{u_1} P I (W :=
                                    Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, u_2} B))
                                    (ledger (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, u_2} B))) hsep hremaining) →
                                (∀
                                    (p :
                                      Erdos390.Full.ArithmeticBandGeometry.BandPrime
                                        (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, u_2} B))
                                        (Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, u_2} B))),
                                    LE.le.{0} (abs.{0} (Erdos390.Full.PaperBridgeFit.BridgeData.effectivePrimeCoefficient.{u_1, u_2} B xi p)) Acoef) →
                                  LE.le.{0} (abs.{0} (WithLp.ofLp.{max u_1 u_2} xi Erdos390.Full.PaperBridgeFit.MomentCoord.physical.{u_2, u_1})) Aphys →
                                    ∀
                                      (p :
                                        Erdos390.Full.ArithmeticBandGeometry.BandPrime
                                          (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, u_2} B))
                                          (Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, u_2} B))),
                                      LE.le.{0}
                                        (HMul.hMul.{0, 0, 0} (α := Real) (↑(↑p : Nat) : Real)
                                          (∑ q :
                                            Erdos390.Full.ArithmeticBandGeometry.BandPrime
                                              (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, u_2} B))
                                              (Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, u_2} B)),
                                            abs.{0}
                                              (HSub.hSub.{0, 0, 0}
                                                (HSub.hSub.{0, 0, 0}
                                                  (Erdos390.Full.PrimePowerCovariance.BoundedValuationLaw.covVV.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.actualValuationLaw.{u_1, u_2} B xi)
                                                    (↑p : Nat) (↑q : Nat))
                                                  (Erdos390.Full.PrimePowerCovariance.BoundedValuationLaw.covII.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.actualValuationLaw.{u_1, u_2} B xi)
                                                    (↑p : Nat) (↑q : Nat)))
                                                (HSub.hSub.{0, 0, 0}
                                                  (Erdos390.Full.PrimePowerCovariance.BoundedValuationLaw.covVV.{u_1}
                                                    (Erdos390.Full.PaperBridgeFit.BridgeData.physicalMediumReferenceLaw.{u_1, u_2} B xi) (↑p : Nat) (↑q : Nat))
                                                  (Erdos390.Full.PrimePowerCovariance.BoundedValuationLaw.covII.{u_1}
                                                    (Erdos390.Full.PaperBridgeFit.BridgeData.physicalMediumReferenceLaw.{u_1, u_2} B xi) (↑p : Nat) (↑q : Nat))))))
                                        (Erdos390.Full.PaperBridgeFit.BridgeData.physicalPowerCorrectionRowError
                                          (epsilon (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, u_2} B))) G
                                          (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, u_2} B))
                                          (Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, u_2} B)))))

noncomputable def Erdos390.RemainingAnalyticGoal002_002 : Prop :=
∃ (CF : Real) (Cprod : Real),
  And (LE.le.{0} (0 : Real) CF)
    (And (LE.le.{0} (0 : Real) Cprod)
      (∃ (W₀ : Nat) (hW₀two : LE.le.{0} (2 : Nat) W₀),
        ∀ (W : Nat) (hW : LE.le.{0} W₀ W) {delta eta : Real} (hdelta : LT.lt.{0} (0 : Real) delta) (M : Erdos390.Full.RegularRelativeMesh.Mesh delta eta) {Head : Type u_1} [inst : Fintype.{u_1} Head]
          [inst_1 : DecidableEq.{u_1 + 1} Head] [inst_2 : Nonempty.{u_1 + 1} Head] (Phead : Head → Erdos390.Full.HeadPattern.Pattern),
          (∀ (h : Head) (p : Nat), Iff (Membership.mem.{0, 0} (Erdos390.Full.HeadPattern.Pattern.primes (Phead h)) p) (And (Nat.Prime p) (LE.le.{0} p W))) →
            ∀ (I : Erdos390.Full.PaperGuardCensus.PhysicalIntervals) (U : Real) (hU : LE.le.{0} (1 : Real) U)
              (hlowerOne : ∀ (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign), LE.le.{0} (1 : Real) (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.lower I sigma))
              (hupperU : ∀ (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign), LE.le.{0} (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.upper I sigma) U) (Cprom Cbank : Nat)
              (ledger : (n : Nat) → Erdos390.Full.PaperGuardCensus.Ledger n Cprom Cbank) (a : NNReal) (marginFloor : Real),
              LT.lt.{0} (0 : Real) marginFloor →
                ∀ᶠ (n : Nat) in Filter.atTop.{0},
                  ∀ (B : Erdos390.Full.PaperBridgeFit.BridgeData.{u_1, 0} Head (Fin (HAdd.hAdd.{0, 0, 0} (Erdos390.Full.RegularRelativeMesh.Mesh.cellCount M) (1 : Nat)))),
                    Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)) n →
                      ∀ (hBW : Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)) W)
                        (hsep :
                          LT.lt.{0}
                            (Erdos390.Full.ArithmeticModel.physicalBound (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.upper I Erdos390.Full.PaperBridgeFit.PhysicalSign.minus)
                              (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)))
                            (Erdos390.Full.ArithmeticModel.physicalBound (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.lower I Erdos390.Full.PaperBridgeFit.PhysicalSign.plus)
                              (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))))
                        (hremaining :
                          ∀ (c : Erdos390.Full.PaperBridgeFit.Cell.{u_1} Head),
                            Finset.Nonempty.{0}
                              (SDiff.sdiff.{0}
                                (Erdos390.Full.PaperGuardCensus.rawCell.{u_1} Phead I
                                  (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)) c)
                                (Erdos390.Full.PaperGuardCensus.Ledger.guards (n :=
                                  Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                  (ledger (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))))))
                        (hcanonical :
                          Eq.{u_1 + 1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)
                            (Erdos390.Full.PaperGuardCensus.canonicalSampleData.{u_1} Phead I (W :=
                              Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                              (ledger (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))) hsep hremaining)),
                        (∃ (hWne : Ne.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)) (0 : Nat)) (S :
                            Erdos390.Full.RegularMeshPrimeCutoffs.ScaleSeparation M
                              (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                              (Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))),
                            Eq.{1} (Erdos390.Full.PaperBridgeFit.BridgeData.partition.{u_1, 0} B)
                              (Erdos390.Full.RegularMeshPrimeCutoffs.Mesh.canonicalPartition M hdelta (Erdos390.Full.PaperBridgeFit.BridgeData.n_gt_one.{u_1, 0} B) hWne S)) →
                          Eq.{1} (Erdos390.Full.PaperBridgeFit.BridgeData.w.{u_1, 0} B) (HAdd.hAdd.{0, 0, 0} delta eta) →
                            ∀ (T : Erdos390.Full.PaperGuardCensus.BarycentricTarget.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)),
                              LE.le.{0} marginFloor (Erdos390.Full.PaperGuardCensus.BarycentricTarget.cellMassMargin.{u_1} T) →
                                ∀ (hbaseline : Eq.{u_1 + 1} (Erdos390.Full.PaperBridgeFit.BridgeData.baseline.{u_1, 0} B) (Erdos390.Full.PaperGuardCensus.BarycentricTarget.baseline.{u_1} T))
                                  (z : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.EffectiveParamSpace.{u_1, 0} B))
                                  (hz : Membership.mem.{u_1, u_1} (Metric.closedBall.{u_1} (0 : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.EffectiveParamSpace.{u_1, 0} B)) (↑a : Real)) z)
                                  (i : Fin (HAdd.hAdd.{0, 0, 0} (Erdos390.Full.RegularRelativeMesh.Mesh.cellCount M) (1 : Nat))),
                                  LE.le.{0}
                                    (abs.{0}
                                      (Erdos390.Full.PaperBridgeFit.BridgeData.normalizedBandCovarianceRow.{u_1, 0} B
                                        ((Erdos390.Full.PaperBridgeFit.BridgeData.effectiveParamEquiv.{u_1, 0} B :
                                            (a : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.EffectiveParamSpace.{u_1, 0} B)) → Erdos390.Full.PaperBridgeFit.BridgeData.ParamSpace.{u_1, 0} B)
                                          z)
                                        (Erdos390.Full.PaperBridgeFit.BridgeData.nuisanceResidualScore.{u_1, 0} B
                                          ((Erdos390.Full.PaperBridgeFit.BridgeData.effectiveParamEquiv.{u_1, 0} B :
                                              (a : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.EffectiveParamSpace.{u_1, 0} B)) → Erdos390.Full.PaperBridgeFit.BridgeData.ParamSpace.{u_1, 0} B)
                                            z)
                                          (Erdos390.Full.PaperBridgeFit.BridgeData.canonicalEffectiveNuisanceGamma_pos.{u_1, 0} B I U (HMul.hMul.{0, 0, 0} (3 : Real) (↑a : Real)) T)
                                          (Erdos390.Full.PaperBridgeFit.BridgeData.canonicalEffectiveNuisanceGap_on_closedBall.{u_1, 0} B I a hU hlowerOne hupperU
                                            (fun (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign) =>
                                              Eq.mpr.{0}
                                                (id.{0}
                                                  (congrArg.{u_1 + 1, 1} (β := Prop)
                                                    (fun (_a : Erdos390.Full.PaperBridgeFit.StructuredSampleData.{u_1} Head) =>
                                                      Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.lo.{u_1} _a sigma)
                                                        (Erdos390.Full.ArithmeticModel.physicalBound (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.lower I sigma)
                                                          (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} _a)))
                                                    hcanonical))
                                                (Eq.refl.{1}
                                                  (Erdos390.Full.PaperBridgeFit.StructuredSampleData.lo.{u_1}
                                                    (Erdos390.Full.PaperGuardCensus.canonicalSampleData.{u_1} Phead I (W :=
                                                      Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                      (ledger (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))) hsep
                                                      hremaining)
                                                    sigma)))
                                            (fun (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign) =>
                                              Eq.mpr.{0}
                                                (id.{0}
                                                  (congrArg.{u_1 + 1, 1} (β := Prop)
                                                    (fun (_a : Erdos390.Full.PaperBridgeFit.StructuredSampleData.{u_1} Head) =>
                                                      Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.hi.{u_1} _a sigma)
                                                        (Erdos390.Full.ArithmeticModel.physicalBound (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.upper I sigma)
                                                          (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} _a)))
                                                    hcanonical))
                                                (Eq.refl.{1}
                                                  (Erdos390.Full.PaperBridgeFit.StructuredSampleData.hi.{u_1}
                                                    (Erdos390.Full.PaperGuardCensus.canonicalSampleData.{u_1} Phead I (W :=
                                                      Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                      (ledger (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))) hsep
                                                      hremaining)
                                                    sigma)))
                                            T hbaseline
                                            (Eq.mpr.{0} (id.{0} (congrArg.{1, 1} (fun (_a : Nat) => LT.lt.{0} (1 : Nat) _a) hBW))
                                              (Decidable.byContradiction fun (a : Not (LT.lt.{0} (1 : Nat) W)) =>
                                                Erdos390.Full.PaperBridgeFit.BridgeData.exists_global_cutoff_eventually_canonical_nonstepSlowResidualRow_le._proof_1.{u_1} W₀ hW₀two W hW M I n B hBW
                                                  a))
                                            z hz)
                                          (Erdos390.Full.PaperBridgeFit.BridgeData.slowScore.{u_1, 0} B))
                                        i))
                                    (HMul.hMul.{0, 0, 0}
                                      (HMul.hMul.{0, 0, 0} (HAdd.hAdd.{0, 0, 0} (HAdd.hAdd.{0, 0, 0} (2 : Real) CF) (HMul.hMul.{0, 0, 0} (7 : Real) Cprod))
                                        (Erdos390.Full.PaperBridgeFit.BridgeData.w.{u_1, 0} B))
                                      (Erdos390.Full.PaperBridgeFit.BridgeData.bandCenter.{u_1, 0} B i))))

noncomputable def Erdos390.RemainingAnalyticGoal002_003 : Prop :=
∃ (W₀ : Nat),
  ∀ (W : Nat),
    LE.le.{0} W₀ W →
      ∀ {delta eta : Real} (hdelta : LT.lt.{0} (0 : Real) delta) (M : Erdos390.Full.RegularRelativeMesh.Mesh delta eta) {Head : Type u_1} [inst : Fintype.{u_1} Head]
        [inst_1 : DecidableEq.{u_1 + 1} Head] [inst_2 : Nonempty.{u_1 + 1} Head] (Phead : Head → Erdos390.Full.HeadPattern.Pattern),
        (∀ (h : Head) (p : Nat), Iff (Membership.mem.{0, 0} (Erdos390.Full.HeadPattern.Pattern.primes (Phead h)) p) (And (Nat.Prime p) (LE.le.{0} p W))) →
          ∀ (I : Erdos390.Full.PaperGuardCensus.PhysicalIntervals) (Cmax : Real),
            (∀ (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign), LE.le.{0} (1 : Real) (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.lower I sigma)) →
              (∀ (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign), LE.le.{0} (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.upper I sigma) Cmax) →
                ∀ (Cprom Cbank : Nat) (ledger : (n : Nat) → Erdos390.Full.PaperGuardCensus.Ledger n Cprom Cbank) (Acoef Aphys : Real),
                  LE.le.{0} (0 : Real) Acoef →
                    LE.le.{0} (0 : Real) Aphys →
                      ∀ (r : Real),
                        LT.lt.{0} (0 : Real) r →
                          ∀ᶠ (n : Nat) in Filter.atTop.{0},
                            ∀ (B : Erdos390.Full.PaperBridgeFit.BridgeData.{u_1, 0} Head (Fin (HAdd.hAdd.{0, 0, 0} (Erdos390.Full.RegularRelativeMesh.Mesh.cellCount M) (1 : Nat)))),
                              Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)) n →
                                Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)) W →
                                  ∀
                                    (hsep :
                                      LT.lt.{0}
                                        (Erdos390.Full.ArithmeticModel.physicalBound (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.upper I Erdos390.Full.PaperBridgeFit.PhysicalSign.minus)
                                          (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)))
                                        (Erdos390.Full.ArithmeticModel.physicalBound (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.lower I Erdos390.Full.PaperBridgeFit.PhysicalSign.plus)
                                          (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))))
                                    (hremaining :
                                      ∀ (c : Erdos390.Full.PaperBridgeFit.Cell.{u_1} Head),
                                        Finset.Nonempty.{0}
                                          (SDiff.sdiff.{0}
                                            (Erdos390.Full.PaperGuardCensus.rawCell.{u_1} Phead I
                                              (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)) c)
                                            (Erdos390.Full.PaperGuardCensus.Ledger.guards (n :=
                                              Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                              (ledger (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)))))),
                                    Eq.{u_1 + 1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)
                                        (Erdos390.Full.PaperGuardCensus.canonicalSampleData.{u_1} Phead I (W :=
                                          Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                          (ledger (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))) hsep hremaining) →
                                      (∃ (hWne : Ne.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)) (0 : Nat)) (S :
                                          Erdos390.Full.RegularMeshPrimeCutoffs.ScaleSeparation M
                                            (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                            (Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))),
                                          Eq.{1} (Erdos390.Full.PaperBridgeFit.BridgeData.partition.{u_1, 0} B)
                                            (Erdos390.Full.RegularMeshPrimeCutoffs.Mesh.canonicalPartition M hdelta (Erdos390.Full.PaperBridgeFit.BridgeData.n_gt_one.{u_1, 0} B) hWne S)) →
                                        Eq.{1} (Erdos390.Full.PaperBridgeFit.BridgeData.w.{u_1, 0} B) (HAdd.hAdd.{0, 0, 0} delta eta) →
                                          ∀ (xi : Erdos390.Full.PaperBridgeFit.BridgeData.ParamSpace.{u_1, 0} B),
                                            (∀
                                                (p :
                                                  Erdos390.Full.ArithmeticBandGeometry.BandPrime
                                                    (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                    (Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))),
                                                LE.le.{0} (abs.{0} (Erdos390.Full.PaperBridgeFit.BridgeData.effectivePrimeCoefficient.{u_1, 0} B xi p)) Acoef) →
                                              LE.le.{0} (abs.{0} (WithLp.ofLp.{u_1} xi Erdos390.Full.PaperBridgeFit.MomentCoord.physical.{0, u_1})) Aphys →
                                                ∀ (i : Fin (HAdd.hAdd.{0, 0, 0} (Erdos390.Full.RegularRelativeMesh.Mesh.cellCount M) (1 : Nat))),
                                                  LE.le.{0}
                                                    (abs.{0}
                                                      (HSub.hSub.{0, 0, 0}
                                                        (Erdos390.Full.PaperBridgeFit.BridgeData.normalizedSquarefreeBandCovarianceRow.{u_1, 0} B xi
                                                          (Erdos390.Full.PaperBridgeFit.BridgeData.slowSquarefreeScore.{u_1, 0} B) i)
                                                        (Erdos390.Full.PaperBridgeFit.BridgeData.referenceSlowRow.{u_1, 0} B i)))
                                                    (HMul.hMul.{0, 0, 0} (HMul.hMul.{0, 0, 0} r (Erdos390.Full.PaperBridgeFit.BridgeData.w.{u_1, 0} B))
                                                      (Erdos390.Full.PaperBridgeFit.BridgeData.bandCenter.{u_1, 0} B i))

noncomputable def Erdos390.RemainingAnalyticGoal002_004 : Prop :=
∀ (cMesh : Real),
  LT.lt.{0} (0 : Real) cMesh →
    ∃ (meshTol : Real),
      And (LT.lt.{0} (0 : Real) meshTol)
        (∃ (Csharp : Real),
          And (LT.lt.{0} (0 : Real) Csharp)
            (∃ (Cordinary : Real),
              And (LT.lt.{0} (0 : Real) Cordinary)
                (∃ (Crow : Real),
                  And (LE.le.{0} (0 : Real) Crow)
                    (∃ (W₀ : Nat),
                      ∀ (W : Nat),
                        LE.le.{0} W₀ W →
                          ∀ {delta eta : Real} (M : Erdos390.Full.RegularRelativeMesh.Mesh delta eta) (hdelta : LT.lt.{0} (0 : Real) delta),
                            Erdos390.Full.PaperPermittedRegularMesh.IsPermitted (cMesh := cMesh) M →
                              LE.le.{0} (HAdd.hAdd.{0, 0, 0} delta eta) meshTol →
                                ∀ (Head : Type u_1) [inst : Fintype.{u_1} Head] [inst_1 : DecidableEq.{u_1 + 1} Head] [inst_2 : Nonempty.{u_1 + 1} Head]
                                  (Phead : Head → Erdos390.Full.HeadPattern.Pattern),
                                  (∀ (h : Head) (p : Nat), Iff (Membership.mem.{0, 0} (Erdos390.Full.HeadPattern.Pattern.primes (Phead h)) p) (And (Nat.Prime p) (LE.le.{0} p W))) →
                                    ∀ (I : Erdos390.Full.PaperGuardCensus.PhysicalIntervals) (U : Real) (hU : LE.le.{0} (1 : Real) U)
                                      (hlowerOne : ∀ (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign), LE.le.{0} (1 : Real) (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.lower I sigma))
                                      (hupperU : ∀ (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign), LE.le.{0} (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.upper I sigma) U)
                                      (Cprom Cbank : Nat) (ledger : (n : Nat) → Erdos390.Full.PaperGuardCensus.Ledger n Cprom Cbank) (a : NNReal) (marginFloor : Real),
                                      LT.lt.{0} (0 : Real) marginFloor →
                                        ∀ᶠ (n : Nat) in Filter.atTop.{0},
                                          ∀ (B : Erdos390.Full.PaperBridgeFit.BridgeData.{u_1, 0} Head (Fin (HAdd.hAdd.{0, 0, 0} (Erdos390.Full.RegularRelativeMesh.Mesh.cellCount M) (1 : Nat)))),
                                            Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)) n →
                                              Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)) W →
                                                ∀
                                                  (hBWlarge :
                                                    LT.lt.{0} (1 : Nat) (Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)))
                                                  (hsep :
                                                    LT.lt.{0}
                                                      (Erdos390.Full.ArithmeticModel.physicalBound
                                                        (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.upper I Erdos390.Full.PaperBridgeFit.PhysicalSign.minus)
                                                        (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)))
                                                      (Erdos390.Full.ArithmeticModel.physicalBound
                                                        (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.lower I Erdos390.Full.PaperBridgeFit.PhysicalSign.plus)
                                                        (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))))
                                                  (hremaining :
                                                    ∀ (c : Erdos390.Full.PaperBridgeFit.Cell.{u_1} Head),
                                                      Finset.Nonempty.{0}
                                                        (SDiff.sdiff.{0}
                                                          (Erdos390.Full.PaperGuardCensus.rawCell.{u_1} Phead I
                                                            (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)) c)
                                                          (Erdos390.Full.PaperGuardCensus.Ledger.guards (n :=
                                                            Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                            (ledger (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))))))
                                                  (hcanonical :
                                                    Eq.{u_1 + 1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)
                                                      (Erdos390.Full.PaperGuardCensus.canonicalSampleData.{u_1} Phead I (W :=
                                                        Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                        (ledger (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))) hsep
                                                        hremaining)),
                                                  (∃ (hWne :
                                                      Ne.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)) (0 : Nat)) (S :
                                                      Erdos390.Full.RegularMeshPrimeCutoffs.ScaleSeparation M
                                                        (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                        (Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))),
                                                      Eq.{1} (Erdos390.Full.PaperBridgeFit.BridgeData.partition.{u_1, 0} B)
                                                        (Erdos390.Full.RegularMeshPrimeCutoffs.Mesh.canonicalPartition M hdelta (Erdos390.Full.PaperBridgeFit.BridgeData.n_gt_one.{u_1, 0} B) hWne S)) →
                                                    Eq.{1} (Erdos390.Full.PaperBridgeFit.BridgeData.w.{u_1, 0} B) (HAdd.hAdd.{0, 0, 0} delta eta) →
                                                      ∀ (T : Erdos390.Full.PaperGuardCensus.BarycentricTarget.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)),
                                                        LE.le.{0} marginFloor (Erdos390.Full.PaperGuardCensus.BarycentricTarget.cellMassMargin.{u_1} T) →
                                                          ∀
                                                            (hbaseline :
                                                              Eq.{u_1 + 1} (Erdos390.Full.PaperBridgeFit.BridgeData.baseline.{u_1, 0} B)
                                                                (Erdos390.Full.PaperGuardCensus.BarycentricTarget.baseline.{u_1} T)),
                                                            And
                                                              (∀
                                                                (p :
                                                                  Erdos390.Full.ArithmeticBandGeometry.BandPrime
                                                                    (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                                    (Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1} (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))),
                                                                LE.le.{0}
                                                                  (abs.{0}
                                                                    (Erdos390.Full.ArithmeticBandGeometry.Partition.deviation.{0} (Erdos390.Full.PaperBridgeFit.BridgeData.partition.{u_1, 0} B) p))
                                                                  (HAdd.hAdd.{0, 0, 0} delta eta))
                                                              (And
                                                                (LE.le.{0} (Erdos390.Full.ArithmeticBandGeometry.Partition.totalL1.{0} (Erdos390.Full.PaperBridgeFit.BridgeData.partition.{u_1, 0} B))
                                                                  (HMul.hMul.{0, 0, 0} (7 : Real) (HAdd.hAdd.{0, 0, 0} delta eta)))
                                                                (And
                                                                  (LE.le.{0} (HPow.hPow.{0, 0, 0} (HAdd.hAdd.{0, 0, 0} delta eta) (2 : Nat))
                                                                    (HMul.hMul.{0, 0, 0} (HDiv.hDiv.{0, 0, 0} (456 : Real) (HPow.hPow.{0, 0, 0} cMesh (2 : Nat)))
                                                                      (Erdos390.Full.ArithmeticBandGeometry.Partition.variance.{0} (Erdos390.Full.PaperBridgeFit.BridgeData.partition.{u_1, 0} B))))
                                                                  (And
                                                                    (LE.le.{0}
                                                                      (Erdos390.Full.ArithmeticBandGeometry.Partition.variance.{0} (Erdos390.Full.PaperBridgeFit.BridgeData.partition.{u_1, 0} B))
                                                                      (HMul.hMul.{0, 0, 0} (4 : Real) (HPow.hPow.{0, 0, 0} (HAdd.hAdd.{0, 0, 0} delta eta) (2 : Nat))))
                                                                    (And
                                                                      (LE.le.{0}
                                                                        (Erdos390.Full.ArithmeticBandGeometry.Partition.variance.{0} (Erdos390.Full.PaperBridgeFit.BridgeData.partition.{u_1, 0} B))
                                                                        (Erdos390.Full.ArithmeticBandGeometry.Partition.centerEnergy.{0}
                                                                          (Erdos390.Full.PaperBridgeFit.BridgeData.partition.{u_1, 0} B)))
                                                                      (∃ (e :
                                                                        (z : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.EffectiveParamSpace.{u_1, 0} B)) →
                                                                          Membership.mem.{u_1, u_1}
                                                                              (Metric.closedBall.{u_1} (0 : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.EffectiveParamSpace.{u_1, 0} B)) (↑a : Real)) z →
                                                                            LinearEquiv.{0, 0, 0, 0} (RingHom.id.{0} Real) ↥(Erdos390.Full.PaperBridgeFit.BridgeData.RawBandGauge.{u_1, 0} B)
                                                                              ↥(Erdos390.Full.PaperBridgeFit.BridgeData.RawBandGauge.{u_1, 0} B)),
                                                                        And
                                                                          (∀ (z : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.EffectiveParamSpace.{u_1, 0} B))
                                                                            (hz :
                                                                              Membership.mem.{u_1, u_1}
                                                                                (Metric.closedBall.{u_1} (0 : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.EffectiveParamSpace.{u_1, 0} B)) (↑a : Real)) z)
                                                                            (q : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.RawBandGauge.{u_1, 0} B)),
                                                                            Eq.{1} (α := ↥(Erdos390.Full.PaperBridgeFit.BridgeData.RawBandGauge.{u_1, 0} B))
                                                                              ((e z hz :
                                                                                    (a : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.RawBandGauge.{u_1, 0} B)) →
                                                                                      ↥(Erdos390.Full.PaperBridgeFit.BridgeData.RawBandGauge.{u_1, 0} B))
                                                                                  q :
                                                                                ↥(Erdos390.Full.PaperBridgeFit.BridgeData.RawBandGauge.{u_1, 0} B))
                                                                              ((Erdos390.Full.PaperBridgeFit.BridgeData.actualBandSchurLinearMap.{u_1, 0} B
                                                                                      ((Erdos390.Full.PaperBridgeFit.BridgeData.effectiveParamEquiv.{u_1, 0} B :
                                                                                          (a : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.EffectiveParamSpace.{u_1, 0} B)) →
                                                                                            Erdos390.Full.PaperBridgeFit.BridgeData.ParamSpace.{u_1, 0} B)
                                                                                        z)
                                                                                      (Erdos390.Full.PaperBridgeFit.BridgeData.canonicalEffectiveNuisanceGamma_pos.{u_1, 0} B I U
                                                                                        (HMul.hMul.{0, 0, 0} (3 : Real) (↑a : Real)) T)
                                                                                      (Erdos390.Full.PaperBridgeFit.BridgeData.canonicalEffectiveNuisanceGap_on_closedBall.{u_1, 0} B I a hU hlowerOne
                                                                                        hupperU
                                                                                        (fun (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign) =>
                                                                                          Eq.mpr.{0}
                                                                                            (id.{0}
                                                                                              (congrArg.{u_1 + 1, 1} (β := Prop)
                                                                                                (fun (_a : Erdos390.Full.PaperBridgeFit.StructuredSampleData.{u_1} Head) =>
                                                                                                  Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.lo.{u_1} _a sigma)
                                                                                                    (Erdos390.Full.ArithmeticModel.physicalBound
                                                                                                      (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.lower I sigma)
                                                                                                      (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} _a)))
                                                                                                hcanonical))
                                                                                            (Eq.refl.{1}
                                                                                              (Erdos390.Full.PaperBridgeFit.StructuredSampleData.lo.{u_1}
                                                                                                (Erdos390.Full.PaperGuardCensus.canonicalSampleData.{u_1} Phead I (W :=
                                                                                                  Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1}
                                                                                                    (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                                                                  (ledger
                                                                                                    (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1}
                                                                                                      (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)))
                                                                                                  hsep hremaining)
                                                                                                sigma)))
                                                                                        (fun (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign) =>
                                                                                          Eq.mpr.{0}
                                                                                            (id.{0}
                                                                                              (congrArg.{u_1 + 1, 1} (β := Prop)
                                                                                                (fun (_a : Erdos390.Full.PaperBridgeFit.StructuredSampleData.{u_1} Head) =>
                                                                                                  Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.hi.{u_1} _a sigma)
                                                                                                    (Erdos390.Full.ArithmeticModel.physicalBound
                                                                                                      (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.upper I sigma)
                                                                                                      (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} _a)))
                                                                                                hcanonical))
                                                                                            (Eq.refl.{1}
                                                                                              (Erdos390.Full.PaperBridgeFit.StructuredSampleData.hi.{u_1}
                                                                                                (Erdos390.Full.PaperGuardCensus.canonicalSampleData.{u_1} Phead I (W :=
                                                                                                  Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1}
                                                                                                    (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                                                                  (ledger
                                                                                                    (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1}
                                                                                                      (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)))
                                                                                                  hsep hremaining)
                                                                                                sigma)))
                                                                                        T hbaseline hBWlarge z hz) :
                                                                                    (a : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.RawBandGauge.{u_1, 0} B)) →
                                                                                      ↥(Erdos390.Full.PaperBridgeFit.BridgeData.RawBandGauge.{u_1, 0} B))
                                                                                  q :
                                                                                ↥(Erdos390.Full.PaperBridgeFit.BridgeData.RawBandGauge.{u_1, 0} B)))
                                                                          (And
                                                                            (∀ (z : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.EffectiveParamSpace.{u_1, 0} B))
                                                                              (hz :
                                                                                Membership.mem.{u_1, u_1}
                                                                                  (Metric.closedBall.{u_1} (0 : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.EffectiveParamSpace.{u_1, 0} B)) (↑a : Real))
                                                                                  z)
                                                                              (v : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.RawBandGauge.{u_1, 0} B)),
                                                                              LE.le.{0}
                                                                                (Erdos390.Full.PaperWeightedInverseExport.paperSharpNorm.{0}
                                                                                  (Erdos390.Full.PaperBridgeFit.BridgeData.harmonicMass.{u_1, 0} B)
                                                                                  (Erdos390.Full.PaperBridgeFit.BridgeData.bandCenter.{u_1, 0} B)
                                                                                  (Erdos390.Full.ArithmeticBandGeometry.Partition.center_ne_zero.{0}
                                                                                    (Erdos390.Full.PaperBridgeFit.BridgeData.partition.{u_1, 0} B)
                                                                                    (Erdos390.Full.PaperBridgeFit.BridgeData.n_gt_one.{u_1, 0} B))
                                                                                  ((LinearEquiv.symm.{0, 0, 0, 0} (e z hz) :
                                                                                      (a : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.RawBandGauge.{u_1, 0} B)) →
                                                                                        ↥(Erdos390.Full.PaperBridgeFit.BridgeData.RawBandGauge.{u_1, 0} B))
                                                                                    v))
                                                                                (HMul.hMul.{0, 0, 0} Csharp
                                                                                  (Erdos390.Full.PaperWeightedInverseExport.paperSharpNorm.{0}
                                                                                    (Erdos390.Full.PaperBridgeFit.BridgeData.harmonicMass.{u_1, 0} B)
                                                                                    (Erdos390.Full.PaperBridgeFit.BridgeData.bandCenter.{u_1, 0} B)
                                                                                    (Erdos390.Full.ArithmeticBandGeometry.Partition.center_ne_zero.{0}
                                                                                      (Erdos390.Full.PaperBridgeFit.BridgeData.partition.{u_1, 0} B)
                                                                                      (Erdos390.Full.PaperBridgeFit.BridgeData.n_gt_one.{u_1, 0} B))
                                                                                    v)))
                                                                            (And
                                                                              (∀ (z : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.EffectiveParamSpace.{u_1, 0} B))
                                                                                (hz :
                                                                                  Membership.mem.{u_1, u_1}
                                                                                    (Metric.closedBall.{u_1} (0 : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.EffectiveParamSpace.{u_1, 0} B))
                                                                                      (↑a : Real))
                                                                                    z)
                                                                                (v : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.RawBandGauge.{u_1, 0} B)),
                                                                                LE.le.{0}
                                                                                  (Norm.norm.{0} (E := ↥(Erdos390.Full.PaperBridgeFit.BridgeData.RawBandGauge.{u_1, 0} B))
                                                                                    ((LinearEquiv.symm.{0, 0, 0, 0} (e z hz) :
                                                                                          (a : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.RawBandGauge.{u_1, 0} B)) →
                                                                                            ↥(Erdos390.Full.PaperBridgeFit.BridgeData.RawBandGauge.{u_1, 0} B))
                                                                                        v :
                                                                                      ↥(Erdos390.Full.PaperBridgeFit.BridgeData.RawBandGauge.{u_1, 0} B)))
                                                                                  (HMul.hMul.{0, 0, 0} Cordinary (Norm.norm.{0} v)))
                                                                              (∀ (z : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.EffectiveParamSpace.{u_1, 0} B))
                                                                                (hz :
                                                                                  Membership.mem.{u_1, u_1}
                                                                                    (Metric.closedBall.{u_1} (0 : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.EffectiveParamSpace.{u_1, 0} B))
                                                                                      (↑a : Real))
                                                                                    z),
                                                                                And
                                                                                  (∀ (j : Fin (HAdd.hAdd.{0, 0, 0} (Erdos390.Full.RegularRelativeMesh.Mesh.cellCount M) (1 : Nat))),
                                                                                    LE.le.{0}
                                                                                      (abs.{0}
                                                                                        (Erdos390.Full.PaperBridgeFit.BridgeData.normalizedBandCovarianceRow.{u_1, 0} B
                                                                                          ((Erdos390.Full.PaperBridgeFit.BridgeData.effectiveParamEquiv.{u_1, 0} B :
                                                                                              (a : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.EffectiveParamSpace.{u_1, 0} B)) →
                                                                                                Erdos390.Full.PaperBridgeFit.BridgeData.ParamSpace.{u_1, 0} B)
                                                                                            z)
                                                                                          (Erdos390.Full.PaperBridgeFit.BridgeData.nuisanceResidualScore.{u_1, 0} B
                                                                                            ((Erdos390.Full.PaperBridgeFit.BridgeData.effectiveParamEquiv.{u_1, 0} B :
                                                                                                (a : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.EffectiveParamSpace.{u_1, 0} B)) →
                                                                                                  Erdos390.Full.PaperBridgeFit.BridgeData.ParamSpace.{u_1, 0} B)
                                                                                              z)
                                                                                            (Erdos390.Full.PaperBridgeFit.BridgeData.canonicalEffectiveNuisanceGamma_pos.{u_1, 0} B I U
                                                                                              (HMul.hMul.{0, 0, 0} (3 : Real) (↑a : Real)) T)
                                                                                            (Erdos390.Full.PaperBridgeFit.BridgeData.canonicalEffectiveNuisanceGap_on_closedBall.{u_1, 0} B I a hU
                                                                                              hlowerOne hupperU
                                                                                              (fun (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign) =>
                                                                                                Eq.mpr.{0}
                                                                                                  (id.{0}
                                                                                                    (congrArg.{u_1 + 1, 1} (β := Prop)
                                                                                                      (fun (_a : Erdos390.Full.PaperBridgeFit.StructuredSampleData.{u_1} Head) =>
                                                                                                        Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.lo.{u_1} _a sigma)
                                                                                                          (Erdos390.Full.ArithmeticModel.physicalBound
                                                                                                            (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.lower I sigma)
                                                                                                            (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} _a)))
                                                                                                      hcanonical))
                                                                                                  (Eq.refl.{1}
                                                                                                    (Erdos390.Full.PaperBridgeFit.StructuredSampleData.lo.{u_1}
                                                                                                      (Erdos390.Full.PaperGuardCensus.canonicalSampleData.{u_1} Phead I (W :=
                                                                                                        Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1}
                                                                                                          (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                                                                        (ledger
                                                                                                          (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1}
                                                                                                            (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)))
                                                                                                        hsep hremaining)
                                                                                                      sigma)))
                                                                                              (fun (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign) =>
                                                                                                Eq.mpr.{0}
                                                                                                  (id.{0}
                                                                                                    (congrArg.{u_1 + 1, 1} (β := Prop)
                                                                                                      (fun (_a : Erdos390.Full.PaperBridgeFit.StructuredSampleData.{u_1} Head) =>
                                                                                                        Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.hi.{u_1} _a sigma)
                                                                                                          (Erdos390.Full.ArithmeticModel.physicalBound
                                                                                                            (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.upper I sigma)
                                                                                                            (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} _a)))
                                                                                                      hcanonical))
                                                                                                  (Eq.refl.{1}
                                                                                                    (Erdos390.Full.PaperBridgeFit.StructuredSampleData.hi.{u_1}
                                                                                                      (Erdos390.Full.PaperGuardCensus.canonicalSampleData.{u_1} Phead I (W :=
                                                                                                        Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1}
                                                                                                          (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                                                                        (ledger
                                                                                                          (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1}
                                                                                                            (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)))
                                                                                                        hsep hremaining)
                                                                                                      sigma)))
                                                                                              T hbaseline hBWlarge z hz)
                                                                                            (Erdos390.Full.PaperBridgeFit.BridgeData.slowScore.{u_1, 0} B))
                                                                                          j))
                                                                                      (HMul.hMul.{0, 0, 0} (HMul.hMul.{0, 0, 0} Crow (Erdos390.Full.PaperBridgeFit.BridgeData.w.{u_1, 0} B))
                                                                                        (Erdos390.Full.PaperBridgeFit.BridgeData.bandCenter.{u_1, 0} B j)))
                                                                                  (And
                                                                                    (Eq.{1}
                                                                                      ((Erdos390.Full.PaperBridgeFit.BridgeData.actualBandSchurLinearMap.{u_1, 0} B
                                                                                            ((Erdos390.Full.PaperBridgeFit.BridgeData.effectiveParamEquiv.{u_1, 0} B :
                                                                                                (a : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.EffectiveParamSpace.{u_1, 0} B)) →
                                                                                                  Erdos390.Full.PaperBridgeFit.BridgeData.ParamSpace.{u_1, 0} B)
                                                                                              z)
                                                                                            (Erdos390.Full.PaperBridgeFit.BridgeData.canonicalEffectiveNuisanceGamma_pos.{u_1, 0} B I U
                                                                                              (HMul.hMul.{0, 0, 0} (3 : Real) (↑a : Real)) T)
                                                                                            (Erdos390.Full.PaperBridgeFit.BridgeData.canonicalEffectiveNuisanceGap_on_closedBall.{u_1, 0} B I a hU
                                                                                              hlowerOne hupperU
                                                                                              (fun (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign) =>
                                                                                                Eq.mpr.{0}
                                                                                                  (id.{0}
                                                                                                    (congrArg.{u_1 + 1, 1} (β := Prop)
                                                                                                      (fun (_a : Erdos390.Full.PaperBridgeFit.StructuredSampleData.{u_1} Head) =>
                                                                                                        Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.lo.{u_1} _a sigma)
                                                                                                          (Erdos390.Full.ArithmeticModel.physicalBound
                                                                                                            (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.lower I sigma)
                                                                                                            (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} _a)))
                                                                                                      hcanonical))
                                                                                                  (Eq.refl.{1}
                                                                                                    (Erdos390.Full.PaperBridgeFit.StructuredSampleData.lo.{u_1}
                                                                                                      (Erdos390.Full.PaperGuardCensus.canonicalSampleData.{u_1} Phead I (W :=
                                                                                                        Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1}
                                                                                                          (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                                                                        (ledger
                                                                                                          (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1}
                                                                                                            (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)))
                                                                                                        hsep hremaining)
                                                                                                      sigma)))
                                                                                              (fun (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign) =>
                                                                                                Eq.mpr.{0}
                                                                                                  (id.{0}
                                                                                                    (congrArg.{u_1 + 1, 1} (β := Prop)
                                                                                                      (fun (_a : Erdos390.Full.PaperBridgeFit.StructuredSampleData.{u_1} Head) =>
                                                                                                        Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.hi.{u_1} _a sigma)
                                                                                                          (Erdos390.Full.ArithmeticModel.physicalBound
                                                                                                            (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.upper I sigma)
                                                                                                            (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} _a)))
                                                                                                      hcanonical))
                                                                                                  (Eq.refl.{1}
                                                                                                    (Erdos390.Full.PaperBridgeFit.StructuredSampleData.hi.{u_1}
                                                                                                      (Erdos390.Full.PaperGuardCensus.canonicalSampleData.{u_1} Phead I (W :=
                                                                                                        Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1}
                                                                                                          (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                                                                        (ledger
                                                                                                          (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1}
                                                                                                            (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)))
                                                                                                        hsep hremaining)
                                                                                                      sigma)))
                                                                                              T hbaseline hBWlarge z hz) :
                                                                                          (a : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.RawBandGauge.{u_1, 0} B)) →
                                                                                            ↥(Erdos390.Full.PaperBridgeFit.BridgeData.RawBandGauge.{u_1, 0} B))
                                                                                        (Erdos390.Full.PaperBridgeFit.BridgeData.actualBandRegression.{u_1, 0} B
                                                                                          ((Erdos390.Full.PaperBridgeFit.BridgeData.effectiveParamEquiv.{u_1, 0} B :
                                                                                              (a : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.EffectiveParamSpace.{u_1, 0} B)) →
                                                                                                Erdos390.Full.PaperBridgeFit.BridgeData.ParamSpace.{u_1, 0} B)
                                                                                            z)
                                                                                          (Erdos390.Full.PaperBridgeFit.BridgeData.canonicalEffectiveNuisanceGamma_pos.{u_1, 0} B I U
                                                                                            (HMul.hMul.{0, 0, 0} (3 : Real) (↑a : Real)) T)
                                                                                          (Erdos390.Full.PaperBridgeFit.BridgeData.canonicalEffectiveNuisanceGap_on_closedBall.{u_1, 0} B I a hU
                                                                                            hlowerOne hupperU
                                                                                            (fun (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign) =>
                                                                                              Eq.mpr.{0}
                                                                                                (id.{0}
                                                                                                  (congrArg.{u_1 + 1, 1} (β := Prop)
                                                                                                    (fun (_a : Erdos390.Full.PaperBridgeFit.StructuredSampleData.{u_1} Head) =>
                                                                                                      Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.lo.{u_1} _a sigma)
                                                                                                        (Erdos390.Full.ArithmeticModel.physicalBound
                                                                                                          (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.lower I sigma)
                                                                                                          (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} _a)))
                                                                                                    hcanonical))
                                                                                                (Eq.refl.{1}
                                                                                                  (Erdos390.Full.PaperBridgeFit.StructuredSampleData.lo.{u_1}
                                                                                                    (Erdos390.Full.PaperGuardCensus.canonicalSampleData.{u_1} Phead I (W :=
                                                                                                      Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1}
                                                                                                        (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                                                                      (ledger
                                                                                                        (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1}
                                                                                                          (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)))
                                                                                                      hsep hremaining)
                                                                                                    sigma)))
                                                                                            (fun (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign) =>
                                                                                              Eq.mpr.{0}
                                                                                                (id.{0}
                                                                                                  (congrArg.{u_1 + 1, 1} (β := Prop)
                                                                                                    (fun (_a : Erdos390.Full.PaperBridgeFit.StructuredSampleData.{u_1} Head) =>
                                                                                                      Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.hi.{u_1} _a sigma)
                                                                                                        (Erdos390.Full.ArithmeticModel.physicalBound
                                                                                                          (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.upper I sigma)
                                                                                                          (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} _a)))
                                                                                                    hcanonical))
                                                                                                (Eq.refl.{1}
                                                                                                  (Erdos390.Full.PaperBridgeFit.StructuredSampleData.hi.{u_1}
                                                                                                    (Erdos390.Full.PaperGuardCensus.canonicalSampleData.{u_1} Phead I (W :=
                                                                                                      Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1}
                                                                                                        (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                                                                      (ledger
                                                                                                        (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1}
                                                                                                          (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)))
                                                                                                      hsep hremaining)
                                                                                                    sigma)))
                                                                                            T hbaseline hBWlarge z hz)
                                                                                          (e z hz)))
                                                                                      (Erdos390.Full.PaperBridgeFit.BridgeData.actualBandRegressionTarget.{u_1, 0} B
                                                                                        ((Erdos390.Full.PaperBridgeFit.BridgeData.effectiveParamEquiv.{u_1, 0} B :
                                                                                            (a : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.EffectiveParamSpace.{u_1, 0} B)) →
                                                                                              Erdos390.Full.PaperBridgeFit.BridgeData.ParamSpace.{u_1, 0} B)
                                                                                          z)
                                                                                        (Erdos390.Full.PaperBridgeFit.BridgeData.canonicalEffectiveNuisanceGamma_pos.{u_1, 0} B I U
                                                                                          (HMul.hMul.{0, 0, 0} (3 : Real) (↑a : Real)) T)
                                                                                        (Erdos390.Full.PaperBridgeFit.BridgeData.canonicalEffectiveNuisanceGap_on_closedBall.{u_1, 0} B I a hU hlowerOne
                                                                                          hupperU
                                                                                          (fun (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign) =>
                                                                                            Eq.mpr.{0}
                                                                                              (id.{0}
                                                                                                (congrArg.{u_1 + 1, 1} (β := Prop)
                                                                                                  (fun (_a : Erdos390.Full.PaperBridgeFit.StructuredSampleData.{u_1} Head) =>
                                                                                                    Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.lo.{u_1} _a sigma)
                                                                                                      (Erdos390.Full.ArithmeticModel.physicalBound
                                                                                                        (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.lower I sigma)
                                                                                                        (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} _a)))
                                                                                                  hcanonical))
                                                                                              (Eq.refl.{1}
                                                                                                (Erdos390.Full.PaperBridgeFit.StructuredSampleData.lo.{u_1}
                                                                                                  (Erdos390.Full.PaperGuardCensus.canonicalSampleData.{u_1} Phead I (W :=
                                                                                                    Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1}
                                                                                                      (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                                                                    (ledger
                                                                                                      (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1}
                                                                                                        (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)))
                                                                                                    hsep hremaining)
                                                                                                  sigma)))
                                                                                          (fun (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign) =>
                                                                                            Eq.mpr.{0}
                                                                                              (id.{0}
                                                                                                (congrArg.{u_1 + 1, 1} (β := Prop)
                                                                                                  (fun (_a : Erdos390.Full.PaperBridgeFit.StructuredSampleData.{u_1} Head) =>
                                                                                                    Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.hi.{u_1} _a sigma)
                                                                                                      (Erdos390.Full.ArithmeticModel.physicalBound
                                                                                                        (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.upper I sigma)
                                                                                                        (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} _a)))
                                                                                                  hcanonical))
                                                                                              (Eq.refl.{1}
                                                                                                (Erdos390.Full.PaperBridgeFit.StructuredSampleData.hi.{u_1}
                                                                                                  (Erdos390.Full.PaperGuardCensus.canonicalSampleData.{u_1} Phead I (W :=
                                                                                                    Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1}
                                                                                                      (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                                                                    (ledger
                                                                                                      (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1}
                                                                                                        (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)))
                                                                                                    hsep hremaining)
                                                                                                  sigma)))
                                                                                          T hbaseline hBWlarge z hz)))
                                                                                    (And
                                                                                      (LE.le.{0}
                                                                                        (Erdos390.Full.PaperWeightedInverseExport.paperSharpNorm.{0}
                                                                                          (Erdos390.Full.PaperBridgeFit.BridgeData.harmonicMass.{u_1, 0} B)
                                                                                          (Erdos390.Full.PaperBridgeFit.BridgeData.bandCenter.{u_1, 0} B)
                                                                                          (Erdos390.Full.ArithmeticBandGeometry.Partition.center_ne_zero.{0}
                                                                                            (Erdos390.Full.PaperBridgeFit.BridgeData.partition.{u_1, 0} B)
                                                                                            (Erdos390.Full.PaperBridgeFit.BridgeData.n_gt_one.{u_1, 0} B))
                                                                                          (Erdos390.Full.PaperBridgeFit.BridgeData.actualBandRegression.{u_1, 0} B
                                                                                            ((Erdos390.Full.PaperBridgeFit.BridgeData.effectiveParamEquiv.{u_1, 0} B :
                                                                                                (a : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.EffectiveParamSpace.{u_1, 0} B)) →
                                                                                                  Erdos390.Full.PaperBridgeFit.BridgeData.ParamSpace.{u_1, 0} B)
                                                                                              z)
                                                                                            (Erdos390.Full.PaperBridgeFit.BridgeData.canonicalEffectiveNuisanceGamma_pos.{u_1, 0} B I U
                                                                                              (HMul.hMul.{0, 0, 0} (3 : Real) (↑a : Real)) T)
                                                                                            (Erdos390.Full.PaperBridgeFit.BridgeData.canonicalEffectiveNuisanceGap_on_closedBall.{u_1, 0} B I a hU
                                                                                              hlowerOne hupperU
                                                                                              (fun (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign) =>
                                                                                                Eq.mpr.{0}
                                                                                                  (id.{0}
                                                                                                    (congrArg.{u_1 + 1, 1} (β := Prop)
                                                                                                      (fun (_a : Erdos390.Full.PaperBridgeFit.StructuredSampleData.{u_1} Head) =>
                                                                                                        Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.lo.{u_1} _a sigma)
                                                                                                          (Erdos390.Full.ArithmeticModel.physicalBound
                                                                                                            (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.lower I sigma)
                                                                                                            (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} _a)))
                                                                                                      hcanonical))
                                                                                                  (Eq.refl.{1}
                                                                                                    (Erdos390.Full.PaperBridgeFit.StructuredSampleData.lo.{u_1}
                                                                                                      (Erdos390.Full.PaperGuardCensus.canonicalSampleData.{u_1} Phead I (W :=
                                                                                                        Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1}
                                                                                                          (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                                                                        (ledger
                                                                                                          (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1}
                                                                                                            (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)))
                                                                                                        hsep hremaining)
                                                                                                      sigma)))
                                                                                              (fun (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign) =>
                                                                                                Eq.mpr.{0}
                                                                                                  (id.{0}
                                                                                                    (congrArg.{u_1 + 1, 1} (β := Prop)
                                                                                                      (fun (_a : Erdos390.Full.PaperBridgeFit.StructuredSampleData.{u_1} Head) =>
                                                                                                        Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.hi.{u_1} _a sigma)
                                                                                                          (Erdos390.Full.ArithmeticModel.physicalBound
                                                                                                            (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.upper I sigma)
                                                                                                            (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} _a)))
                                                                                                      hcanonical))
                                                                                                  (Eq.refl.{1}
                                                                                                    (Erdos390.Full.PaperBridgeFit.StructuredSampleData.hi.{u_1}
                                                                                                      (Erdos390.Full.PaperGuardCensus.canonicalSampleData.{u_1} Phead I (W :=
                                                                                                        Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1}
                                                                                                          (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                                                                        (ledger
                                                                                                          (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1}
                                                                                                            (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)))
                                                                                                        hsep hremaining)
                                                                                                      sigma)))
                                                                                              T hbaseline hBWlarge z hz)
                                                                                            (e z hz)))
                                                                                        (HMul.hMul.{0, 0, 0} (HMul.hMul.{0, 0, 0} Csharp (HMul.hMul.{0, 0, 0} (2 : Real) Crow))
                                                                                          (HAdd.hAdd.{0, 0, 0} delta eta)))
                                                                                      (And
                                                                                        (∀
                                                                                          (p :
                                                                                            Erdos390.Full.ArithmeticBandGeometry.BandPrime
                                                                                              (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1}
                                                                                                (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                                                              (Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1}
                                                                                                (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))),
                                                                                          LE.le.{0}
                                                                                            (abs.{0}
                                                                                              (Erdos390.Full.PaperBridgeFit.BridgeData.actualCompensatedCoefficient.{u_1, 0} B
                                                                                                (Erdos390.Full.PaperBridgeFit.BridgeData.actualBandRegression.{u_1, 0} B
                                                                                                  ((Erdos390.Full.PaperBridgeFit.BridgeData.effectiveParamEquiv.{u_1, 0} B :
                                                                                                      (a : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.EffectiveParamSpace.{u_1, 0} B)) →
                                                                                                        Erdos390.Full.PaperBridgeFit.BridgeData.ParamSpace.{u_1, 0} B)
                                                                                                    z)
                                                                                                  (Erdos390.Full.PaperBridgeFit.BridgeData.canonicalEffectiveNuisanceGamma_pos.{u_1, 0} B I U
                                                                                                    (HMul.hMul.{0, 0, 0} (3 : Real) (↑a : Real)) T)
                                                                                                  (Erdos390.Full.PaperBridgeFit.BridgeData.canonicalEffectiveNuisanceGap_on_closedBall.{u_1, 0} B I a hU
                                                                                                    hlowerOne hupperU
                                                                                                    (fun (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign) =>
                                                                                                      Eq.mpr.{0}
                                                                                                        (id.{0}
                                                                                                          (congrArg.{u_1 + 1, 1} (β := Prop)
                                                                                                            (fun (_a : Erdos390.Full.PaperBridgeFit.StructuredSampleData.{u_1} Head) =>
                                                                                                              Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.lo.{u_1} _a sigma)
                                                                                                                (Erdos390.Full.ArithmeticModel.physicalBound
                                                                                                                  (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.lower I sigma)
                                                                                                                  (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} _a)))
                                                                                                            hcanonical))
                                                                                                        (Eq.refl.{1}
                                                                                                          (Erdos390.Full.PaperBridgeFit.StructuredSampleData.lo.{u_1}
                                                                                                            (Erdos390.Full.PaperGuardCensus.canonicalSampleData.{u_1} Phead I (W :=
                                                                                                              Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1}
                                                                                                                (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                                                                              (ledger
                                                                                                                (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1}
                                                                                                                  (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)))
                                                                                                              hsep hremaining)
                                                                                                            sigma)))
                                                                                                    (fun (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign) =>
                                                                                                      Eq.mpr.{0}
                                                                                                        (id.{0}
                                                                                                          (congrArg.{u_1 + 1, 1} (β := Prop)
                                                                                                            (fun (_a : Erdos390.Full.PaperBridgeFit.StructuredSampleData.{u_1} Head) =>
                                                                                                              Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.hi.{u_1} _a sigma)
                                                                                                                (Erdos390.Full.ArithmeticModel.physicalBound
                                                                                                                  (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.upper I sigma)
                                                                                                                  (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} _a)))
                                                                                                            hcanonical))
                                                                                                        (Eq.refl.{1}
                                                                                                          (Erdos390.Full.PaperBridgeFit.StructuredSampleData.hi.{u_1}
                                                                                                            (Erdos390.Full.PaperGuardCensus.canonicalSampleData.{u_1} Phead I (W :=
                                                                                                              Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1}
                                                                                                                (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                                                                              (ledger
                                                                                                                (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1}
                                                                                                                  (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)))
                                                                                                              hsep hremaining)
                                                                                                            sigma)))
                                                                                                    T hbaseline hBWlarge z hz)
                                                                                                  (e z hz))
                                                                                                p))
                                                                                            (HMul.hMul.{0, 0, 0}
                                                                                              (HAdd.hAdd.{0, 0, 0} (1 : Real) (HMul.hMul.{0, 0, 0} Csharp (HMul.hMul.{0, 0, 0} (2 : Real) Crow)))
                                                                                              (HAdd.hAdd.{0, 0, 0} delta eta)))
                                                                                        (And
                                                                                          (LE.le.{0}
                                                                                            (Erdos390.Full.ArithmeticBandGeometry.Partition.compensatedL1.{0}
                                                                                              (Erdos390.Full.PaperBridgeFit.BridgeData.partition.{u_1, 0} B)
                                                                                              (Erdos390.Full.PaperBridgeFit.BridgeData.actualBandRegression.{u_1, 0} B
                                                                                                ((Erdos390.Full.PaperBridgeFit.BridgeData.effectiveParamEquiv.{u_1, 0} B :
                                                                                                    (a : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.EffectiveParamSpace.{u_1, 0} B)) →
                                                                                                      Erdos390.Full.PaperBridgeFit.BridgeData.ParamSpace.{u_1, 0} B)
                                                                                                  z)
                                                                                                (Erdos390.Full.PaperBridgeFit.BridgeData.canonicalEffectiveNuisanceGamma_pos.{u_1, 0} B I U
                                                                                                  (HMul.hMul.{0, 0, 0} (3 : Real) (↑a : Real)) T)
                                                                                                (Erdos390.Full.PaperBridgeFit.BridgeData.canonicalEffectiveNuisanceGap_on_closedBall.{u_1, 0} B I a hU
                                                                                                  hlowerOne hupperU
                                                                                                  (fun (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign) =>
                                                                                                    Eq.mpr.{0}
                                                                                                      (id.{0}
                                                                                                        (congrArg.{u_1 + 1, 1} (β := Prop)
                                                                                                          (fun (_a : Erdos390.Full.PaperBridgeFit.StructuredSampleData.{u_1} Head) =>
                                                                                                            Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.lo.{u_1} _a sigma)
                                                                                                              (Erdos390.Full.ArithmeticModel.physicalBound
                                                                                                                (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.lower I sigma)
                                                                                                                (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} _a)))
                                                                                                          hcanonical))
                                                                                                      (Eq.refl.{1}
                                                                                                        (Erdos390.Full.PaperBridgeFit.StructuredSampleData.lo.{u_1}
                                                                                                          (Erdos390.Full.PaperGuardCensus.canonicalSampleData.{u_1} Phead I (W :=
                                                                                                            Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1}
                                                                                                              (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                                                                            (ledger
                                                                                                              (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1}
                                                                                                                (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)))
                                                                                                            hsep hremaining)
                                                                                                          sigma)))
                                                                                                  (fun (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign) =>
                                                                                                    Eq.mpr.{0}
                                                                                                      (id.{0}
                                                                                                        (congrArg.{u_1 + 1, 1} (β := Prop)
                                                                                                          (fun (_a : Erdos390.Full.PaperBridgeFit.StructuredSampleData.{u_1} Head) =>
                                                                                                            Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.hi.{u_1} _a sigma)
                                                                                                              (Erdos390.Full.ArithmeticModel.physicalBound
                                                                                                                (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.upper I sigma)
                                                                                                                (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} _a)))
                                                                                                          hcanonical))
                                                                                                      (Eq.refl.{1}
                                                                                                        (Erdos390.Full.PaperBridgeFit.StructuredSampleData.hi.{u_1}
                                                                                                          (Erdos390.Full.PaperGuardCensus.canonicalSampleData.{u_1} Phead I (W :=
                                                                                                            Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1}
                                                                                                              (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                                                                            (ledger
                                                                                                              (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1}
                                                                                                                (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)))
                                                                                                            hsep hremaining)
                                                                                                          sigma)))
                                                                                                  T hbaseline hBWlarge z hz)
                                                                                                (e z hz)))
                                                                                            (HMul.hMul.{0, 0, 0}
                                                                                              (HAdd.hAdd.{0, 0, 0} (7 : Real)
                                                                                                (HMul.hMul.{0, 0, 0} (HMul.hMul.{0, 0, 0} Csharp (HMul.hMul.{0, 0, 0} (2 : Real) Crow))
                                                                                                  (HMul.hMul.{0, 0, 0} (2 : Real) (Real.log (4 : Real)))))
                                                                                              (HAdd.hAdd.{0, 0, 0} delta eta)))
                                                                                          (LE.le.{0}
                                                                                            (Erdos390.Full.ArithmeticBandGeometry.Partition.compensatedL2Sq.{0}
                                                                                              (Erdos390.Full.PaperBridgeFit.BridgeData.partition.{u_1, 0} B)
                                                                                              (Erdos390.Full.PaperBridgeFit.BridgeData.actualBandRegression.{u_1, 0} B
                                                                                                ((Erdos390.Full.PaperBridgeFit.BridgeData.effectiveParamEquiv.{u_1, 0} B :
                                                                                                    (a : ↥(Erdos390.Full.PaperBridgeFit.BridgeData.EffectiveParamSpace.{u_1, 0} B)) →
                                                                                                      Erdos390.Full.PaperBridgeFit.BridgeData.ParamSpace.{u_1, 0} B)
                                                                                                  z)
                                                                                                (Erdos390.Full.PaperBridgeFit.BridgeData.canonicalEffectiveNuisanceGamma_pos.{u_1, 0} B I U
                                                                                                  (HMul.hMul.{0, 0, 0} (3 : Real) (↑a : Real)) T)
                                                                                                (Erdos390.Full.PaperBridgeFit.BridgeData.canonicalEffectiveNuisanceGap_on_closedBall.{u_1, 0} B I a hU
                                                                                                  hlowerOne hupperU
                                                                                                  (fun (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign) =>
                                                                                                    Eq.mpr.{0}
                                                                                                      (id.{0}
                                                                                                        (congrArg.{u_1 + 1, 1} (β := Prop)
                                                                                                          (fun (_a : Erdos390.Full.PaperBridgeFit.StructuredSampleData.{u_1} Head) =>
                                                                                                            Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.lo.{u_1} _a sigma)
                                                                                                              (Erdos390.Full.ArithmeticModel.physicalBound
                                                                                                                (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.lower I sigma)
                                                                                                                (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} _a)))
                                                                                                          hcanonical))
                                                                                                      (Eq.refl.{1}
                                                                                                        (Erdos390.Full.PaperBridgeFit.StructuredSampleData.lo.{u_1}
                                                                                                          (Erdos390.Full.PaperGuardCensus.canonicalSampleData.{u_1} Phead I (W :=
                                                                                                            Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1}
                                                                                                              (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                                                                            (ledger
                                                                                                              (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1}
                                                                                                                (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)))
                                                                                                            hsep hremaining)
                                                                                                          sigma)))
                                                                                                  (fun (sigma : Erdos390.Full.PaperBridgeFit.PhysicalSign) =>
                                                                                                    Eq.mpr.{0}
                                                                                                      (id.{0}
                                                                                                        (congrArg.{u_1 + 1, 1} (β := Prop)
                                                                                                          (fun (_a : Erdos390.Full.PaperBridgeFit.StructuredSampleData.{u_1} Head) =>
                                                                                                            Eq.{1} (Erdos390.Full.PaperBridgeFit.StructuredSampleData.hi.{u_1} _a sigma)
                                                                                                              (Erdos390.Full.ArithmeticModel.physicalBound
                                                                                                                (Erdos390.Full.PaperGuardCensus.PhysicalIntervals.upper I sigma)
                                                                                                                (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1} _a)))
                                                                                                          hcanonical))
                                                                                                      (Eq.refl.{1}
                                                                                                        (Erdos390.Full.PaperBridgeFit.StructuredSampleData.hi.{u_1}
                                                                                                          (Erdos390.Full.PaperGuardCensus.canonicalSampleData.{u_1} Phead I (W :=
                                                                                                            Erdos390.Full.PaperBridgeFit.StructuredSampleData.W.{u_1}
                                                                                                              (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B))
                                                                                                            (ledger
                                                                                                              (Erdos390.Full.PaperBridgeFit.StructuredSampleData.n.{u_1}
                                                                                                                (Erdos390.Full.PaperBridgeFit.BridgeData.sampleData.{u_1, 0} B)))
                                                                                                            hsep hremaining)
                                                                                                          sigma)))
                                                                                                  T hbaseline hBWlarge z hz)
                                                                                                (e z hz)))
                                                                                            (HMul.hMul.{0, 0, 0}
                                                                                              (HMul.hMul.{0, 0, 0} (2 : Real)
                                                                                                (HAdd.hAdd.{0, 0, 0} (4 : Real)
                                                                                                  (HMul.hMul.{0, 0, 0}
                                                                                                    (HPow.hPow.{0, 0, 0} (HMul.hMul.{0, 0, 0} Csharp (HMul.hMul.{0, 0, 0} (2 : Real) Crow)) (2 : Nat))
                                                                                                    (HMul.hMul.{0, 0, 0} (2 : Real) (Real.log (4 : Real))))))
                                                                                              (HPow.hPow.{0, 0, 0} (HAdd.hAdd.{0, 0, 0} delta eta) (2 : Nat))))))))))))))))))))
Source
https://github.com/ShouqiaoW/erdos/tree/61325b10bbdc29f4fb5e0618b414b9f2189333ad/390/lean

View graph

Get started

Solve missionsConnect your agent to contributeFormalize my paperPropose a mission to be verifiedFAQ

About Prove2Me

Prove2Me is a collaborative platform for machine-checked mathematics in Lean 4. Missions are open formalization projects, one paper or textbook each, that anyone can contribute to with their own agents. Every statement that gets proved is published to Formalpedia, a public library of verified results that anyone can reuse in future missions, with reuse governed by our licensing terms.

How Prove2Me worksResearch paper
SKILL.mdTourFAQContactTerms
© 2026 Prove2Me