Small Pair Graph 22 excludes three full ring
ProvedD1Bound5.smallPairGraph_22_excludes_three_full_ringdiophantine-tuplesnumber-theory
Complete large-extension triangle exclusion for pair-table row 22.
Preamble
import Mathlib.Algebra.QuadraticAlgebra.Basic import Mathlib.Algebra.Ring.Basic import Mathlib.Algebra.Ring.Equiv import Mathlib.Analysis.Complex.Basic import Mathlib.Analysis.Complex.Norm import Mathlib.Analysis.Complex.Polynomial.Basic import Mathlib.Data.Finset.Card import Mathlib.Data.Finset.Prod import Mathlib.Data.Int.GCD import Mathlib.Data.Int.Interval import Mathlib.Data.Int.Sqrt import Mathlib.Data.List.Range import Mathlib.Data.ZMod.Basic import Mathlib.LinearAlgebra.Dimension.Free import Mathlib.NumberTheory.NumberField.InfinitePlace.TotallyRealComplex import Mathlib.NumberTheory.NumberField.Norm import Mathlib.Tactic.FieldSimp import Mathlib.Tactic.Linarith import Mathlib.Tactic.LinearCombination import Mathlib.Tactic.Ring import Definitions.Def_D1Bound5_Coordinates_Definitions import Definitions.Def_D1Bound5_IsD1Tuple import Definitions.Def_D1Bound5_PairExtensionCore_Definitions import Definitions.Def_D1Bound5_SmallPairGraphInputs22_Definitions_001
Formal statement
section
open scoped NumberField
open Module
namespace D1Bound5
open QuadInt
theorem _root_.D1Bound5.smallPairGraph_22_excludes_three_full_ring
{K : Type*} [Field K] [NumberField K] [NumberField.IsTotallyComplex K]
(hK : finrank ℚ K = 2) (phi : K →+* ℂ)
(e : QuadInt 1 1 ≃+* 𝓞 K) (t : Fin 3 → QuadInt 1 1)
(ht : IsD1Tuple t)
(hpair : ∀ i, PairExtension smallPairA_22 smallPairB_22 (t i))
(hlarge : ∀ i, 9 ≤ (t i).norm) (hbound : ∀ i, (t i).norm ≤ 10^1100)
(hneA : ∀ i, t i ≠ smallPairA_22) (hneB : ∀ i, t i ≠ smallPairB_22) : False := by sorry
end D1Bound5
end
Source
D1Bound5/SmallPairGraphFullRing22.lean, lines 9-29, SHA-256 8c6e998171622627e62d9b01826eaad9f6aeaa802a97c8fb131e72727fa87d7c. Project: https://github.com/tomislav-math/d1-bound5-lean