diff --git a/LeanPool/BrillNoetherGraphs/Imports.lean b/LeanPool/BrillNoetherGraphs/Imports.lean index 11600a6665..e6750e7130 100644 --- a/LeanPool/BrillNoetherGraphs/Imports.lean +++ b/LeanPool/BrillNoetherGraphs/Imports.lean @@ -226,6 +226,7 @@ public import LeanPool.BrillNoetherGraphs.LowGenus public import LeanPool.BrillNoetherGraphs.LowGenus.AtanasovRanganathanExistence public import LeanPool.BrillNoetherGraphs.LowGenus.AtanasovRanganathanProgram public import LeanPool.BrillNoetherGraphs.LowGenus.ClosedConstructionTail +public import LeanPool.BrillNoetherGraphs.LowGenus.CompactCellTreeLookup public import LeanPool.BrillNoetherGraphs.LowGenus.ConfigurationBananaDoubleChip public import LeanPool.BrillNoetherGraphs.LowGenus.ConfigurationBananaTail public import LeanPool.BrillNoetherGraphs.LowGenus.ConfigurationChippedTriangle @@ -357,6 +358,7 @@ public import LeanPool.BrillNoetherGraphs.Utilities.Foundations.AcyclicOrientati public import LeanPool.BrillNoetherGraphs.Utilities.Foundations.BlockSlopeRounding public import LeanPool.BrillNoetherGraphs.Utilities.Foundations.BrillNoetherRank public import LeanPool.BrillNoetherGraphs.Utilities.Foundations.CanonicalSlackPair +public import LeanPool.BrillNoetherGraphs.Utilities.Foundations.ChunkedLookup public import LeanPool.BrillNoetherGraphs.Utilities.Foundations.CommonOffsetRounding public import LeanPool.BrillNoetherGraphs.Utilities.Foundations.ConvexIntegerRounding public import LeanPool.BrillNoetherGraphs.Utilities.Foundations.Duality diff --git a/LeanPool/BrillNoetherGraphs/LowGenus/CompactCellTreeLookup.lean b/LeanPool/BrillNoetherGraphs/LowGenus/CompactCellTreeLookup.lean new file mode 100644 index 0000000000..0df590e94c --- /dev/null +++ b/LeanPool/BrillNoetherGraphs/LowGenus/CompactCellTreeLookup.lean @@ -0,0 +1,71 @@ +/- +Copyright (c) 2026 Nathan Pflueger and OpenAI. All rights reserved. +Released under Apache 2.0 license as described in the file LICENSE. +Authors: Nathan Pflueger, OpenAI +-/ +module + +public import LeanPool.BrillNoetherGraphs.LowGenus.GenusFiveClosedCover + +/-! +# Equivalent receipt lookups for compact cover replay + +The generated row proofs keep their original tables and checker statements. Their private +`_chunked` lemmas replay the same trees with a size-checked block lookup, skipping complete +receipt blocks rather than repeatedly traversing a concatenated prefix. + +The original proofs transfer these results through `checkLookup_eq_check`. Their `as_aux_lemma` +wrappers also preserve the names and types of the original kernel-check auxiliary declarations. +-/ + +@[expose] public section + +open Utilities Utilities.Certificate + +namespace AtanasovRanganathan.GenusFiveClosedCover.CompactCellTree + +/-- Decode receipt indices through a supplied lookup function. -/ +def decodeLookup {p : ℕ} + (forms : List (ExplicitPotential.AffineForm p)) + (lookupReceipt : ℕ → Certificate.AffineCover.FarkasData) : CompactCellTree → CellTree p + | .cell index indices => .cell index (indices.map lookupReceipt) + | .absurd index => .absurd (lookupReceipt index) + | .split index nonnegative negative => + .split (forms.getD index 0) + (decodeLookup forms lookupReceipt nonnegative) + (decodeLookup forms lookupReceipt negative) + +/-- List lookup recovers the original compact-tree decoder. -/ +theorem decodeLookup_getD {p : ℕ} (tree : CompactCellTree) + (forms : List (ExplicitPotential.AffineForm p)) + (receipts : List Certificate.AffineCover.FarkasData) : + decodeLookup forms (fun index => receipts.getD index { terms := [] }) tree = + tree.decode forms receipts := by + induction tree with + | cell index indices => rfl + | absurd index => rfl + | split index nonnegative negative ihNonnegative ihNegative => + simp only [decodeLookup, decode, ihNonnegative, ihNegative] + +/-- Replay a compact tree using an extensionally equivalent receipt lookup. -/ +def checkLookup {n p : ℕ} {core : ExplicitPotential.Core n p} + (tree : CompactCellTree) (forms : List (ExplicitPotential.AffineForm p)) + (lookupReceipt : ℕ → Certificate.AffineCover.FarkasData) + (cells : List (CoordinateCell core)) + (active : List (ExplicitPotential.AffineForm p)) : Bool := + (decodeLookup forms lookupReceipt tree).check cells active + +/-- Changing the lookup implementation preserves every original replay result. -/ +theorem checkLookup_eq_check {n p : ℕ} {core : ExplicitPotential.Core n p} + (tree : CompactCellTree) (forms : List (ExplicitPotential.AffineForm p)) + (receipts : List Certificate.AffineCover.FarkasData) + (lookupReceipt : ℕ → Certificate.AffineCover.FarkasData) + (hLookup : ∀ index, lookupReceipt index = receipts.getD index { terms := [] }) + (cells : List (CoordinateCell core)) + (active : List (ExplicitPotential.AffineForm p)) : + checkLookup tree forms lookupReceipt cells active = tree.check forms receipts cells active := by + have hFunctions : lookupReceipt = fun index => receipts.getD index { terms := [] } := + funext hLookup + rw [checkLookup, hFunctions, decodeLookup_getD] + rfl +end AtanasovRanganathan.GenusFiveClosedCover.CompactCellTree diff --git a/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow03CoverReceipts.lean b/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow03CoverReceipts.lean index 68ea8fa6de..0a54439d7f 100644 --- a/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow03CoverReceipts.lean +++ b/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow03CoverReceipts.lean @@ -6,6 +6,7 @@ Authors: Nathan Pflueger module public import LeanPool.BrillNoetherGraphs.Utilities.Subdivision.AffineCover +public import LeanPool.BrillNoetherGraphs.Utilities.Foundations.ChunkedLookup /-! # Sparse Farkas receipts for the row-03 closed cover @@ -1769,4 +1770,34 @@ def farkasReceipts : List Certificate.AffineCover.FarkasData := farkasReceipts0 ++ farkasReceipts1 ++ farkasReceipts2 ++ farkasReceipts3 ++ farkasReceipts4 ++ farkasReceipts5 ++ farkasReceipts6 +/-- Existing receipt blocks with their checked sizes, avoiding repeated prefix traversal. -/ +def farkasReceiptChunks : List (ℕ × List Certificate.AffineCover.FarkasData) := + [(128, farkasReceipts0), + (128, farkasReceipts1), + (128, farkasReceipts2), + (128, farkasReceipts3), + (128, farkasReceipts4), + (128, farkasReceipts5), + (28, farkasReceipts6)] + +private theorem farkasReceiptChunks_sizes : + ∀ chunk ∈ farkasReceiptChunks, chunk.1 = chunk.2.length := by + intro chunk hMem + simp only [farkasReceiptChunks, List.mem_cons, List.not_mem_nil, or_false] at hMem + rcases hMem with rfl | rfl | rfl | rfl | rfl | rfl | rfl <;> rfl + +/-- Block lookup keeps the original table, order, and out-of-range default. -/ +def farkasReceiptLookup (index : ℕ) : Certificate.AffineCover.FarkasData := + List.lookupChunks farkasReceiptChunks index { terms := [] } + +theorem farkasReceiptLookup_eq_getD (index : ℕ) : + farkasReceiptLookup index = farkasReceipts.getD index { terms := [] } := by + have hTable : farkasReceiptChunks.flatMap Prod.snd = farkasReceipts := by + simp only [farkasReceiptChunks, List.flatMap_cons, List.flatMap_nil, List.append_nil, + List.append_assoc, farkasReceipts] + have hLookup := List.lookupChunks_eq_getD_flatMap farkasReceiptChunks + farkasReceiptChunks_sizes index { terms := [] } + rw [hTable] at hLookup + exact hLookup + end AtanasovRanganathan.GenusFiveRow03FixedCover diff --git a/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow03FixedCover.lean b/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow03FixedCover.lean index ba1a47cfe5..1d15b52306 100644 --- a/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow03FixedCover.lean +++ b/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow03FixedCover.lean @@ -9,6 +9,7 @@ module public import LeanPool.BrillNoetherGraphs.LowGenus.GenusFiveClosedCover public import LeanPool.BrillNoetherGraphs.LowGenus.GenusFiveCoreAtlas public import LeanPool.BrillNoetherGraphs.LowGenus.GenusFiveRow03CoverReceipts +import LeanPool.BrillNoetherGraphs.LowGenus.CompactCellTreeLookup /-! **Independent generated check.** The main row-03 proof is now `GenusFiveTwoPoleClosed.row03_closedConstruction`; this module preserves @@ -3293,12 +3294,21 @@ theorem splitForm68 : splitForms.getD 68 0 = aff [0, 0, 0, -1, 0, 0, 0, -1, 1, 1 def treePart0 : CompactCellTree := .cell 0 [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15] +private theorem treePart0_check_chunked : + treePart0.checkLookup splitForms farkasReceiptLookup cells + ((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, 0, + 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + 0, -1, 0, 1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart0_check : treePart0.check splitForms farkasReceipts cells ((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart0_check_chunked /-- The row-03 subtree selecting cells one or two according to split forms 14 and 15; receipt 60 excludes the remaining branch. -/ @@ -3311,6 +3321,16 @@ def treePart1 : CompactCellTree := 58, 59]) (.absurd 60)) +private theorem treePart1_check_chunked : + treePart1.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, + 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, + 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) = true + := by + decide +kernel + theorem treePart1_check : treePart1.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, @@ -3319,7 +3339,9 @@ theorem treePart1_check : 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart1_check_chunked /-- The row-03 subtree selecting cells three through eight, with Farkas receipts excluding sign branches outside those cell cones. -/ @@ -3362,6 +3384,16 @@ def treePart2 : CompactCellTree := (.absurd 150)) (.absurd 180))) +private theorem treePart2_check_chunked : + treePart2.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, + 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, + 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, + 0, 0, 0, -1])]) = true := by + decide +kernel + theorem treePart2_check : treePart2.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, @@ -3370,7 +3402,9 @@ theorem treePart2_check : 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart2_check_chunked /-- The row-03 subtree selecting cells nine through thirteen; repeated leaves for cell nine certify its inclusion from different active inequalities. -/ @@ -3401,6 +3435,16 @@ def treePart3 : CompactCellTree := (.absurd 150)) (.absurd 189))) +private theorem treePart3_check_chunked : + treePart3.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, + 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, -1, + 1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart3_check : treePart3.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, @@ -3409,7 +3453,9 @@ theorem treePart3_check : 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart3_check_chunked /-- Subtree splitting on `length[1] - length[11]` in the row-03 length cone, with leaves selecting cells 2, 4, 6, 8 and Farkas receipts excluding inconsistent sign branches. -/ @@ -3442,6 +3488,16 @@ def treePart4 : CompactCellTree := (.absurd 150)) (.absurd 223))) +private theorem treePart4_check_chunked : + treePart4.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, + 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart4_check : treePart4.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, @@ -3450,7 +3506,9 @@ theorem treePart4_check : 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart4_check_chunked /-- Subtree splitting on `length[1] - length[11]` in the row-03 length cone, with leaves selecting cells 14, 15 and Farkas receipts excluding inconsistent sign branches. -/ @@ -3465,6 +3523,16 @@ def treePart5 : CompactCellTree := (.absurd 228))) (.absurd 60) +private theorem treePart5_check_chunked : + treePart5.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, + 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, + -1, 0, 0, 0, 0]]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart5_check : treePart5.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -3473,7 +3541,9 @@ theorem treePart5_check : 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart5_check_chunked /-- Subtree splitting on `- length[1] + length[11]` in the row-03 length cone, with leaves selecting cells 3, 4, 5, 6, 7, 8, 16, 17 and Farkas receipts excluding inconsistent sign @@ -3517,6 +3587,17 @@ def treePart6 : CompactCellTree := (.absurd 231))) (.absurd 263)) +private theorem treePart6_check_chunked : + treePart6.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, + 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, + -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart6_check : treePart6.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -3526,7 +3607,9 @@ theorem treePart6_check : 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart6_check_chunked /-- Subtree splitting on `- length[1] + length[11]` in the row-03 length cone, with leaves selecting cells 3, 4 and Farkas receipts excluding inconsistent sign branches. -/ @@ -3543,6 +3626,17 @@ def treePart7 : CompactCellTree := (.absurd 231))) (.absurd 263)) +private theorem treePart7_check_chunked : + treePart7.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, + 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, + -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart7_check : treePart7.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -3552,7 +3646,9 @@ theorem treePart7_check : 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart7_check_chunked /-- Subtree splitting on `length[1] - length[11]` in the row-03 length cone, with leaves selecting cells 15, 18 and Farkas receipts excluding inconsistent sign branches. -/ @@ -3567,6 +3663,17 @@ def treePart8 : CompactCellTree := (.absurd 228))) (.absurd 60) +private theorem treePart8_check_chunked : + treePart8.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, + 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, + 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) = + true := by + decide +kernel + theorem treePart8_check : treePart8.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -3576,7 +3683,9 @@ theorem treePart8_check : 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart8_check_chunked /-- Subtree splitting on `- length[2] + length[3]` in the row-03 length cone, with leaves selecting cells 6, 8, 11, 12, 13, 17, 19 and Farkas receipts excluding inconsistent sign @@ -3613,6 +3722,18 @@ def treePart9 : CompactCellTree := (.absurd 261))) (.absurd 268)))) +private theorem treePart9_check_chunked : + treePart9.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, + 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, + 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 1]]) = true := by + decide +kernel + theorem treePart9_check : treePart9.check splitForms farkasReceipts cells (((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -3623,7 +3744,9 @@ theorem treePart9_check : 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart9_check_chunked /-- Subtree splitting on `- length[2] + length[3]` in the row-03 length cone, with leaves selecting cells 4, 10 and Farkas receipts excluding inconsistent sign branches. -/ @@ -3640,6 +3763,18 @@ def treePart10 : CompactCellTree := (.absurd 265)) (.absurd 269)) +private theorem treePart10_check_chunked : + treePart10.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, + 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, + 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1])]) = true := by + decide +kernel + theorem treePart10_check : treePart10.check splitForms farkasReceipts cells (((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -3650,7 +3785,9 @@ theorem treePart10_check : 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart10_check_chunked /-- Subtree splitting on `length[1] - length[11]` in the row-03 length cone, with leaves selecting cells 4, 10, 20 and Farkas receipts excluding inconsistent sign branches. -/ @@ -3674,6 +3811,18 @@ def treePart11 : CompactCellTree := (.absurd 270)))) (.absurd 264) +private theorem treePart11_check_chunked : + treePart11.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, + 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, + 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, + 0])]) = true := by + decide +kernel + theorem treePart11_check : treePart11.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -3684,7 +3833,9 @@ theorem treePart11_check : 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart11_check_chunked /-- Subtree splitting on `- length[0] + length[6] - length[8]` in the row-03 length cone, with leaves selecting cells 21, 22 and Farkas receipts excluding inconsistent sign branches. -/ @@ -3699,6 +3850,17 @@ def treePart12 : CompactCellTree := (.absurd 274))) (.absurd 275) +private theorem treePart12_check_chunked : + treePart12.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, + 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff + [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0]]) + ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart12_check : treePart12.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -3708,7 +3870,9 @@ theorem treePart12_check : 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart12_check_chunked /-- Subtree splitting on `- length[1] + length[6] - length[8]` in the row-03 length cone, with leaves selecting cells 5, 7, 12, 13, 23, 24 and Farkas receipts excluding inconsistent sign @@ -3746,6 +3910,17 @@ def treePart13 : CompactCellTree := (.absurd 308)) (.absurd 309) +private theorem treePart13_check_chunked : + treePart13.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, + 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff + [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0]]) + ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart13_check : treePart13.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -3755,7 +3930,9 @@ theorem treePart13_check : 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart13_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 6, 8, 25, 26, 27 and Farkas receipts excluding inconsistent sign branches. -/ @@ -3783,6 +3960,17 @@ def treePart14 : CompactCellTree := (.absurd 311)) (.absurd 312)) +private theorem treePart14_check_chunked : + treePart14.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, + 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff + [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, + 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart14_check : treePart14.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -3792,7 +3980,9 @@ theorem treePart14_check : 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart14_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 12, 13, 22 and Farkas receipts excluding inconsistent sign branches. -/ @@ -3822,6 +4012,18 @@ def treePart15 : CompactCellTree := (.absurd 311)) (.absurd 312)) +private theorem treePart15_check_chunked : + treePart15.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, + 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff + [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, + 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, + 0])]) = true := by + decide +kernel + theorem treePart15_check : treePart15.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -3832,7 +4034,9 @@ theorem treePart15_check : [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart15_check_chunked /-- Subtree splitting on `- length[0] + length[6] - length[8]` in the row-03 length cone, with leaves selecting cells 28, 29, 30 and Farkas receipts excluding inconsistent sign branches. -/ @@ -3863,6 +4067,17 @@ def treePart16 : CompactCellTree := (.absurd 323)))) (.absurd 324) +private theorem treePart16_check_chunked : + treePart16.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, + 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart16_check : treePart16.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -3872,7 +4087,9 @@ theorem treePart16_check : 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart16_check_chunked /-- Subtree splitting on `length[1] - length[11]` in the row-03 length cone, with leaves selecting cells 5, 6, 7, 8, 12, 13 and Farkas receipts excluding inconsistent sign branches. -/ @@ -3917,6 +4134,18 @@ def treePart17 : CompactCellTree := (.absurd 331))) (.absurd 332))))) +private theorem treePart17_check_chunked : + treePart17.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, + 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, -1, 0, + 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1]]) = true := by + decide +kernel + theorem treePart17_check : treePart17.check splitForms farkasReceipts cells (((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -3927,13 +4156,28 @@ theorem treePart17_check : [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart17_check_chunked /-- Contradiction leaf using Farkas receipt 333 to exclude the accumulated affine constraints in this row-03 branch. -/ def treePart18 : CompactCellTree := .absurd 333 +private theorem treePart18_check_chunked : + treePart18.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, + 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, -1, 0, + 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 1])]) = true := by + decide +kernel + theorem treePart18_check : treePart18.check splitForms farkasReceipts cells (((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -3945,13 +4189,27 @@ theorem treePart18_check : [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart18_check_chunked /-- Contradiction leaf using Farkas receipt 334 to exclude the accumulated affine constraints in this row-03 branch. -/ def treePart19 : CompactCellTree := .absurd 334 +private theorem treePart19_check_chunked : + treePart19.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, + 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart19_check : treePart19.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -3962,7 +4220,9 @@ theorem treePart19_check : [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart19_check_chunked /-- Subtree splitting on `length[5] + length[6] - length[7] - length[8]` in the row-03 length cone, with leaves selecting cells 31, 32, 33, 34 and Farkas receipts excluding inconsistent sign @@ -3989,6 +4249,17 @@ def treePart20 : CompactCellTree := (.absurd 342))))) (.absurd 343) +private theorem treePart20_check_chunked : + treePart20.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ [aff [0, 0, 0, 1, + 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 1, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) ++ [aff [0, + 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0]]) = + true := by + decide +kernel + theorem treePart20_check : treePart20.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -3998,7 +4269,9 @@ theorem treePart20_check : 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 1, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart20_check_chunked /-- Subtree splitting on `length[2] - length[3]` in the row-03 length cone, with leaves selecting cells 35, 36, 37, 38 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4026,6 +4299,17 @@ def treePart21 : CompactCellTree := (.absurd 350)) (.absurd 351) +private theorem treePart21_check_chunked : + treePart21.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ [aff [0, 0, 0, 1, + 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 1, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) ++ [aff [0, + 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 0, + -1, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart21_check : treePart21.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -4035,7 +4319,9 @@ theorem treePart21_check : 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 1, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart21_check_chunked /-- Subtree splitting on `length[3] - length[7]` in the row-03 length cone, with leaves selecting cells 28, 29, 39, 40, 41 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4071,6 +4357,16 @@ def treePart22 : CompactCellTree := (.absurd 357)) (.absurd 193)) +private theorem treePart22_check_chunked : + treePart22.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, + 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ [aff [0, 0, 0, 1, + 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 1, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart22_check : treePart22.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, @@ -4079,7 +4375,9 @@ theorem treePart22_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 1, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart22_check_chunked /-- Subtree splitting on `length[1] + length[5] - length[6] + length[8]` in the row-03 length cone, with leaves selecting cells 7, 8, 42, 43 and Farkas receipts excluding inconsistent sign @@ -4109,6 +4407,16 @@ def treePart23 : CompactCellTree := (.absurd 192))) (.absurd 324)) +private theorem treePart23_check_chunked : + treePart23.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, + 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ [aff [0, 0, 0, 1, + 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, -1, 0, 1, 0, + 0, 0])]) ++ [aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart23_check : treePart23.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, @@ -4117,7 +4425,9 @@ theorem treePart23_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart23_check_chunked /-- Subtree splitting on `- length[0] + length[6] - length[8]` in the row-03 length cone, with leaves selecting cells 28, 29, 39, 41, 44, 45, 46 and Farkas receipts excluding inconsistent @@ -4156,6 +4466,17 @@ def treePart24 : CompactCellTree := (.absurd 370)) (.absurd 371) +private theorem treePart24_check_chunked : + treePart24.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, + 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ [aff [0, 0, 0, 1, + 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, -1, 0, 1, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := + by + decide +kernel + theorem treePart24_check : treePart24.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, @@ -4165,7 +4486,9 @@ theorem treePart24_check : 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart24_check_chunked /-- Subtree splitting on `length[0] - length[6] + length[8]` in the row-03 length cone, with leaves selecting cells 30, 47, 48, 49, 50, 51, 52 and Farkas receipts excluding inconsistent @@ -4207,6 +4530,16 @@ def treePart25 : CompactCellTree := (.absurd 266)))) (.absurd 376))) +private theorem treePart25_check_chunked : + treePart25.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, + 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, -1, + 1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 1, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart25_check : treePart25.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, @@ -4215,7 +4548,9 @@ theorem treePart25_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 1, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart25_check_chunked /-- Subtree splitting on `length[0] - length[1]` in the row-03 length cone, with leaves selecting cells 13, 30, 51, 52, 53, 54 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4248,6 +4583,17 @@ def treePart26 : CompactCellTree := (.absurd 379)) (.absurd 372)) +private theorem treePart26_check_chunked : + treePart26.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, + 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, -1, + 1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, -1, 0, 1, 0, + 0, 0])]) = true := by + decide +kernel + theorem treePart26_check : treePart26.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, @@ -4257,7 +4603,9 @@ theorem treePart26_check : [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart26_check_chunked /-- Subtree splitting on `length[1] - length[6] + length[8]` in the row-03 length cone, with leaves selecting cells 8, 35, 36, 37, 38, 43 and Farkas receipts excluding inconsistent sign @@ -4300,6 +4648,17 @@ def treePart27 : CompactCellTree := (.absurd 376)) (.absurd 372)) +private theorem treePart27_check_chunked : + treePart27.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, + 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, 0, 0, + 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart27_check : treePart27.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, @@ -4309,7 +4668,9 @@ theorem treePart27_check : [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart27_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 8, 29, 40, 41, 43 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4345,6 +4706,17 @@ def treePart28 : CompactCellTree := (.absurd 379)) (.absurd 372)) +private theorem treePart28_check_chunked : + treePart28.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, + 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart28_check : treePart28.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, @@ -4354,20 +4726,32 @@ theorem treePart28_check : [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart28_check_chunked /-- Leaf selecting row-03 cell 55, with 17 Farkas receipts deriving its cone inequalities from the active branch constraints. -/ def treePart29 : CompactCellTree := .cell 55 [384, 385, 386, 387, 388, 389, 390, 391, 392, 393, 394, 395, 396, 397, 398, 399, 400] +private theorem treePart29_check_chunked : + treePart29.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, + 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0])]) + ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, + 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart29_check : treePart29.check splitForms farkasReceipts cells ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart29_check_chunked /-- Subtree splitting on `length[1] - length[5] - length[11]` in the row-03 length cone, with leaves selecting cells 1, 3, 5, 7 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4396,6 +4780,16 @@ def treePart30 : CompactCellTree := (.absurd 407)) (.absurd 382)))) +private theorem treePart30_check_chunked : + treePart30.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, + 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0])]) + ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, + 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, + 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) = + true := by + decide +kernel + theorem treePart30_check : treePart30.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, @@ -4404,7 +4798,9 @@ theorem treePart30_check : 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart30_check_chunked /-- Subtree splitting on `length[0] - length[11]` in the row-03 length cone, with leaves selecting cells 3, 14, 21, 28, 56, 57 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4445,6 +4841,16 @@ def treePart31 : CompactCellTree := (.absurd 407)) (.absurd 416))) +private theorem treePart31_check_chunked : + treePart31.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 1, 0, 0, 0, -1, + 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ + [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, + 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart31_check : treePart31.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -4453,7 +4859,9 @@ theorem treePart31_check : 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart31_check_chunked /-- Subtree splitting on `length[1] + length[5] - length[11]` in the row-03 length cone, with leaves selecting cells 5, 7, 21, 28 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4494,6 +4902,17 @@ def treePart32 : CompactCellTree := (.absurd 423))) (.absurd 420)))) +private theorem treePart32_check_chunked : + treePart32.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 1, 0, 0, 0, -1, + 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ + [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, + 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, + 0, -1])]) = true := by + decide +kernel + theorem treePart32_check : treePart32.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -4503,7 +4922,9 @@ theorem treePart32_check : [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart32_check_chunked /-- Subtree splitting on `length[1] - length[5] - length[6] + length[8]` in the row-03 length cone, with leaves selecting cells 7, 32, 33, 42 and Farkas receipts excluding inconsistent sign @@ -4529,6 +4950,16 @@ def treePart33 : CompactCellTree := (.absurd 308)) (.absurd 405))) +private theorem treePart33_check_chunked : + treePart33.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, + 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0])]) + ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, + 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, + 0, 0, -1, -1, 0, 1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart33_check : treePart33.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, @@ -4537,7 +4968,9 @@ theorem treePart33_check : 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, -1, -1, 0, 1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart33_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 7, 24, 32, 34, 42 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4565,6 +4998,17 @@ def treePart34 : CompactCellTree := 98, 95]) (.absurd 428))) +private theorem treePart34_check_chunked : + treePart34.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 1, 0, 0, 0, -1, + 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 1, 0, 0, + 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart34_check : treePart34.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -4574,7 +5018,9 @@ theorem treePart34_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart34_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 7, 24, 28, 39, 42, 44 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4607,6 +5053,17 @@ def treePart35 : CompactCellTree := (.absurd 429)) (.absurd 426)) +private theorem treePart35_check_chunked : + treePart35.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 1, 0, 0, 0, -1, + 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart35_check : treePart35.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -4616,7 +5073,9 @@ theorem treePart35_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart35_check_chunked /-- Subtree splitting on `length[2] - length[3]` in the row-03 length cone, with leaves selecting cells 58 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4625,13 +5084,23 @@ def treePart36 : CompactCellTree := (.cell 58 [430, 431, 432, 433, 434, 435, 436, 437, 438, 439, 440, 441, 442, 443, 444, 445, 446]) (.absurd 447) +private theorem treePart36_check_chunked : + treePart36.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, + 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0])]) + ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, + 1, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart36_check : treePart36.check splitForms farkasReceipts cells ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart36_check_chunked /-- Subtree splitting on `length[0] - length[5] - length[11]` in the row-03 length cone, with leaves selecting cells 2, 15, 25, 29 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4662,6 +5131,16 @@ def treePart37 : CompactCellTree := (.absurd 308)) (.absurd 405))) +private theorem treePart37_check_chunked : + treePart37.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, + 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0])]) + ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, + 1, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, + 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [aff [0, 0, 1, 0, 0, 0, -1, + 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart37_check : treePart37.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, @@ -4670,7 +5149,9 @@ theorem treePart37_check : 1, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart37_check_chunked /-- Subtree splitting on `length[1] - length[11]` in the row-03 length cone, with leaves selecting cells 4, 6, 8, 15 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4707,6 +5188,17 @@ def treePart38 : CompactCellTree := (.absurd 407)) (.absurd 425))) +private theorem treePart38_check_chunked : + treePart38.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, + 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, + 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation + (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + -1]]) = true := by + decide +kernel + theorem treePart38_check : treePart38.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -4716,7 +5208,9 @@ theorem treePart38_check : 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart38_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 6, 8, 25, 29 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4749,6 +5243,17 @@ def treePart39 : CompactCellTree := (.absurd 453))) (.absurd 429))) +private theorem treePart39_check_chunked : + treePart39.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, + 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, + 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation + (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, -1])]) = true := by + decide +kernel + theorem treePart39_check : treePart39.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -4758,7 +5263,9 @@ theorem treePart39_check : 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart39_check_chunked /-- Subtree splitting on `length[1] - length[6] + length[8]` in the row-03 length cone, with leaves selecting cells 8, 36, 37, 43 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4799,6 +5306,16 @@ def treePart40 : CompactCellTree := (.absurd 227)) (.absurd 463)))) +private theorem treePart40_check_chunked : + treePart40.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, + 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0])]) + ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, + 1, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, + 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ [aff + [0, 1, 0, 0, 0, 0, -1, -1, 0, 1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart40_check : treePart40.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, @@ -4807,7 +5324,9 @@ theorem treePart40_check : 1, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, -1, -1, 0, 1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart40_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 8, 27, 36, 38, 43 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4843,6 +5362,17 @@ def treePart41 : CompactCellTree := (.absurd 465)) (.absurd 451))) +private theorem treePart41_check_chunked : + treePart41.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, + 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, + 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) + ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 1, 0, + 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart41_check : treePart41.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -4852,7 +5382,9 @@ theorem treePart41_check : 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart41_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 8, 41, 43 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4880,6 +5412,18 @@ def treePart42 : CompactCellTree := (.absurd 420)) (.absurd 417)) +private theorem treePart42_check_chunked : + treePart42.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, + 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, + 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) + ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 1, 0, 0, 0, + 0, 1, -1, 0, 1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart42_check : treePart42.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -4890,7 +5434,9 @@ theorem treePart42_check : ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 1, -1, 0, 1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart42_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 8, 29, 43 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4920,6 +5466,18 @@ def treePart43 : CompactCellTree := (.absurd 420)) (.absurd 417)) +private theorem treePart43_check_chunked : + treePart43.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, + 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, + 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) + ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 1, -1, 0, 1, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart43_check : treePart43.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -4930,13 +5488,24 @@ theorem treePart43_check : ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 1, -1, 0, 1, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart43_check_chunked /-- Leaf selecting row-03 cell 59, with 17 Farkas receipts deriving its cone inequalities from the active branch constraints. -/ def treePart44 : CompactCellTree := .cell 59 [384, 385, 386, 387, 388, 389, 390, 391, 392, 393, 394, 395, 396, 397, 398, 400, 399] +private theorem treePart44_check_chunked : + treePart44.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, + 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0])]) + ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, + -1, 1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := + by + decide +kernel + theorem treePart44_check : treePart44.check splitForms farkasReceipts cells ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, @@ -4944,7 +5513,9 @@ theorem treePart44_check : ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart44_check_chunked /-- Subtree splitting on `length[0] - length[5] - length[11]` in the row-03 length cone, with leaves selecting cells 9, 18, 22, 30 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4969,6 +5540,16 @@ def treePart45 : CompactCellTree := (.absurd 412)) (.absurd 425))) +private theorem treePart45_check_chunked : + treePart45.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, + 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, + 1, 0, 0, 0])]) ++ [aff [0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, + 0, 1, 0, -1, 0, 0, -1]]) ++ [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart45_check : treePart45.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -4977,7 +5558,9 @@ theorem treePart45_check : 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart45_check_chunked /-- Subtree splitting on `length[0] - length[1]` in the row-03 length cone, with leaves selecting cells 10, 18, 22, 30 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5004,6 +5587,17 @@ def treePart46 : CompactCellTree := (.absurd 265)) (.absurd 473)))) +private theorem treePart46_check_chunked : + treePart46.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, + 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, + 1, 0, 0, 0])]) ++ [aff [0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, + 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, + -1])]) = true := by + decide +kernel + theorem treePart46_check : treePart46.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -5013,7 +5607,9 @@ theorem treePart46_check : 1, 0, 0, 0])]) ++ [aff [0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart46_check_chunked /-- Subtree splitting on `length[1] - length[5] - length[6] + length[8]` in the row-03 length cone, with leaves selecting cells 48, 49 and Farkas receipts excluding inconsistent sign @@ -5029,6 +5625,17 @@ def treePart47 : CompactCellTree := (.absurd 476)) (.absurd 426)) +private theorem treePart47_check_chunked : + treePart47.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, + 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, + 1, 0, 0, 0])]) ++ [aff [0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, -1, -1, 0, 1, 0, + 0, 0]]) = true := by + decide +kernel + theorem treePart47_check : treePart47.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -5038,7 +5645,9 @@ theorem treePart47_check : 1, 0, 0, 0])]) ++ [aff [0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, -1, -1, 0, 1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart47_check_chunked /-- Subtree splitting on `length[0] - length[6] + length[8]` in the row-03 length cone, with leaves selecting cells 11, 30, 48, 50, 51, 52 and Farkas receipts excluding inconsistent sign @@ -5081,6 +5690,17 @@ def treePart48 : CompactCellTree := (.absurd 428)) (.absurd 482)) +private theorem treePart48_check_chunked : + treePart48.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, + 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, + 1, 0, 0, 0])]) ++ [aff [0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, + 0, 0, -1, -1, 0, 1, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart48_check : treePart48.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -5090,7 +5710,9 @@ theorem treePart48_check : 1, 0, 0, 0])]) ++ [aff [0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, -1, 0, 1, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart48_check_chunked /-- Subtree splitting on `length[0] - length[1]` in the row-03 length cone, with leaves selecting cells 11, 30, 51, 52, 54 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5117,6 +5739,17 @@ def treePart49 : CompactCellTree := (.absurd 308)) (.absurd 459)) +private theorem treePart49_check_chunked : + treePart49.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, + 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, + 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ + [aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 1, 0, 0, 0, 0, -1, 0, 1, 0, 0, + 0]]) = true := by + decide +kernel + theorem treePart49_check : treePart49.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -5126,7 +5759,9 @@ theorem treePart49_check : 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 1, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart49_check_chunked /-- Subtree splitting on `length[0] - length[1]` in the row-03 length cone, with leaves selecting cells 12, 13, 22, 30, 51, 54 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5159,6 +5794,17 @@ def treePart50 : CompactCellTree := (.absurd 311)) (.absurd 417)) +private theorem treePart50_check_chunked : + treePart50.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, + 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, + 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ + [aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, + 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, -1, 0, 0, 0, -1, 1, 0, -1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart50_check : treePart50.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -5168,7 +5814,9 @@ theorem treePart50_check : 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, -1, 0, 0, 0, -1, 1, 0, -1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart50_check_chunked /-- Subtree splitting on `length[0] - length[1]` in the row-03 length cone, with leaves selecting cells 12, 22, 30, 51, 52, 53, 54 and Farkas receipts excluding inconsistent sign @@ -5208,6 +5856,18 @@ def treePart51 : CompactCellTree := (.absurd 311)) (.absurd 417)) +private theorem treePart51_check_chunked : + treePart51.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, + 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, + 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ + [aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, + 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, -1, 1, 0, -1, 0, + 0, 0])]) = true := by + decide +kernel + theorem treePart51_check : treePart51.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -5218,7 +5878,9 @@ theorem treePart51_check : [aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, -1, 1, 0, -1, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart51_check_chunked /-- Subtree splitting on `length[1] - length[5] - length[11]` in the row-03 length cone, with leaves selecting cells 48, 49 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5239,8 +5901,8 @@ def treePart52 : CompactCellTree := (.absurd 505))) (.absurd 506)) -theorem treePart52_check : - treePart52.check splitForms farkasReceipts cells +private theorem treePart52_check_chunked : + treePart52.checkLookup splitForms farkasReceiptLookup cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, @@ -5250,11 +5912,24 @@ theorem treePart52_check : 0, 0, -1, 0, 0, 0, 0, 0, -1]]) = true := by decide +kernel -/-- Subtree splitting on `- length[0] + length[6] - length[8]` in the row-03 length cone, with -leaves selecting cells 30, 49, 50, 51, 52, 54 and Farkas receipts excluding inconsistent sign -branches. -/ -def treePart53 : CompactCellTree := - .split 24 +theorem treePart52_check : + treePart52.check splitForms farkasReceipts cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, + 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, + 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff [0, 1, 0, 0, + 0, 0, -1, 0, 0, 0, 0, 0, -1]]) = true := by + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart52_check_chunked + +/-- Subtree splitting on `- length[0] + length[6] - length[8]` in the row-03 length cone, with +leaves selecting cells 30, 49, 50, 51, 52, 54 and Farkas receipts excluding inconsistent sign +branches. -/ +def treePart53 : CompactCellTree := + .split 24 (.split 27 (.split 9 (.cell 51 [105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 124, 273, 117, @@ -5282,6 +5957,18 @@ def treePart53 : CompactCellTree := (.absurd 510))) (.absurd 476)) +private theorem treePart53_check_chunked : + treePart53.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, + 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, + 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart53_check : treePart53.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -5292,7 +5979,9 @@ theorem treePart53_check : [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart53_check_chunked /-- Subtree splitting on `- length[1] - length[5] + length[11]` in the row-03 length cone, with leaves selecting cells 13, 48, 49, 60 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5334,6 +6023,18 @@ def treePart54 : CompactCellTree := (.absurd 519)) (.absurd 520))) +private theorem treePart54_check_chunked : + treePart54.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, + 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, + 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart54_check : treePart54.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -5344,7 +6045,9 @@ theorem treePart54_check : [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart54_check_chunked /-- Subtree splitting on `- length[3] + length[7]` in the row-03 length cone, with leaves selecting cells 58 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5353,6 +6056,15 @@ def treePart55 : CompactCellTree := (.cell 58 [430, 431, 432, 433, 434, 435, 436, 437, 438, 439, 440, 441, 442, 443, 444, 446, 445]) (.absurd 447) +private theorem treePart55_check_chunked : + treePart55.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, + 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0])]) + ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart55_check : treePart55.check splitForms farkasReceipts cells ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, @@ -5360,7 +6072,9 @@ theorem treePart55_check : ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart55_check_chunked /-- Subtree splitting on `length[1] - length[5] - length[11]` in the row-03 length cone, with leaves selecting cells 2, 4, 6, 8 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5391,6 +6105,17 @@ def treePart56 : CompactCellTree := (.absurd 523))) (.absurd 426)) +private theorem treePart56_check_chunked : + treePart56.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 1, + 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart56_check : treePart56.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -5400,7 +6125,9 @@ theorem treePart56_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart56_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 4, 6, 8, 15, 17, 27 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5444,6 +6171,17 @@ def treePart57 : CompactCellTree := (.absurd 453)) (.absurd 313)))) +private theorem treePart57_check_chunked : + treePart57.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) = true := by + decide +kernel + theorem treePart57_check : treePart57.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -5453,7 +6191,9 @@ theorem treePart57_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart57_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 6, 8, 25, 26, 27 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5494,6 +6234,17 @@ def treePart58 : CompactCellTree := (.absurd 532)) (.absurd 533)))) +private theorem treePart58_check_chunked : + treePart58.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + -1])]) ++ [aff [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart58_check : treePart58.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -5503,7 +6254,9 @@ theorem treePart58_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart58_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 6, 8, 26, 27, 29 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5540,6 +6293,17 @@ def treePart59 : CompactCellTree := (.absurd 465)) (.absurd 537))) +private theorem treePart59_check_chunked : + treePart59.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) = true := by + decide +kernel + theorem treePart59_check : treePart59.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -5549,7 +6313,9 @@ theorem treePart59_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart59_check_chunked /-- Subtree splitting on `length[1] - length[5] - length[6] + length[8]` in the row-03 length cone, with leaves selecting cells 8, 36, 37, 43 and Farkas receipts excluding inconsistent sign @@ -5581,6 +6347,17 @@ def treePart60 : CompactCellTree := (.absurd 308)) (.absurd 405))) +private theorem treePart60_check_chunked : + treePart60.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, + 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, 0])]) + ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, + 0, 0, -1, -1, 0, 1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart60_check : treePart60.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, @@ -5590,7 +6367,9 @@ theorem treePart60_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, -1, -1, 0, 1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart60_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 8, 27, 36, 38, 43 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5631,6 +6410,18 @@ def treePart61 : CompactCellTree := (.absurd 465)) (.absurd 103))) +private theorem treePart61_check_chunked : + treePart61.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 1, 0, 0, + 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart61_check : treePart61.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -5641,7 +6432,9 @@ theorem treePart61_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart61_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 8, 27, 41, 43 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5670,6 +6463,19 @@ def treePart62 : CompactCellTree := (.absurd 420)) (.absurd 417)) +private theorem treePart62_check_chunked : + treePart62.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 1, 0, 0, 0, + 0, 1, -1, 0, 1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart62_check : treePart62.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -5681,7 +6487,9 @@ theorem treePart62_check : [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 1, -1, 0, 1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart62_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 8, 29, 43 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5711,6 +6519,19 @@ def treePart63 : CompactCellTree := (.absurd 541)) (.absurd 542)) +private theorem treePart63_check_chunked : + treePart63.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + -1, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 1, -1, 0, 1, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart63_check : treePart63.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -5722,7 +6543,9 @@ theorem treePart63_check : [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 1, -1, 0, 1, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart63_check_chunked /-- Subtree splitting on `- length[6] + length[8]` in the row-03 length cone, with leaves selecting cells 1, 2, 9, 61 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5746,19 +6569,38 @@ def treePart64 : CompactCellTree := 35, 34, 569, 570]) (.absurd 371)))) +private theorem treePart64_check_chunked : + treePart64.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, + 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1]]) ++ + [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, + -1]]) = true := by + decide +kernel + theorem treePart64_check : treePart64.check splitForms farkasReceipts cells (((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1]]) ++ [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart64_check_chunked /-- Leaf selecting row-03 cell 62, with 17 Farkas receipts deriving its cone inequalities from the active branch constraints. -/ def treePart65 : CompactCellTree := .cell 62 [430, 431, 432, 433, 434, 435, 436, 437, 438, 439, 440, 441, 444, 571, 445, 442, 443] +private theorem treePart65_check_chunked : + treePart65.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, + -1]]) ++ [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, + 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ + [aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart65_check : treePart65.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -5766,7 +6608,9 @@ theorem treePart65_check : -1]]) ++ [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart65_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 14, 15, 18 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5789,6 +6633,16 @@ def treePart66 : CompactCellTree := (.absurd 416)))) (.absurd 574) +private theorem treePart66_check_chunked : + treePart66.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, + -1]]) ++ [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, + 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 1, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart66_check : treePart66.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -5797,7 +6651,9 @@ theorem treePart66_check : 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart66_check_chunked /-- Subtree splitting on `length[0] + length[5] - length[11]` in the row-03 length cone, with leaves selecting cells 21, 22, 25, 28, 29, 30 and Farkas receipts excluding inconsistent sign @@ -5843,6 +6699,17 @@ def treePart67 : CompactCellTree := (.absurd 578)) (.absurd 342)))) +private theorem treePart67_check_chunked : + treePart67.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, + -1]]) ++ [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, + 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart67_check : treePart67.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation @@ -5852,13 +6719,27 @@ theorem treePart67_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart67_check_chunked /-- Contradiction leaf using Farkas receipt 579 to exclude the accumulated affine constraints in this row-03 branch. -/ def treePart68 : CompactCellTree := .absurd 579 +private theorem treePart68_check_chunked : + treePart68.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, + -1]]) ++ [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, + 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 1, 0, -1, 0, + 0, 0])]) = true := by + decide +kernel + theorem treePart68_check : treePart68.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation @@ -5869,13 +6750,26 @@ theorem treePart68_check : [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart68_check_chunked /-- Contradiction leaf using Farkas receipt 580 to exclude the accumulated affine constraints in this row-03 branch. -/ def treePart69 : CompactCellTree := .absurd 580 +private theorem treePart69_check_chunked : + treePart69.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, + -1]]) ++ [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, + 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart69_check : treePart69.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -5885,13 +6779,25 @@ theorem treePart69_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart69_check_chunked /-- Leaf selecting row-03 cell 63, with 17 Farkas receipts deriving its cone inequalities from the active branch constraints. -/ def treePart70 : CompactCellTree := .cell 63 [546, 547, 548, 549, 550, 551, 552, 553, 554, 555, 556, 557, 563, 581, 564, 582, 565] +private theorem treePart70_check_chunked : + treePart70.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, + -1]]) ++ [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, + 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, + 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart70_check : treePart70.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -5900,7 +6806,9 @@ theorem treePart70_check : 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart70_check_chunked /-- Subtree splitting on `length[2] - length[7]` in the row-03 length cone, with leaves selecting cells 14, 15, 18 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5921,6 +6829,17 @@ def treePart71 : CompactCellTree := 100, 99, 573]) (.absurd 416))) +private theorem treePart71_check_chunked : + treePart71.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, + -1]]) ++ [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, + 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, + 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + -1]]) = true := by + decide +kernel + theorem treePart71_check : treePart71.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -5930,7 +6849,9 @@ theorem treePart71_check : 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart71_check_chunked /-- Subtree splitting on `- length[0] + length[6] - length[8]` in the row-03 length cone, with leaves selecting cells 21, 22, 25 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5953,6 +6874,17 @@ def treePart72 : CompactCellTree := (.absurd 342)))) (.absurd 583) +private theorem treePart72_check_chunked : + treePart72.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, + -1]]) ++ [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, + 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, + 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart72_check : treePart72.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation @@ -5962,7 +6894,9 @@ theorem treePart72_check : 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart72_check_chunked /-- Subtree splitting on `- length[0] + length[6] - length[8]` in the row-03 length cone, with leaves selecting cells 28, 29, 30 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5993,6 +6927,18 @@ def treePart73 : CompactCellTree := (.absurd 342)))) (.absurd 586) +private theorem treePart73_check_chunked : + treePart73.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, + -1]]) ++ [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, + 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, + 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, + -1])]) = true := by + decide +kernel + theorem treePart73_check : treePart73.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation @@ -6003,13 +6949,25 @@ theorem treePart73_check : (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart73_check_chunked /-- Contradiction leaf using Farkas receipt 447 to exclude the accumulated affine constraints in this row-03 branch. -/ def treePart74 : CompactCellTree := .absurd 447 +private theorem treePart74_check_chunked : + treePart74.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, + -1]]) ++ [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, + 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, + 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) = + true := by + decide +kernel + theorem treePart74_check : treePart74.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -6018,7 +6976,9 @@ theorem treePart74_check : 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart74_check_chunked /-- Subtree splitting on `- length[6] + length[8]` in the row-03 length cone, with leaves selecting cells 3, 4, 10, 64 and Farkas receipts excluding inconsistent sign branches. -/ @@ -6048,6 +7008,15 @@ def treePart75 : CompactCellTree := (.absurd 459))) (.absurd 594))) +private theorem treePart75_check_chunked : + treePart75.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, + -1]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, + 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) = + true := by + decide +kernel + theorem treePart75_check : treePart75.check splitForms farkasReceipts cells ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -6055,7 +7024,9 @@ theorem treePart75_check : -1]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart75_check_chunked /-- Leaf selecting row-03 cell 65, with 19 Farkas receipts deriving its cone inequalities from the active branch constraints. -/ @@ -6063,6 +7034,16 @@ def treePart76 : CompactCellTree := .cell 65 [546, 547, 548, 549, 550, 551, 552, 553, 554, 555, 556, 557, 558, 595, 563, 596, 582, 564, 565] +private theorem treePart76_check_chunked : + treePart76.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, + -1]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, + 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, 0, + 0, 0, 0, 0, -1])]) ++ [aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart76_check : treePart76.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -6071,7 +7052,9 @@ theorem treePart76_check : 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart76_check_chunked /-- Subtree splitting on `length[2] - length[7]` in the row-03 length cone, with leaves selecting cells 5, 7, 11, 12, 13, 24 and Farkas receipts excluding inconsistent sign branches. -/ @@ -6100,6 +7083,17 @@ def treePart77 : CompactCellTree := (.absurd 598)))) (.absurd 426)) +private theorem treePart77_check_chunked : + treePart77.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, + -1]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, + 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, 0, + 0, 0, 0, 0, -1])]) ++ [aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 1, + 0, 0, 0, -1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart77_check : treePart77.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -6109,7 +7103,9 @@ theorem treePart77_check : 0, 0, 0, 0, -1])]) ++ [aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart77_check_chunked /-- Subtree splitting on `length[2] - length[3]` in the row-03 length cone, with leaves selecting cells 6, 8, 11, 12, 13, 27 and Farkas receipts excluding inconsistent sign branches. -/ @@ -6138,6 +7134,17 @@ def treePart78 : CompactCellTree := (.absurd 598)))) (.absurd 426)) +private theorem treePart78_check_chunked : + treePart78.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, + -1]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, + 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, 0, + 0, 0, 0, 0, -1])]) ++ [aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart78_check : treePart78.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -6147,13 +7154,25 @@ theorem treePart78_check : 0, 0, 0, 0, -1])]) ++ [aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart78_check_chunked /-- Contradiction leaf using Farkas receipt 599 to exclude the accumulated affine constraints in this row-03 branch. -/ def treePart79 : CompactCellTree := .absurd 599 +private theorem treePart79_check_chunked : + treePart79.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, + -1]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, + 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, 0, + 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) + = true := by + decide +kernel + theorem treePart79_check : treePart79.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -6162,13 +7181,24 @@ theorem treePart79_check : 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart79_check_chunked /-- Leaf selecting row-03 cell 63, with 17 Farkas receipts deriving its cone inequalities from the active branch constraints. -/ def treePart80 : CompactCellTree := .cell 63 [430, 431, 432, 433, 434, 435, 436, 437, 438, 439, 440, 441, 446, 444, 445, 442, 443] +private theorem treePart80_check_chunked : + treePart80.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, + -1]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 0, 0, + 0, 0, 1, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart80_check : treePart80.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -6176,7 +7206,9 @@ theorem treePart80_check : -1]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart80_check_chunked /-- Subtree splitting on `length[2] - length[7]` in the row-03 length cone, with leaves selecting cells 14, 15, 18 and Farkas receipts excluding inconsistent sign branches. -/ @@ -6203,6 +7235,16 @@ def treePart81 : CompactCellTree := (.absurd 417))) (.absurd 378)) +private theorem treePart81_check_chunked : + treePart81.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, + -1]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 0, 0, + 0, 0, 1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, + 0, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart81_check : treePart81.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -6211,7 +7253,9 @@ theorem treePart81_check : [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart81_check_chunked /-- Subtree splitting on `length[2] - length[7]` in the row-03 length cone, with leaves selecting cells 21, 22, 25 and Farkas receipts excluding inconsistent sign branches. -/ @@ -6238,6 +7282,17 @@ def treePart82 : CompactCellTree := (.absurd 410))) (.absurd 603)) +private theorem treePart82_check_chunked : + treePart82.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, + -1]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 0, 0, + 0, 0, 1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, + 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart82_check : treePart82.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -6247,7 +7302,9 @@ theorem treePart82_check : 0, 0, 1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart82_check_chunked /-- Subtree splitting on `- length[0] + length[6] - length[8]` in the row-03 length cone, with leaves selecting cells 28, 29, 30 and Farkas receipts excluding inconsistent sign branches. -/ @@ -6278,6 +7335,17 @@ def treePart83 : CompactCellTree := (.absurd 323)))) (.absurd 608) +private theorem treePart83_check_chunked : + treePart83.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, + -1]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 0, 0, + 0, 0, 1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) = true := by + decide +kernel + theorem treePart83_check : treePart83.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -6287,13 +7355,25 @@ theorem treePart83_check : 0, 0, 1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart83_check_chunked /-- Leaf selecting row-03 cell 62, with 17 Farkas receipts deriving its cone inequalities from the active branch constraints. -/ def treePart84 : CompactCellTree := .cell 62 [546, 547, 548, 549, 550, 551, 552, 553, 554, 555, 556, 557, 581, 563, 564, 582, 565] +private theorem treePart84_check_chunked : + treePart84.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, + -1]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 1, 0, 0, + 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart84_check : treePart84.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -6302,7 +7382,9 @@ theorem treePart84_check : [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart84_check_chunked /-- Subtree splitting on `length[3] - length[7]` in the row-03 length cone, with leaves selecting cells 21, 25, 28, 29, 40, 44 and Farkas receipts excluding inconsistent sign branches. -/ @@ -6333,6 +7415,18 @@ def treePart85 : CompactCellTree := (.absurd 612))) (.absurd 610))) +private theorem treePart85_check_chunked : + treePart85.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, + -1]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 1, 0, 0, + 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, + 0])]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 1]]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart85_check : treePart85.check splitForms farkasReceipts cells (((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation @@ -6343,7 +7437,9 @@ theorem treePart85_check : 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart85_check_chunked /-- Subtree splitting on `length[0] - length[11]` in the row-03 length cone, with leaves selecting cells 22, 25, 29, 30, 40, 51 and Farkas receipts excluding inconsistent sign branches. -/ @@ -6376,6 +7472,19 @@ def treePart86 : CompactCellTree := (.absurd 615)) (.absurd 614)))) +private theorem treePart86_check_chunked : + treePart86.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, + -1]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 1, 0, 0, + 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, + 0])]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) = true + := by + decide +kernel + theorem treePart86_check : treePart86.check splitForms farkasReceipts cells (((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation @@ -6387,7 +7496,9 @@ theorem treePart86_check : 0])]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart86_check_chunked /-- Subtree splitting on `length[1] - length[11]` in the row-03 length cone, with leaves selecting cells 14, 15, 18 and Farkas receipts excluding inconsistent sign branches. -/ @@ -6412,6 +7523,18 @@ def treePart87 : CompactCellTree := (.absurd 451)) (.absurd 264) +private theorem treePart87_check_chunked : + treePart87.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, + -1]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 1, 0, 0, + 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, + 0])]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, + -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1])]) = true := by + decide +kernel + theorem treePart87_check : treePart87.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation @@ -6422,7 +7545,9 @@ theorem treePart87_check : 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart87_check_chunked /-- Subtree splitting on `length[1] - length[11]` in the row-03 length cone, with leaves selecting cells 14, 15, 18 and Farkas receipts excluding inconsistent sign branches. -/ @@ -6449,6 +7574,17 @@ def treePart88 : CompactCellTree := (.absurd 583)) (.absurd 616) +private theorem treePart88_check_chunked : + treePart88.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, + -1]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 1, 0, 0, + 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart88_check : treePart88.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -6458,13 +7594,25 @@ theorem treePart88_check : [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart88_check_chunked /-- Contradiction leaf using Farkas receipt 617 to exclude the accumulated affine constraints in this row-03 branch. -/ def treePart89 : CompactCellTree := .absurd 617 +private theorem treePart89_check_chunked : + treePart89.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, + -1]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart89_check : treePart89.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -6473,7 +7621,9 @@ theorem treePart89_check : [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart89_check_chunked /-- Subtree splitting on `length[0] - length[5]` in the row-03 length cone, with leaves selecting cells 62, 63, 66 and Farkas receipts excluding inconsistent sign branches. -/ @@ -6494,12 +7644,21 @@ def treePart90 : CompactCellTree := 442, 443]) (.absurd 617))) +private theorem treePart90_check_chunked : + treePart90.checkLookup splitForms farkasReceiptLookup cells + ((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, + 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, + 0, -1, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart90_check : treePart90.check splitForms farkasReceipts cells ((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart90_check_chunked /-- Subtree splitting on `length[3] - length[7]` in the row-03 length cone, with leaves selecting cells 33, 34, 37, 38 and Farkas receipts excluding inconsistent sign branches. -/ @@ -6528,6 +7687,15 @@ def treePart91 : CompactCellTree := (.absurd 378)) (.absurd 621)) +private theorem treePart91_check_chunked : + treePart91.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 1, 0, -1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, + 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, + 1, 0, 0, 0]]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart91_check : treePart91.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -6535,7 +7703,9 @@ theorem treePart91_check : 0, 1, 0, -1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart91_check_chunked /-- Subtree splitting on `length[1] - length[6] + length[8]` in the row-03 length cone, with leaves selecting cells 7, 8, 32, 36, 42, 43 and Farkas receipts excluding inconsistent sign @@ -6571,6 +7741,16 @@ def treePart92 : CompactCellTree := (.absurd 626)) (.absurd 603))) +private theorem treePart92_check_chunked : + treePart92.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 1, 0, -1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, + 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, + 1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart92_check : treePart92.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -6579,7 +7759,9 @@ theorem treePart92_check : 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart92_check_chunked /-- Subtree splitting on `length[3] - length[7]` in the row-03 length cone, with leaves selecting cells 32, 33, 36, 37 and Farkas receipts excluding inconsistent sign branches. -/ @@ -6602,6 +7784,16 @@ def treePart93 : CompactCellTree := (.absurd 103))) (.absurd 627)) +private theorem treePart93_check_chunked : + treePart93.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 1, 0, -1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, + 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, + 1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart93_check : treePart93.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -6610,7 +7802,9 @@ theorem treePart93_check : 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart93_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 7, 24, 39, 42 and Farkas receipts excluding inconsistent sign branches. -/ @@ -6635,6 +7829,16 @@ def treePart94 : CompactCellTree := (.absurd 630)) (.absurd 351)) +private theorem treePart94_check_chunked : + treePart94.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 1, 0, -1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, + 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 1, + 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 1, -1, 0, 1, 0, 0, 0]]) ++ + [aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart94_check : treePart94.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -6643,7 +7847,9 @@ theorem treePart94_check : 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 1, -1, 0, 1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart94_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 8, 41, 43 and Farkas receipts excluding inconsistent sign branches. -/ @@ -6671,6 +7877,16 @@ def treePart95 : CompactCellTree := (.absurd 630)) (.absurd 351)) +private theorem treePart95_check_chunked : + treePart95.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 1, 0, -1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, + 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 1, + 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 1, -1, 0, 1, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart95_check : treePart95.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -6679,7 +7895,9 @@ theorem treePart95_check : 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 1, -1, 0, 1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart95_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 7, 8, 28, 29, 42, 43 and Farkas receipts excluding inconsistent sign branches. -/ @@ -6722,6 +7940,16 @@ def treePart96 : CompactCellTree := (.absurd 643)) (.absurd 644)) +private theorem treePart96_check_chunked : + treePart96.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 1, 0, -1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, + 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 1, + 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 1, -1, + 0, 1, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart96_check : treePart96.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -6730,7 +7958,9 @@ theorem treePart96_check : 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 1, -1, 0, 1, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart96_check_chunked /-- Subtree splitting on `- length[2] + length[3]` in the row-03 length cone, with leaves selecting cells 36, 37, 48, 49 and Farkas receipts excluding inconsistent sign branches. -/ @@ -6759,6 +7989,16 @@ def treePart97 : CompactCellTree := (.absurd 357)) (.absurd 60))) +private theorem treePart97_check_chunked : + treePart97.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 1, 0, -1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, + 1, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) ++ [aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) = true + := by + decide +kernel + theorem treePart97_check : treePart97.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -6767,7 +8007,9 @@ theorem treePart97_check : 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 1, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) ++ [aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart97_check_chunked /-- Subtree splitting on `length[0] - length[6] + length[8]` in the row-03 length cone, with leaves selecting cells 29, 30, 38, 40, 41, 50, 51, 52 and Farkas receipts excluding inconsistent @@ -6809,6 +8051,16 @@ def treePart98 : CompactCellTree := (.absurd 626)) (.absurd 603))) +private theorem treePart98_check_chunked : + treePart98.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 1, 0, -1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, + 1, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0])]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart98_check : treePart98.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -6817,7 +8069,9 @@ theorem treePart98_check : 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 1, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart98_check_chunked /-- Subtree splitting on `- length[2] + length[3]` in the row-03 length cone, with leaves selecting cells 37, 38, 49, 50 and Farkas receipts excluding inconsistent sign branches. -/ @@ -6842,6 +8096,17 @@ def treePart99 : CompactCellTree := (.absurd 150)) (.absurd 472))) +private theorem treePart99_check_chunked : + treePart99.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 1, 0, -1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, + 1, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) = + true := by + decide +kernel + theorem treePart99_check : treePart99.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -6851,7 +8116,9 @@ theorem treePart99_check : 1, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart99_check_chunked /-- Subtree splitting on `- length[2] + length[3]` in the row-03 length cone, with leaves selecting cells 8, 13, 43, 53 and Farkas receipts excluding inconsistent sign branches. -/ @@ -6878,6 +8145,16 @@ def treePart100 : CompactCellTree := (.absurd 378)) (.absurd 649)) +private theorem treePart100_check_chunked : + treePart100.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 1, 0, -1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart100_check : treePart100.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -6886,7 +8163,9 @@ theorem treePart100_check : 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart100_check_chunked /-- Subtree splitting on `- length[0] + length[6] - length[8]` in the row-03 length cone, with leaves selecting cells 29, 30, 41, 51, 52, 54 and Farkas receipts excluding inconsistent sign @@ -6926,6 +8205,16 @@ def treePart101 : CompactCellTree := (.absurd 653)) (.absurd 654) +private theorem treePart101_check_chunked : + treePart101.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 1, 0, -1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart101_check : treePart101.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -6934,7 +8223,9 @@ theorem treePart101_check : 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, 0, -1, 0, 1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart101_check_chunked /-- Subtree splitting on `length[1] - length[5]` in the row-03 length cone, with leaves selecting cells 67, 68 and Farkas receipts excluding inconsistent sign branches. -/ @@ -6947,13 +8238,23 @@ def treePart102 : CompactCellTree := 661, 446, 662, 442, 663, 664]) (.absurd 599)) +private theorem treePart102_check_chunked : + treePart102.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) + ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, + 0, -1]]) = true := by + decide +kernel + theorem treePart102_check : treePart102.check splitForms farkasReceipts cells (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart102_check_chunked /-- Subtree splitting on `length[3] - length[11]` in the row-03 length cone, with leaves selecting cells 69, 70, 71 and Farkas receipts excluding inconsistent sign branches. -/ @@ -6979,6 +8280,15 @@ def treePart103 : CompactCellTree := (.absurd 673)) (.absurd 574))) +private theorem treePart103_check_chunked : + treePart103.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) + ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, + 1, 0, 0, 0, -1, 0, 0, 0, -1])]) ++ [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) = true := + by + decide +kernel + theorem treePart103_check : treePart103.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff @@ -6986,7 +8296,9 @@ theorem treePart103_check : ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, -1])]) ++ [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart103_check_chunked /-- Subtree splitting on `length[3] - length[11]` in the row-03 length cone, with leaves selecting cells 72, 73, 74 and Farkas receipts excluding inconsistent sign branches. -/ @@ -7012,6 +8324,15 @@ def treePart104 : CompactCellTree := (.absurd 574)) (.absurd 684)) +private theorem treePart104_check_chunked : + treePart104.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) + ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, + 1, 0, 0, 0, -1, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, + 0, 0, 0])]) = true := by + decide +kernel + theorem treePart104_check : treePart104.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff @@ -7019,7 +8340,9 @@ theorem treePart104_check : ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart104_check_chunked /-- Subtree splitting on `length[1] - length[5]` in the row-03 length cone, with leaves selecting cells 75, 76 and Farkas receipts excluding inconsistent sign branches. -/ @@ -7036,6 +8359,15 @@ def treePart105 : CompactCellTree := (.absurd 594)) (.absurd 692)) +private theorem treePart105_check_chunked : + treePart105.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) + ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, + 1, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := + by + decide +kernel + theorem treePart105_check : treePart105.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff @@ -7043,7 +8375,9 @@ theorem treePart105_check : ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart105_check_chunked /-- Subtree splitting on `length[3] - length[11]` in the row-03 length cone, with leaves selecting cells 69, 70, 71, 72, 73, 74 and Farkas receipts excluding inconsistent sign branches. -/ @@ -7084,6 +8418,15 @@ def treePart106 : CompactCellTree := (.absurd 673)) (.absurd 695))) +private theorem treePart106_check_chunked : + treePart106.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) + ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, + 1, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, + 0, 0, 0])]) = true := by + decide +kernel + theorem treePart106_check : treePart106.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff @@ -7091,7 +8434,9 @@ theorem treePart106_check : ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart106_check_chunked /-- Subtree splitting on `- length[2] + length[3]` in the row-03 length cone, with leaves selecting cells 70, 71, 77, 78, 79 and Farkas receipts excluding inconsistent sign branches. -/ @@ -7126,6 +8471,15 @@ def treePart107 : CompactCellTree := (.absurd 352))) (.absurd 707))) +private theorem treePart107_check_chunked : + treePart107.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) + ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 1, 0, 0, + 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart107_check : treePart107.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff @@ -7133,7 +8487,9 @@ theorem treePart107_check : ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart107_check_chunked /-- Subtree splitting on `- length[2] + length[3]` in the row-03 length cone, with leaves selecting cells 70, 71, 79, 80 and Farkas receipts excluding inconsistent sign branches. -/ @@ -7160,6 +8516,16 @@ def treePart108 : CompactCellTree := (.absurd 378)) (.absurd 715)) +private theorem treePart108_check_chunked : + treePart108.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) + ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 1, 0, 0, + 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, + -1])]) = true := by + decide +kernel + theorem treePart108_check : treePart108.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff @@ -7168,7 +8534,9 @@ theorem treePart108_check : [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart108_check_chunked /-- Subtree splitting on `- length[2] + length[3]` in the row-03 length cone, with leaves selecting cells 73, 74, 81, 82 and Farkas receipts excluding inconsistent sign branches. -/ @@ -7197,6 +8565,16 @@ def treePart109 : CompactCellTree := (.absurd 707)) (.absurd 649)) +private theorem treePart109_check_chunked : + treePart109.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) + ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, 0, + 0, 0, 0, 1, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart109_check : treePart109.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff @@ -7205,7 +8583,9 @@ theorem treePart109_check : [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart109_check_chunked /-- Subtree splitting on `length[0] - length[1]` in the row-03 length cone, with leaves selecting cells 73, 74, 82, 83 and Farkas receipts excluding inconsistent sign branches. -/ @@ -7234,6 +8614,16 @@ def treePart110 : CompactCellTree := (.absurd 728))) (.absurd 684) +private theorem treePart110_check_chunked : + treePart110.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) + ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, -1])]) = true := by + decide +kernel + theorem treePart110_check : treePart110.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff @@ -7242,7 +8632,9 @@ theorem treePart110_check : [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart110_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 68, 84 and Farkas receipts excluding inconsistent sign branches. -/ @@ -7255,13 +8647,23 @@ def treePart111 : CompactCellTree := 661, 446, 662, 442, 663, 664]) (.absurd 599)) +private theorem treePart111_check_chunked : + treePart111.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, + -1, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, + 0, 1, 0, 0, 0, -1, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart111_check : treePart111.check splitForms farkasReceipts cells (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart111_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 72, 73, 74, 85, 86, 87 and Farkas receipts excluding inconsistent sign branches. -/ @@ -7300,13 +8702,23 @@ def treePart112 : CompactCellTree := (.absurd 668)) (.absurd 599)) +private theorem treePart112_check_chunked : + treePart112.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, + -1, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, -1]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, -1])]) = true := by + decide +kernel + theorem treePart112_check : treePart112.check splitForms farkasReceipts cells (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 0, -1, 0, 0, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart112_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 76, 88 and Farkas receipts excluding inconsistent sign branches. -/ @@ -7323,6 +8735,15 @@ def treePart113 : CompactCellTree := (.absurd 594)) (.absurd 692)) +private theorem treePart113_check_chunked : + treePart113.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, + -1, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, + -1])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, -1, 1, 0, 0, 0, 0, + 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart113_check : treePart113.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff @@ -7330,7 +8751,9 @@ theorem treePart113_check : -1, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart113_check_chunked /-- Subtree splitting on `length[3] - length[11]` in the row-03 length cone, with leaves selecting cells 72, 73, 74, 85, 86, 87 and Farkas receipts excluding inconsistent sign branches. -/ @@ -7371,6 +8794,15 @@ def treePart114 : CompactCellTree := (.absurd 673)) (.absurd 695))) +private theorem treePart114_check_chunked : + treePart114.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, + -1, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, + -1])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, + 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart114_check : treePart114.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff @@ -7378,7 +8810,9 @@ theorem treePart114_check : -1, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart114_check_chunked /-- Subtree splitting on `- length[2] + length[3]` in the row-03 length cone, with leaves selecting cells 86, 87, 89, 90 and Farkas receipts excluding inconsistent sign branches. -/ @@ -7403,6 +8837,16 @@ def treePart115 : CompactCellTree := (.absurd 378)) (.absurd 715)) +private theorem treePart115_check_chunked : + treePart115.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, + -1, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, + -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, + -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, -1]]) = + true := by + decide +kernel + theorem treePart115_check : treePart115.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff @@ -7411,7 +8855,9 @@ theorem treePart115_check : -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart115_check_chunked /-- Subtree splitting on `- length[2] + length[3]` in the row-03 length cone, with leaves selecting cells 86, 87, 90, 91 and Farkas receipts excluding inconsistent sign branches. -/ @@ -7438,6 +8884,16 @@ def treePart116 : CompactCellTree := (.absurd 378)) (.absurd 715)) +private theorem treePart116_check_chunked : + treePart116.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, + -1, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, + -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, + -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, + 1, 0, 0, 0, -1])]) = true := by + decide +kernel + theorem treePart116_check : treePart116.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff @@ -7446,7 +8902,9 @@ theorem treePart116_check : -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart116_check_chunked /-- Subtree splitting on `- length[2] + length[3]` in the row-03 length cone, with leaves selecting cells 73, 74, 81, 82, 83 and Farkas receipts excluding inconsistent sign branches. -/ @@ -7484,6 +8942,15 @@ def treePart117 : CompactCellTree := (.absurd 733)) (.absurd 684)) +private theorem treePart117_check_chunked : + treePart117.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, + -1, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, + -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart117_check : treePart117.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff @@ -7491,7 +8958,9 @@ theorem treePart117_check : -1, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart117_check_chunked /-- Subtree splitting on `length[1] - length[5]` in the row-03 length cone, with leaves selecting cells 92, 93 and Farkas receipts excluding inconsistent sign branches. -/ @@ -7504,13 +8973,23 @@ def treePart118 : CompactCellTree := 735, 446, 442, 663, 664]) (.absurd 599)) +private theorem treePart118_check_chunked : + treePart118.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, + 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 1, -1, -1, 0, 0, 0]]) ++ [aff [0, + 0, 0, 0, 1, 0, 0, 1, -1, -1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart118_check : treePart118.check splitForms farkasReceipts cells (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 1, -1, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 1, 0, 0, 1, -1, -1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart118_check_chunked /-- Subtree splitting on `length[1] - length[5]` in the row-03 length cone, with leaves selecting cells 94, 95 and Farkas receipts excluding inconsistent sign branches. -/ @@ -7527,6 +9006,15 @@ def treePart119 : CompactCellTree := (.absurd 574)) (.absurd 692)) +private theorem treePart119_check_chunked : + treePart119.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, + 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 1, -1, -1, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 1, -1, -1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, + 1, 0, 0, 1, 0, -1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart119_check : treePart119.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ @@ -7534,7 +9022,9 @@ theorem treePart119_check : 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 1, -1, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 1, -1, -1, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 1, 0, 0, 1, 0, -1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart119_check_chunked /-- Subtree splitting on `length[3] + length[6] + length[7] - length[8]` in the row-03 length cone, with leaves selecting cells 71, 74, 78, 96 and Farkas receipts excluding inconsistent sign @@ -7576,6 +9066,15 @@ def treePart120 : CompactCellTree := (.absurd 449)) (.absurd 695))) +private theorem treePart120_check_chunked : + treePart120.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, + 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 1, -1, -1, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 1, -1, -1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 1, 0, -1, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart120_check : treePart120.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ @@ -7583,7 +9082,9 @@ theorem treePart120_check : 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 1, -1, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 1, -1, -1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 1, 0, -1, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart120_check_chunked /-- Subtree splitting on `length[1] - length[5]` in the row-03 length cone, with leaves selecting cells 97, 98 and Farkas receipts excluding inconsistent sign branches. -/ @@ -7600,6 +9101,15 @@ def treePart121 : CompactCellTree := (.absurd 594)) (.absurd 692)) +private theorem treePart121_check_chunked : + treePart121.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, + 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, -1, -1, + 0, 0, 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, -1, 1, 0, 0, + 0, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart121_check : treePart121.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ @@ -7607,7 +9117,9 @@ theorem treePart121_check : 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, -1, -1, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart121_check_chunked /-- Subtree splitting on `length[3] + length[6] - length[8]` in the row-03 length cone, with leaves selecting cells 71, 74, 78, 82, 94, 95, 96 and Farkas receipts excluding inconsistent @@ -7652,6 +9164,15 @@ def treePart122 : CompactCellTree := (.absurd 673)) (.absurd 695))) +private theorem treePart122_check_chunked : + treePart122.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, + 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, -1, -1, + 0, 0, 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart122_check : treePart122.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ @@ -7659,7 +9180,9 @@ theorem treePart122_check : 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, -1, -1, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart122_check_chunked /-- Subtree splitting on `- length[2] + length[3]` in the row-03 length cone, with leaves selecting cells 71, 78, 79, 99 and Farkas receipts excluding inconsistent sign branches. -/ @@ -7684,6 +9207,16 @@ def treePart123 : CompactCellTree := (.absurd 707)) (.absurd 744)) +private theorem treePart123_check_chunked : + treePart123.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, + 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, -1, -1, + 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff + [0, 0, 0, 1, 0, 0, 0, 1, 1, -1, 0, 0, 0]]) ++ [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) + = true := by + decide +kernel + theorem treePart123_check : treePart123.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ @@ -7692,7 +9225,9 @@ theorem treePart123_check : 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 1, 1, -1, 0, 0, 0]]) ++ [aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart123_check_chunked /-- Subtree splitting on `- length[2] + length[3]` in the row-03 length cone, with leaves selecting cells 74, 82, 96, 100 and Farkas receipts excluding inconsistent sign branches. -/ @@ -7728,6 +9263,16 @@ def treePart124 : CompactCellTree := (.absurd 357)) (.absurd 749))) +private theorem treePart124_check_chunked : + treePart124.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, + 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, -1, -1, + 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff + [0, 0, 0, 1, 0, 0, 0, 1, 1, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, + -1, 0, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart124_check : treePart124.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ @@ -7736,7 +9281,9 @@ theorem treePart124_check : 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 1, 1, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 1, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart124_check_chunked /-- Subtree splitting on `length[1] - length[5]` in the row-03 length cone, with leaves selecting cells 80, 83 and Farkas receipts excluding inconsistent sign branches. -/ @@ -7757,6 +9304,16 @@ def treePart125 : CompactCellTree := (.absurd 716)) (.absurd 695)) +private theorem treePart125_check_chunked : + treePart125.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, + 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, -1, -1, + 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, 1, -1, 0, 0, 0])]) ++ [aff [0, 0, 0, -1, + 1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart125_check : treePart125.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ @@ -7765,7 +9322,9 @@ theorem treePart125_check : 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, 1, -1, 0, 0, 0])]) ++ [aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart125_check_chunked /-- Subtree splitting on `length[1] - length[5]` in the row-03 length cone, with leaves selecting cells 71, 74, 78, 79, 82, 96 and Farkas receipts excluding inconsistent sign branches. -/ @@ -7802,6 +9361,16 @@ def treePart126 : CompactCellTree := (.absurd 324)) (.absurd 695)) +private theorem treePart126_check_chunked : + treePart126.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1])]) ++ [aff [0, 1, 0, 0, + 0, 0, -1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, -1, -1, + 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, 1, -1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart126_check : treePart126.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ @@ -7810,7 +9379,9 @@ theorem treePart126_check : 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, 1, -1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart126_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 93, 101 and Farkas receipts excluding inconsistent sign branches. -/ @@ -7823,13 +9394,23 @@ def treePart127 : CompactCellTree := 735, 587, 442, 664, 663]) (.absurd 599)) +private theorem treePart127_check_chunked : + treePart127.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 1, + 0, 0, 1, -1, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 1, -1, -1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart127_check : treePart127.check splitForms farkasReceipts cells (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 1, 0, 0, 1, -1, -1, 0, 0, 0]]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 1, -1, -1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart127_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 98, 102 and Farkas receipts excluding inconsistent sign branches. -/ @@ -7846,6 +9427,15 @@ def treePart128 : CompactCellTree := (.absurd 574)) (.absurd 692)) +private theorem treePart128_check_chunked : + treePart128.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 1, + 0, 0, 1, -1, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, -1, -1, 0, + 0, 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart128_check : treePart128.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ @@ -7853,7 +9443,9 @@ theorem treePart128_check : [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 1, 0, 0, 1, -1, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, -1, -1, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, 0, 0, 0, 1, 0, -1, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart128_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 83, 91, 100, 103, 104 and Farkas receipts excluding inconsistent sign branches. -/ @@ -7889,6 +9481,16 @@ def treePart129 : CompactCellTree := (.absurd 574)) (.absurd 692)) +private theorem treePart129_check_chunked : + treePart129.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 1, + 0, 0, 1, -1, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, -1, -1, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) = true := + by + decide +kernel + theorem treePart129_check : treePart129.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ @@ -7897,7 +9499,9 @@ theorem treePart129_check : 0, 0, 1, -1, -1, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, -1, -1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart129_check_chunked /-- Subtree splitting on `- length[3] - length[6] - length[7] + length[8]` in the row-03 length cone, with leaves selecting cells 74, 87, 95, 96, 105, 106 and Farkas receipts excluding @@ -7931,6 +9535,15 @@ def treePart130 : CompactCellTree := (.absurd 357)) (.absurd 783)))) +private theorem treePart130_check_chunked : + treePart130.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 1, -1, -1, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, + -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, -1, 0, 0, 0, -1, 0, 0, 0, 1]]) = true := by + decide +kernel + theorem treePart130_check : treePart130.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ @@ -7938,7 +9551,9 @@ theorem treePart130_check : [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 1, -1, -1, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, -1, 0, 0, 0, -1, 0, 0, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart130_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 82, 90, 95, 96, 105, 106 and Farkas receipts excluding inconsistent sign @@ -7978,6 +9593,16 @@ def treePart131 : CompactCellTree := (.absurd 786)) (.absurd 745))) +private theorem treePart131_check_chunked : + treePart131.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 1, -1, -1, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, + -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, -1, 0, 0, 0, -1, 0, + 0, 0, 1])]) = true := by + decide +kernel + theorem treePart131_check : treePart131.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ @@ -7986,7 +9611,9 @@ theorem treePart131_check : [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 1, -1, -1, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, -1, 0, 0, 0, -1, 0, 0, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart131_check_chunked /-- Subtree splitting on `- length[0] + length[1]` in the row-03 length cone, with leaves selecting cells 83, 91, 98, 100, 102, 103 and Farkas receipts excluding inconsistent sign @@ -8023,6 +9650,16 @@ def treePart132 : CompactCellTree := (.absurd 376)))) (.absurd 692)) +private theorem treePart132_check_chunked : + treePart132.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 1, -1, -1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, -1, + 0, 0, 0, 0, -1, 0, 0, 0, 1]]) = true := by + decide +kernel + theorem treePart132_check : treePart132.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ @@ -8031,7 +9668,9 @@ theorem treePart132_check : [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 1, -1, -1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, -1, 0, 0, 0, 0, -1, 0, 0, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart132_check_chunked /-- Subtree splitting on `length[2] + length[6] - length[8]` in the row-03 length cone, with leaves selecting cells 98, 100, 102, 103, 104, 107 and Farkas receipts excluding inconsistent @@ -8075,6 +9714,16 @@ def treePart133 : CompactCellTree := (.absurd 673)) (.absurd 695))) +private theorem treePart133_check_chunked : + treePart133.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, -1, 0, 1, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 1, -1, -1, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, -1, 0, 0, 0, 0, -1, 0, 0, 0, 1])]) = true := by + decide +kernel + theorem treePart133_check : treePart133.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, 0, -1, 0, 0, 0])]) ++ @@ -8083,7 +9732,9 @@ theorem treePart133_check : [AffineForm.violation (aff [0, 0, 0, 0, 1, 0, 0, 1, -1, -1, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, -1, 0, 0, 0, 0, -1, 0, 0, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart133_check_chunked /-- A branch of the final row-03 cover assembly, starting at split form 2 and combining the previously verified decision subtrees. -/ diff --git a/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow04CoverReceipts.lean b/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow04CoverReceipts.lean index 77faf9404c..dca2cde0ed 100644 --- a/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow04CoverReceipts.lean +++ b/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow04CoverReceipts.lean @@ -6,6 +6,7 @@ Authors: Nathan Pflueger module public import LeanPool.BrillNoetherGraphs.Utilities.Subdivision.AffineCover +public import LeanPool.BrillNoetherGraphs.Utilities.Foundations.ChunkedLookup /-! # Sparse Farkas receipts for the row-04 closed cover @@ -3313,4 +3314,39 @@ def farkasReceipts : List Certificate.AffineCover.FarkasData := farkasReceipts5 ++ farkasReceipts6 ++ farkasReceipts7 ++ farkasReceipts8 ++ farkasReceipts9 ++ farkasReceipts10 ++ farkasReceipts11 +/-- Existing receipt blocks with their checked sizes, avoiding repeated prefix traversal. -/ +def farkasReceiptChunks : List (ℕ × List Certificate.AffineCover.FarkasData) := + [(128, farkasReceipts0), + (128, farkasReceipts1), + (128, farkasReceipts2), + (128, farkasReceipts3), + (128, farkasReceipts4), + (128, farkasReceipts5), + (128, farkasReceipts6), + (128, farkasReceipts7), + (128, farkasReceipts8), + (128, farkasReceipts9), + (128, farkasReceipts10), + (90, farkasReceipts11)] + +private theorem farkasReceiptChunks_sizes : + ∀ chunk ∈ farkasReceiptChunks, chunk.1 = chunk.2.length := by + intro chunk hMem + simp only [farkasReceiptChunks, List.mem_cons, List.not_mem_nil, or_false] at hMem + rcases hMem with rfl | rfl | rfl | rfl | rfl | rfl | rfl | rfl | rfl | rfl | rfl | rfl <;> rfl + +/-- Block lookup keeps the original table, order, and out-of-range default. -/ +def farkasReceiptLookup (index : ℕ) : Certificate.AffineCover.FarkasData := + List.lookupChunks farkasReceiptChunks index { terms := [] } + +theorem farkasReceiptLookup_eq_getD (index : ℕ) : + farkasReceiptLookup index = farkasReceipts.getD index { terms := [] } := by + have hTable : farkasReceiptChunks.flatMap Prod.snd = farkasReceipts := by + simp only [farkasReceiptChunks, List.flatMap_cons, List.flatMap_nil, List.append_nil, + List.append_assoc, farkasReceipts] + have hLookup := List.lookupChunks_eq_getD_flatMap farkasReceiptChunks + farkasReceiptChunks_sizes index { terms := [] } + rw [hTable] at hLookup + exact hLookup + end AtanasovRanganathan.GenusFiveRow04FixedCover diff --git a/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow04FixedCover.lean b/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow04FixedCover.lean index d6dcdd9cf1..ef8517a4d1 100644 --- a/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow04FixedCover.lean +++ b/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow04FixedCover.lean @@ -11,6 +11,7 @@ public import LeanPool.BrillNoetherGraphs.LowGenus.GenusFiveRow04CoverCells0 public import LeanPool.BrillNoetherGraphs.LowGenus.GenusFiveRow04CoverCells1 public import LeanPool.BrillNoetherGraphs.LowGenus.GenusFiveRow04Symmetry public import LeanPool.BrillNoetherGraphs.LowGenus.GenusFiveRow04CoverReceipts +import LeanPool.BrillNoetherGraphs.LowGenus.CompactCellTreeLookup /-! **Independent generated check.** This module provides an additional generated proof of row 04 and is not imported by the main `LowGenus` root. @@ -174,11 +175,19 @@ def treePart0 : CompactCellTree := 86, 87, 88, 89, 90]) (.absurd 91)))) +private theorem treePart0_check_chunked : + treePart0.checkLookup splitForms farkasReceiptLookup cells + ((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, + 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart0_check : treePart0.check splitForms farkasReceipts cells ((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart0_check_chunked /-- Subtree splitting on `length[0] - length[3] - length[5] + length[11]` in the row-04 symmetry chamber, with leaves selecting cells 4, 5, 6 and Farkas receipts excluding inconsistent sign @@ -195,12 +204,21 @@ def treePart1 : CompactCellTree := 116, 117, 118, 119, 120, 121, 122, 123]) (.absurd 124))) +private theorem treePart1_check_chunked : + treePart1.checkLookup splitForms farkasReceiptLookup cells + ((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, + -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) + ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by + decide +kernel + theorem treePart1_check : treePart1.check splitForms farkasReceipts cells ((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart1_check_chunked /-- Subtree splitting on `length[0] - length[3] - length[5] + length[11]` in the row-04 symmetry chamber, with leaves selecting cells 7, 8, 9, 10, 11, 12, 13, 14, 15 and Farkas receipts @@ -241,18 +259,36 @@ def treePart2 : CompactCellTree := (.absurd 214)))) (.absurd 124))) +private theorem treePart2_check_chunked : + treePart2.checkLookup splitForms farkasReceiptLookup cells + ((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, + -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) + ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) = true := by + decide +kernel + theorem treePart2_check : treePart2.check splitForms farkasReceipts cells ((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart2_check_chunked /-- Contradiction leaf using Farkas receipt 215 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart3 : CompactCellTree := .absurd 215 +private theorem treePart3_check_chunked : + treePart3.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff + [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, + 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, + 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) ++ [aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = + true := by + decide +kernel + theorem treePart3_check : treePart3.check splitForms farkasReceipts cells ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff @@ -260,7 +296,9 @@ theorem treePart3_check : 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) ++ [aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart3_check_chunked /-- Subtree splitting on `- length[1] - length[2] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 0, 16, 17, 18, 19, 20, 21, 22 and Farkas receipts @@ -296,6 +334,15 @@ def treePart4 : CompactCellTree := (.absurd 322))) (.absurd 323)))))) +private theorem treePart4_check_chunked : + treePart4.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff + [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, + 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, + 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, + 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart4_check : treePart4.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff @@ -303,7 +350,9 @@ theorem treePart4_check : 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart4_check_chunked /-- Subtree splitting on `- length[0] + length[3] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 0, 16, 19, 23, 24 and Farkas receipts excluding @@ -326,6 +375,16 @@ def treePart5 : CompactCellTree := 335, 273, 261, 262, 263, 264, 334, 265, 267, 268])) (.absurd 336)))) +private theorem treePart5_check_chunked : + treePart5.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff + [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, + 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, + 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, + 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) + = true := by + decide +kernel + theorem treePart5_check : treePart5.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff @@ -334,13 +393,24 @@ theorem treePart5_check : 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart5_check_chunked /-- Contradiction leaf using Farkas receipt 215 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart6 : CompactCellTree := .absurd 215 +private theorem treePart6_check_chunked : + treePart6.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff + [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, + 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 0, -1, 0, + 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart6_check : treePart6.check splitForms farkasReceipts cells ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff @@ -348,7 +418,9 @@ theorem treePart6_check : 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart6_check_chunked /-- Subtree splitting on `- length[1] - length[2] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 25, 26, 27, 28, 29, 30 and Farkas receipts @@ -382,6 +454,17 @@ def treePart7 : CompactCellTree := (.absurd 385)))) (.absurd 269)))) +private theorem treePart7_check_chunked : + treePart7.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff + [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, + 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := + by + decide +kernel + theorem treePart7_check : treePart7.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff @@ -391,7 +474,9 @@ theorem treePart7_check : [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart7_check_chunked /-- Subtree splitting on `- length[0] + length[3] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 31, 32, 33 and Farkas receipts excluding @@ -419,6 +504,17 @@ def treePart8 : CompactCellTree := (.absurd 420)) (.absurd 421)))) +private theorem treePart8_check_chunked : + treePart8.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff + [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, + 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, + 0, 0, -1])]) = true := by + decide +kernel + theorem treePart8_check : treePart8.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff @@ -428,7 +524,9 @@ theorem treePart8_check : [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart8_check_chunked /-- Subtree splitting on `- length[1] - length[2] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 34, 35, 36, 37, 38, 39 and Farkas receipts @@ -462,6 +560,17 @@ def treePart9 : CompactCellTree := (.absurd 385)))) (.absurd 269)))) +private theorem treePart9_check_chunked : + treePart9.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff + [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, + 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 1, 0, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) = true := by + decide +kernel + theorem treePart9_check : treePart9.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff @@ -471,7 +580,9 @@ theorem treePart9_check : [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart9_check_chunked /-- Subtree splitting on `- length[5] - length[6] + length[9] + length[11]` in the row-04 symmetry chamber, with leaves selecting cells 40, 41, 42 and Farkas receipts excluding @@ -488,6 +599,18 @@ def treePart10 : CompactCellTree := 339, 261, 262, 263, 264, 335, 267, 273]) (.absurd 437))) +private theorem treePart10_check_chunked : + treePart10.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation + (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, + 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 1, 0, 1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) = true := by + decide +kernel + theorem treePart10_check : treePart10.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation @@ -498,7 +621,9 @@ theorem treePart10_check : [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart10_check_chunked /-- Subtree splitting on `- length[1] - length[2] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 43, 44, 45, 46, 47, 48 and Farkas receipts @@ -539,6 +664,18 @@ def treePart11 : CompactCellTree := (.absurd 452))))) (.absurd 481))) +private theorem treePart11_check_chunked : + treePart11.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation + (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, + 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) = true := by + decide +kernel + theorem treePart11_check : treePart11.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation @@ -549,7 +686,9 @@ theorem treePart11_check : [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart11_check_chunked /-- Subtree splitting on `length[5] - length[8] - length[9] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 17, 34, 35, 36 and Farkas receipts excluding inconsistent @@ -569,6 +708,15 @@ def treePart12 : CompactCellTree := 330, 209, 205, 206, 207, 211, 210, 213]) (.absurd 214)))) +private theorem treePart12_check_chunked : + treePart12.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff + [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, + 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, -1, 0, 0, 1, 0, 1, 0, + 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart12_check : treePart12.check splitForms farkasReceipts cells ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff @@ -576,7 +724,9 @@ theorem treePart12_check : 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart12_check_chunked /-- Subtree splitting on `- length[0] + length[2] + length[3] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 18, 23, 31, 32, 33, 37, 38, 39 and Farkas @@ -622,6 +772,15 @@ def treePart13 : CompactCellTree := (.absurd 491)) (.absurd 492))) +private theorem treePart13_check_chunked : + treePart13.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff + [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, + 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, + -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) = true := by + decide +kernel + theorem treePart13_check : treePart13.check splitForms farkasReceipts cells ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff @@ -629,7 +788,9 @@ theorem treePart13_check : 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart13_check_chunked /-- Subtree splitting on `length[5] - length[8] - length[9] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 19, 49, 50, 51, 52 and Farkas receipts excluding @@ -658,6 +819,15 @@ def treePart14 : CompactCellTree := (.absurd 437)))) (.absurd 502))) +private theorem treePart14_check_chunked : + treePart14.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff + [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, + 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff + [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) = true := by + decide +kernel + theorem treePart14_check : treePart14.check splitForms farkasReceipts cells ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff @@ -665,7 +835,9 @@ theorem treePart14_check : 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart14_check_chunked /-- Subtree splitting on `length[5] - length[8] - length[9] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 19, 22, 44, 46, 48 and Farkas receipts excluding @@ -698,6 +870,15 @@ def treePart15 : CompactCellTree := (.absurd 508)) (.absurd 502))) +private theorem treePart15_check_chunked : + treePart15.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff + [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, + 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) = true := by + decide +kernel + theorem treePart15_check : treePart15.check splitForms farkasReceipts cells ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff @@ -705,26 +886,47 @@ theorem treePart15_check : 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart15_check_chunked /-- Leaf selecting row-04 cell 0, with 22 Farkas receipts deriving its cone inequalities from the active branch constraints. -/ def treePart16 : CompactCellTree := .cell 0 [45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 64, 516, 61, 62, 63, 92, 67, 96] +private theorem treePart16_check_chunked : + treePart16.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff + [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, + -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, + -1, -1, 0, -1]]) = true := by + decide +kernel + theorem treePart16_check : treePart16.check splitForms farkasReceipts cells (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart16_check_chunked /-- Contradiction leaf using Farkas receipt 517 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart17 : CompactCellTree := .absurd 517 +private theorem treePart17_check_chunked : + treePart17.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff + [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, + -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, + 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1]]) = + true := by + decide +kernel + theorem treePart17_check : treePart17.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff @@ -732,7 +934,9 @@ theorem treePart17_check : -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart17_check_chunked /-- Subtree splitting on `length[5] - length[8] - length[10] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 0, 53, 54, 55, 56, 57, 58, 59 and Farkas receipts @@ -773,6 +977,15 @@ def treePart18 : CompactCellTree := (.absurd 547)) (.absurd 548))))))) +private theorem treePart18_check_chunked : + treePart18.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff + [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, + -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, + 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, + 0, 0, 0, -1, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1]]) = true := by + decide +kernel + theorem treePart18_check : treePart18.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff @@ -780,7 +993,9 @@ theorem treePart18_check : -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart18_check_chunked /-- Subtree splitting on `length[5] + length[6] - length[9] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 0, 53, 57, 60 and Farkas receipts excluding inconsistent @@ -800,6 +1015,16 @@ def treePart19 : CompactCellTree := 510, 434, 554, 555, 240, 525, 504, 556, 557, 558]) (.absurd 559)))) +private theorem treePart19_check_chunked : + treePart19.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff + [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, + -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, + 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, + 0, 0, 0, -1, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1])]) + = true := by + decide +kernel + theorem treePart19_check : treePart19.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff @@ -808,7 +1033,9 @@ theorem treePart19_check : 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart19_check_chunked /-- Subtree splitting on `length[5] + length[6] + length[8] - length[9] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 0, 57, 60, 61 and Farkas receipts excluding @@ -836,13 +1063,23 @@ def treePart20 : CompactCellTree := 186, 188, 567, 223, 568, 221, 174, 563, 564, 565]) (.absurd 492)))) +private theorem treePart20_check_chunked : + treePart20.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff + [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, + -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [aff [0, 0, + 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) = true := by + decide +kernel + theorem treePart20_check : treePart20.check splitForms farkasReceipts cells (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart20_check_chunked /-- Subtree splitting on `- length[5] - length[6] + length[9] + length[11]` in the row-04 symmetry chamber, with leaves selecting cells 0, 54, 55, 59, 62 and Farkas receipts excluding @@ -874,32 +1111,62 @@ def treePart21 : CompactCellTree := (.absurd 572)) (.absurd 570)))) +private theorem treePart21_check_chunked : + treePart21.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff + [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, + -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) = true := by + decide +kernel + theorem treePart21_check : treePart21.check splitForms farkasReceipts cells (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart21_check_chunked /-- Contradiction leaf using Farkas receipt 573 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart22 : CompactCellTree := .absurd 573 +private theorem treePart22_check_chunked : + treePart22.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff + [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, + 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [aff [0, 0, 0, + 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by + decide +kernel + theorem treePart22_check : treePart22.check splitForms farkasReceipts cells (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart22_check_chunked /-- Contradiction leaf using Farkas receipt 574 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart23 : CompactCellTree := .absurd 574 +private theorem treePart23_check_chunked : + treePart23.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff + [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, + 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 1, 0, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1]]) = true := + by + decide +kernel + theorem treePart23_check : treePart23.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff @@ -908,7 +1175,9 @@ theorem treePart23_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart23_check_chunked /-- Subtree splitting on `length[5] - length[8] - length[10] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 4, 63, 64, 65, 66, 67, 68, 69, 70, 71 and Farkas @@ -959,6 +1228,16 @@ def treePart24 : CompactCellTree := 526, 511, 341, 603, 332, 273, 261, 507, 577, 528, 604, 605]) (.absurd 606))))) +private theorem treePart24_check_chunked : + treePart24.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff + [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, + 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 1, 0, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, + -1, -1])]) = true := by + decide +kernel + theorem treePart24_check : treePart24.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff @@ -967,13 +1246,26 @@ theorem treePart24_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart24_check_chunked /-- Contradiction leaf using Farkas receipt 607 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart25 : CompactCellTree := .absurd 607 +private theorem treePart25_check_chunked : + treePart25.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, + 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 1, 0, 1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1]]) = true := + by + decide +kernel + theorem treePart25_check : treePart25.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -983,7 +1275,9 @@ theorem treePart25_check : [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart25_check_chunked /-- Subtree splitting on `length[5] + length[6] + length[8] - length[9] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 5, 72, 73, 74, 75, 76, 77, 78, 79 and @@ -1035,6 +1329,17 @@ def treePart26 : CompactCellTree := 531, 514, 364, 625, 599, 366, 357, 579, 356, 580, 626, 541]) (.absurd 627))))) +private theorem treePart26_check_chunked : + treePart26.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, + 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 1, 0, 1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, + -1, -1])]) = true := by + decide +kernel + theorem treePart26_check : treePart26.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -1044,13 +1349,26 @@ theorem treePart26_check : [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart26_check_chunked /-- Contradiction leaf using Farkas receipt 628 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart27 : CompactCellTree := .absurd 628 +private theorem treePart27_check_chunked : + treePart27.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, + 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, -1, 0, -1, + 0, 1, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1]]) = true := by + decide +kernel + theorem treePart27_check : treePart27.check splitForms farkasReceipts cells (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -1060,7 +1378,9 @@ theorem treePart27_check : [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, -1, 0, -1, 0, 1, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart27_check_chunked /-- Subtree splitting on `length[5] + length[6] + length[8] - length[9] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 6, 80, 81, 82, 83, 84, 85, 86, 87 and @@ -1112,6 +1432,18 @@ def treePart28 : CompactCellTree := 535, 536, 376, 671, 672, 294, 287, 367, 368, 613, 673, 634]) (.absurd 674))))) +private theorem treePart28_check_chunked : + treePart28.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, + 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, -1, 0, -1, + 0, 1, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, + -1, -1])]) = true := by + decide +kernel + theorem treePart28_check : treePart28.check splitForms farkasReceipts cells (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -1122,13 +1454,26 @@ theorem treePart28_check : [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, -1, 0, -1, 0, 1, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart28_check_chunked /-- Contradiction leaf using Farkas receipt 675 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart29 : CompactCellTree := .absurd 675 +private theorem treePart29_check_chunked : + treePart29.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, + 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 1, 1, 0, 0, 0, 0, 0, -1])]) = true := by + decide +kernel + theorem treePart29_check : treePart29.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -1138,13 +1483,24 @@ theorem treePart29_check : [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 1, 1, 0, 0, 0, 0, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart29_check_chunked /-- Contradiction leaf using Farkas receipt 676 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart30 : CompactCellTree := .absurd 676 +private theorem treePart30_check_chunked : + treePart30.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff + [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, + 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, + 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, + -1, -1, 0, -1]]) = true := by + decide +kernel + theorem treePart30_check : treePart30.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff @@ -1152,7 +1508,9 @@ theorem treePart30_check : 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart30_check_chunked /-- Subtree splitting on `length[5] + length[6] - length[9] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 66, 70, 73, 74, 81, 82 and Farkas receipts excluding @@ -1182,6 +1540,16 @@ def treePart31 : CompactCellTree := (.absurd 681)))) (.absurd 682)) +private theorem treePart31_check_chunked : + treePart31.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff + [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, + 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, + 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, + 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1]]) = + true := by + decide +kernel + theorem treePart31_check : treePart31.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff @@ -1190,7 +1558,9 @@ theorem treePart31_check : 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart31_check_chunked /-- Subtree splitting on `- length[5] - length[6] + length[8] + length[9] + length[11]` in the row-04 symmetry chamber, with leaves selecting cells 69, 78, 86, 88, 89, 90 and Farkas receipts @@ -1228,6 +1598,16 @@ def treePart32 : CompactCellTree := (.absurd 694)) (.absurd 695))) +private theorem treePart32_check_chunked : + treePart32.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff + [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, + 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, + 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, + 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, + -1, 0, 0, 1, 0, 1])]) = true := by + decide +kernel + theorem treePart32_check : treePart32.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff @@ -1236,7 +1616,9 @@ theorem treePart32_check : 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart32_check_chunked /-- Subtree splitting on `length[5] - length[8] - length[9] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 71, 79, 87 and Farkas receipts excluding inconsistent sign @@ -1259,32 +1641,61 @@ def treePart33 : CompactCellTree := (.absurd 677)))) (.absurd 704))) +private theorem treePart33_check_chunked : + treePart33.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff + [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, + 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1])]) = true := by + decide +kernel + theorem treePart33_check : treePart33.check splitForms farkasReceipts cells (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart33_check_chunked /-- Contradiction leaf using Farkas receipt 36 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart34 : CompactCellTree := .absurd 36 +private theorem treePart34_check_chunked : + treePart34.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [aff [0, + -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart34_check : treePart34.check splitForms farkasReceipts cells (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart34_check_chunked /-- Contradiction leaf using Farkas receipt 705 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart35 : CompactCellTree := .absurd 705 +private theorem treePart35_check_chunked : + treePart35.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, + 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by + decide +kernel + theorem treePart35_check : treePart35.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -1292,13 +1703,25 @@ theorem treePart35_check : 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart35_check_chunked /-- Contradiction leaf using Farkas receipt 706 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart36 : CompactCellTree := .absurd 706 +private theorem treePart36_check_chunked : + treePart36.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 0, -1, 0, + 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart36_check : treePart36.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -1307,13 +1730,27 @@ theorem treePart36_check : [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart36_check_chunked /-- Contradiction leaf using Farkas receipt 707 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart37 : CompactCellTree := .absurd 707 +private theorem treePart37_check_chunked : + treePart37.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, + 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := + by + decide +kernel + theorem treePart37_check : treePart37.check splitForms farkasReceipts cells (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -1324,13 +1761,27 @@ theorem treePart37_check : [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart37_check_chunked /-- Contradiction leaf using Farkas receipt 708 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart38 : CompactCellTree := .absurd 708 +private theorem treePart38_check_chunked : + treePart38.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, + 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart38_check : treePart38.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -1341,7 +1792,9 @@ theorem treePart38_check : [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart38_check_chunked /-- Subtree splitting on `length[5] - length[10] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 17, 91, 92, 93, 94, 95, 96, 97, 98, 99 and Farkas receipts excluding @@ -1387,6 +1840,20 @@ def treePart39 : CompactCellTree := 734, 735, 736, 737, 738, 740, 798, 741, 796, 797]))) (.absurd 799))))) +private theorem treePart39_check_chunked : + treePart39.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, + 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, + 0, 1]]) = true := by + decide +kernel + theorem treePart39_check : treePart39.check splitForms farkasReceipts cells ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -1399,13 +1866,30 @@ theorem treePart39_check : 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart39_check_chunked /-- Contradiction leaf using Farkas receipt 800 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart40 : CompactCellTree := .absurd 800 +private theorem treePart40_check_chunked : + treePart40.checkLookup splitForms farkasReceiptLookup cells + (((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) + ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, + 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) = true := + by + decide +kernel + theorem treePart40_check : treePart40.check splitForms farkasReceipts cells (((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) @@ -1419,7 +1903,9 @@ theorem treePart40_check : [aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart40_check_chunked /-- Subtree splitting on `length[5] - length[10] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 20, 100, 101, 102, 103, 104, 105, 106, 107, 108 and Farkas receipts @@ -1465,6 +1951,21 @@ def treePart41 : CompactCellTree := 755, 835, 836, 758, 756, 763, 764, 895, 765, 893, 894]))) (.absurd 896))))) +private theorem treePart41_check_chunked : + treePart41.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) + ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, + 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, + 0, 0, 0, 1])]) ++ [aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) = true := by + decide +kernel + theorem treePart41_check : treePart41.check splitForms farkasReceipts cells ((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) @@ -1478,13 +1979,32 @@ theorem treePart41_check : [aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart41_check_chunked /-- Contradiction leaf using Farkas receipt 897 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart42 : CompactCellTree := .absurd 897 +private theorem treePart42_check_chunked : + treePart42.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, + -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, + 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, + 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, + 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [aff [0, -1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, + -1]]) = true := by + decide +kernel + theorem treePart42_check : treePart42.check splitForms farkasReceipts cells ((((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, @@ -1500,13 +2020,32 @@ theorem treePart42_check : 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, -1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart42_check_chunked /-- Contradiction leaf using Farkas receipt 898 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart43 : CompactCellTree := .absurd 898 +private theorem treePart43_check_chunked : + treePart43.checkLookup splitForms farkasReceiptLookup cells + (((((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, + -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, + 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, + 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, + 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [aff [0, -1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 1, 0, 0, 0, 0, -1, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, 0, -1, -1]]) = true := by + decide +kernel + theorem treePart43_check : treePart43.check splitForms farkasReceipts cells (((((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, @@ -1522,13 +2061,33 @@ theorem treePart43_check : 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, -1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, 0, -1, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart43_check_chunked /-- Contradiction leaf using Farkas receipt 899 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart44 : CompactCellTree := .absurd 899 +private theorem treePart44_check_chunked : + treePart44.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, + -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, + 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, + 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, + 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [aff [0, -1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 1, 0, 0, 0, 0, -1, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, 0, + -1, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -2, -1, 0, -1]]) = true := by + decide +kernel + theorem treePart44_check : treePart44.check splitForms farkasReceipts cells ((((((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, @@ -1545,7 +2104,9 @@ theorem treePart44_check : [aff [0, -1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, 0, -1, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -2, -1, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart44_check_chunked /-- Subtree splitting on `length[5] + length[6] - length[9] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 109, 110, 111, 112 and Farkas receipts excluding @@ -1569,6 +2130,26 @@ def treePart45 : CompactCellTree := (.absurd 930))) (.absurd 931)) +private theorem treePart45_check_chunked : + treePart45.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, + -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, + 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, + 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, + 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [aff [0, -1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 1, 0, 0, 0, 0, -1, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, 0, + -1, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -2, -1, 0, -1])]) ++ [aff + [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, + 1]]) = true := by + decide +kernel + theorem treePart45_check : treePart45.check splitForms farkasReceipts cells ((((((((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, @@ -1587,7 +2168,9 @@ theorem treePart45_check : -1, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -2, -1, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart45_check_chunked /-- Subtree splitting on `- length[5] - length[6] + length[9] + length[11]` in the row-04 symmetry chamber, with leaves selecting cells 113, 114, 115, 116, 117, 118, 119, 120 and Farkas @@ -1632,6 +2215,26 @@ def treePart46 : CompactCellTree := (.absurd 1047))) (.absurd 1048))) +private theorem treePart46_check_chunked : + treePart46.checkLookup splitForms farkasReceiptLookup cells + (((((((((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, + -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, + 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, + 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, + 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [aff [0, -1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 1, 0, 0, 0, 0, -1, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, 0, + -1, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -2, -1, 0, -1])]) ++ [aff + [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + -1, -1, 0, -1, 1, 0, 1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, -1]]) = true := by + decide +kernel + theorem treePart46_check : treePart46.check splitForms farkasReceipts cells (((((((((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, @@ -1650,7 +2253,9 @@ theorem treePart46_check : -1, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -2, -1, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart46_check_chunked /-- Subtree splitting on `- length[5] - length[6] + length[10] + length[11]` in the row-04 symmetry chamber, with leaves selecting cells 121, 122 and Farkas receipts excluding @@ -1666,6 +2271,27 @@ def treePart47 : CompactCellTree := (.absurd 930))) (.absurd 931) +private theorem treePart47_check_chunked : + treePart47.checkLookup splitForms farkasReceiptLookup cells + (((((((((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, + -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, + 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, + 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, + 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [aff [0, -1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 1, 0, 0, 0, 0, -1, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, 0, + -1, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -2, -1, 0, -1])]) ++ [aff + [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + -1, -1, 0, -1, 1, 0, 1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, + -1])]) = true := by + decide +kernel + theorem treePart47_check : treePart47.check splitForms farkasReceipts cells (((((((((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, @@ -1685,7 +2311,9 @@ theorem treePart47_check : [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart47_check_chunked /-- Subtree splitting on `length[5] + length[6] - length[9] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 123, 124 and Farkas receipts excluding inconsistent sign @@ -1703,6 +2331,25 @@ def treePart48 : CompactCellTree := (.absurd 917))) (.absurd 1062)) +private theorem treePart48_check_chunked : + treePart48.checkLookup splitForms farkasReceiptLookup cells + (((((((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, + -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, + 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, + 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, + 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [aff [0, -1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 1, 0, 0, 0, 0, -1, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, 0, + -1, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -2, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1])]) = true := by + decide +kernel + theorem treePart48_check : treePart48.check splitForms farkasReceipts cells (((((((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, @@ -1720,15 +2367,17 @@ theorem treePart48_check : 0, 1, 0, 0, 0, 0, -1, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, 0, -1, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -2, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart48_check_chunked /-- Contradiction leaf using Farkas receipt 322 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart49 : CompactCellTree := .absurd 322 -theorem treePart49_check : - treePart49.check splitForms farkasReceipts cells +private theorem treePart49_check_chunked : + treePart49.checkLookup splitForms farkasReceiptLookup cells (((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ @@ -1743,15 +2392,33 @@ theorem treePart49_check : [AffineForm.violation (aff [0, -1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, -1])]) = true := by decide +kernel -/-- Subtree splitting on `length[1] - length[3] - length[5] + length[11]` in the row-04 symmetry -chamber, with leaves selecting cells 18, 125, 126, 127, 128, 129, 130, 131, 132, 133 and Farkas -receipts excluding inconsistent sign branches. -/ -def treePart50 : CompactCellTree := - .split 23 - (.split 12 - (.absurd 709) - (.split 20 - (.cell 125 [274, 275, 276, 277, 278, 279, 280, 281, 282, 283, 284, 285, 286, 1063, 368, +theorem treePart49_check : + treePart49.check splitForms farkasReceipts cells + (((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) + ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, + 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, + 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, -1])]) = true := by + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart49_check_chunked + +/-- Subtree splitting on `length[1] - length[3] - length[5] + length[11]` in the row-04 symmetry +chamber, with leaves selecting cells 18, 125, 126, 127, 128, 129, 130, 131, 132, 133 and Farkas +receipts excluding inconsistent sign branches. -/ +def treePart50 : CompactCellTree := + .split 23 + (.split 12 + (.absurd 709) + (.split 20 + (.cell 125 [274, 275, 276, 277, 278, 279, 280, 281, 282, 283, 284, 285, 286, 1063, 368, 295, 634, 710, 293, 374, 438, 294, 711]) (.split 21 (.cell 18 [298, 299, 300, 301, 302, 303, 304, 305, 306, 307, 308, 309, 310, 1064, @@ -1791,6 +2458,19 @@ def treePart50 : CompactCellTree := (.absurd 799)))))) (.absurd 269) +private theorem treePart50_check_chunked : + treePart50.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, + 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) = true := by + decide +kernel + theorem treePart50_check : treePart50.check splitForms farkasReceipts cells (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -1802,13 +2482,27 @@ theorem treePart50_check : 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart50_check_chunked /-- Contradiction leaf using Farkas receipt 217 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart51 : CompactCellTree := .absurd 217 +private theorem treePart51_check_chunked : + treePart51.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 0, + 1, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart51_check : treePart51.check splitForms farkasReceipts cells (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -1819,13 +2513,28 @@ theorem treePart51_check : [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart51_check_chunked /-- Contradiction leaf using Farkas receipt 1080 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart52 : CompactCellTree := .absurd 1080 +private theorem treePart52_check_chunked : + treePart52.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, -1, -1, + 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart52_check : treePart52.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -1837,13 +2546,29 @@ theorem treePart52_check : [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart52_check_chunked /-- Contradiction leaf using Farkas receipt 1081 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart53 : CompactCellTree := .absurd 1081 +private theorem treePart53_check_chunked : + treePart53.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, + -2, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart53_check : treePart53.check splitForms farkasReceipts cells (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -1856,13 +2581,31 @@ theorem treePart53_check : [AffineForm.violation (aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart53_check_chunked /-- Contradiction leaf using Farkas receipt 1082 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart54 : CompactCellTree := .absurd 1082 +private theorem treePart54_check_chunked : + treePart54.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) + ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 1, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 1, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff + [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1]]) = true := by + decide +kernel + theorem treePart54_check : treePart54.check splitForms farkasReceipts cells ((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) @@ -1877,7 +2620,9 @@ theorem treePart54_check : [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 1, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 1, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart54_check_chunked /-- Subtree splitting on `length[5] + length[6] + length[8] - length[9] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 23, 134, 135, 136, 137, 138, 139, 140, 141 @@ -1929,6 +2674,22 @@ def treePart55 : CompactCellTree := 1090, 1091, 735, 738, 794, 795, 740, 1069, 1071, 736, 796, 1128, 813]) (.absurd 1129))))) +private theorem treePart55_check_chunked : + treePart55.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) + ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 1, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 1, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1])]) = true := by + decide +kernel + theorem treePart55_check : treePart55.check splitForms farkasReceipts cells ((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) @@ -1943,13 +2704,31 @@ theorem treePart55_check : [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 1, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 1, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart55_check_chunked /-- Contradiction leaf using Farkas receipt 1130 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart56 : CompactCellTree := .absurd 1130 +private theorem treePart56_check_chunked : + treePart56.checkLookup splitForms farkasReceiptLookup cells + (((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) + ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 1, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 1, -1, -1, 0, -1, 0, 0, 0, + 0, 0, 1])]) = true := by + decide +kernel + theorem treePart56_check : treePart56.check splitForms farkasReceipts cells (((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) @@ -1964,13 +2743,30 @@ theorem treePart56_check : [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 1, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 1, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart56_check_chunked /-- Contradiction leaf using Farkas receipt 1131 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart57 : CompactCellTree := .absurd 1131 +private theorem treePart57_check_chunked : + treePart57.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 1, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) = true := by + decide +kernel + theorem treePart57_check : treePart57.check splitForms farkasReceipts cells ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -1984,13 +2780,24 @@ theorem treePart57_check : [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 1, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart57_check_chunked /-- Contradiction leaf using Farkas receipt 82 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart58 : CompactCellTree := .absurd 82 +private theorem treePart58_check_chunked : + treePart58.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, + 1, 0, 1, -1, 0, -1]]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart58_check : treePart58.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -1998,13 +2805,25 @@ theorem treePart58_check : 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1]]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart58_check_chunked /-- Contradiction leaf using Farkas receipt 1132 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart59 : CompactCellTree := .absurd 1132 +private theorem treePart59_check_chunked : + treePart59.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, + 1, 0, 1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, + -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by + decide +kernel + theorem treePart59_check : treePart59.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2013,13 +2832,26 @@ theorem treePart59_check : -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart59_check_chunked /-- Contradiction leaf using Farkas receipt 337 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart60 : CompactCellTree := .absurd 337 +private theorem treePart60_check_chunked : + treePart60.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, + 1, 0, 1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, + -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, + 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart60_check : treePart60.check splitForms farkasReceipts cells (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2029,13 +2861,28 @@ theorem treePart60_check : 1, 0, 1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart60_check_chunked /-- Contradiction leaf using Farkas receipt 1133 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart61 : CompactCellTree := .absurd 1133 +private theorem treePart61_check_chunked : + treePart61.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, + 1, 0, 1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, + -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, + 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := + by + decide +kernel + theorem treePart61_check : treePart61.check splitForms farkasReceipts cells (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2047,13 +2894,28 @@ theorem treePart61_check : [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart61_check_chunked /-- Contradiction leaf using Farkas receipt 1134 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart62 : CompactCellTree := .absurd 1134 +private theorem treePart62_check_chunked : + treePart62.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, + 1, 0, 1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, + -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, + 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart62_check : treePart62.check splitForms farkasReceipts cells ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2065,7 +2927,9 @@ theorem treePart62_check : [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart62_check_chunked /-- Subtree splitting on `- length[0] + length[3] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 142, 143, 144, 145 and Farkas receipts excluding @@ -2089,6 +2953,20 @@ def treePart63 : CompactCellTree := (.absurd 1151))) (.absurd 1152)) +private theorem treePart63_check_chunked : + treePart63.checkLookup splitForms farkasReceiptLookup cells + (((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) + ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 1, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, + 1, 1, 0, 1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, + -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, + 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) = true := by + decide +kernel + theorem treePart63_check : treePart63.check splitForms farkasReceipts cells (((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) @@ -2101,7 +2979,9 @@ theorem treePart63_check : 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart63_check_chunked /-- Subtree splitting on `- length[0] + length[3] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 93, 127, 146, 147 and Farkas receipts excluding @@ -2125,6 +3005,21 @@ def treePart64 : CompactCellTree := (.absurd 1162))) (.absurd 1163)) +private theorem treePart64_check_chunked : + treePart64.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) + ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 1, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, + 1, 1, 0, 1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, + -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, + 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 1, 0, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) = true := by + decide +kernel + theorem treePart64_check : treePart64.check splitForms farkasReceipts cells ((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) @@ -2138,7 +3033,9 @@ theorem treePart64_check : 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart64_check_chunked /-- Subtree splitting on `length[0] + length[2] - length[3] - length[5] + length[11]` in the row-04 symmetry chamber, with leaves selecting cells 101, 109, 110, 111, 112, 148 and Farkas @@ -2173,6 +3070,21 @@ def treePart65 : CompactCellTree := (.absurd 1189))) (.absurd 1190)) +private theorem treePart65_check_chunked : + treePart65.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) + ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 1, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, + 1, 1, 0, 1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, + -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, + 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, -1, 0, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) = true := by + decide +kernel + theorem treePart65_check : treePart65.check splitForms farkasReceipts cells ((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) @@ -2186,7 +3098,9 @@ theorem treePart65_check : 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -2, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart65_check_chunked /-- Subtree splitting on `- length[0] + length[3] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 137, 149 and Farkas receipts excluding @@ -2211,6 +3125,18 @@ def treePart66 : CompactCellTree := (.absurd 1198)) (.absurd 1199)))) +private theorem treePart66_check_chunked : + treePart66.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, + 1, 0, 1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, + -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) = true := by + decide +kernel + theorem treePart66_check : treePart66.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2221,13 +3147,25 @@ theorem treePart66_check : -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart66_check_chunked /-- Contradiction leaf using Farkas receipt 82 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart67 : CompactCellTree := .absurd 82 +private theorem treePart67_check_chunked : + treePart67.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1])]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, + -1]]) = true := by + decide +kernel + theorem treePart67_check : treePart67.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2236,13 +3174,25 @@ theorem treePart67_check : -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1])]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart67_check_chunked /-- Contradiction leaf using Farkas receipt 1132 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart68 : CompactCellTree := .absurd 1132 +private theorem treePart68_check_chunked : + treePart68.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, + 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by + decide +kernel + theorem treePart68_check : treePart68.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2251,13 +3201,26 @@ theorem treePart68_check : -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart68_check_chunked /-- Contradiction leaf using Farkas receipt 1200 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart69 : CompactCellTree := .absurd 1200 +private theorem treePart69_check_chunked : + treePart69.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, + 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, + 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, -1]]) = true := by + decide +kernel + theorem treePart69_check : treePart69.check splitForms farkasReceipts cells (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2267,13 +3230,28 @@ theorem treePart69_check : [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart69_check_chunked /-- Contradiction leaf using Farkas receipt 1201 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart70 : CompactCellTree := .absurd 1201 +private theorem treePart70_check_chunked : + treePart70.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, + 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, + 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, -1])]) ++ [aff + [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 0, 1, 1]]) ++ [aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, + -1]]) = true := by + decide +kernel + theorem treePart70_check : treePart70.check splitForms farkasReceipts cells (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2285,7 +3263,9 @@ theorem treePart70_check : 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 0, 1, 1]]) ++ [aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart70_check_chunked /-- Subtree splitting on `- length[1] - length[2] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 60, 98, 107, 123, 124, 132, 150, 151 and Farkas @@ -2323,6 +3303,19 @@ def treePart71 : CompactCellTree := (.absurd 1226))) (.absurd 1227)))))) +private theorem treePart71_check_chunked : + treePart71.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, + 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, + 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, -1])]) ++ [aff + [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 0, 1, 1]]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, + 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart71_check : treePart71.check splitForms farkasReceipts cells ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2334,7 +3327,9 @@ theorem treePart71_check : 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 0, 1, 1]]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart71_check_chunked /-- Subtree splitting on `- length[0] + length[3] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 60, 141, 150, 151, 152 and Farkas receipts @@ -2357,6 +3352,20 @@ def treePart72 : CompactCellTree := 476, 479, 592, 636, 1215, 478, 1216, 1237, 1066, 1148, 1149, 1150])) (.absurd 1238)))) +private theorem treePart72_check_chunked : + treePart72.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, + 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, + 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, -1])]) ++ [aff + [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 0, 1, 1]]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, + 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, + -1])]) = true := by + decide +kernel + theorem treePart72_check : treePart72.check splitForms farkasReceipts cells ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2369,13 +3378,27 @@ theorem treePart72_check : [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 0, 1, 1]]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart72_check_chunked /-- Contradiction leaf using Farkas receipt 1239 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart73 : CompactCellTree := .absurd 1239 +private theorem treePart73_check_chunked : + treePart73.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, + 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, + 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 0, 1, 1])]) = true := by + decide +kernel + theorem treePart73_check : treePart73.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2386,13 +3409,25 @@ theorem treePart73_check : 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 0, 1, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart73_check_chunked /-- Contradiction leaf using Farkas receipt 82 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart74 : CompactCellTree := .absurd 82 +private theorem treePart74_check_chunked : + treePart74.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ [aff + [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1]]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, + -1]]) = true := by + decide +kernel + theorem treePart74_check : treePart74.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2401,13 +3436,25 @@ theorem treePart74_check : -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1]]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart74_check_chunked /-- Contradiction leaf using Farkas receipt 1240 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart75 : CompactCellTree := .absurd 1240 +private theorem treePart75_check_chunked : + treePart75.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ [aff + [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, + 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by + decide +kernel + theorem treePart75_check : treePart75.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2416,13 +3463,27 @@ theorem treePart75_check : -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart75_check_chunked /-- Contradiction leaf using Farkas receipt 386 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart76 : CompactCellTree := .absurd 386 +private theorem treePart76_check_chunked : + treePart76.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ [aff + [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, + 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, + -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, -1]]) ++ [aff [0, 0, -1, 0, 0, 0, 1, 0, + 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart76_check : treePart76.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2433,7 +3494,9 @@ theorem treePart76_check : 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, -1]]) ++ [aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart76_check_chunked /-- Subtree splitting on `- length[1] - length[2] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 54, 92, 102, 113, 114, 126, 153, 154 and Farkas @@ -2471,6 +3534,19 @@ def treePart77 : CompactCellTree := (.absurd 1252)) (.absurd 1253))))))) +private theorem treePart77_check_chunked : + treePart77.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ [aff + [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, + 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, + -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, + 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) = + true := by + decide +kernel + theorem treePart77_check : treePart77.check splitForms farkasReceipts cells (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2482,7 +3558,9 @@ theorem treePart77_check : -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart77_check_chunked /-- Subtree splitting on `- length[0] + length[3] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 54, 135, 153, 154, 155 and Farkas receipts @@ -2505,6 +3583,19 @@ def treePart78 : CompactCellTree := 416, 418, 409, 449, 412, 448, 588, 1193, 414])) (.absurd 1256)))) +private theorem treePart78_check_chunked : + treePart78.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ [aff + [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, + 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, + -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, + 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, + 0, 0, 0, 0, 0, -1])]) = true := by + decide +kernel + theorem treePart78_check : treePart78.check splitForms farkasReceipts cells (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2516,13 +3607,28 @@ theorem treePart78_check : -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart78_check_chunked /-- Contradiction leaf using Farkas receipt 1201 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart79 : CompactCellTree := .absurd 1201 +private theorem treePart79_check_chunked : + treePart79.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ [aff + [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, + 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, + -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, -1])]) ++ [aff [0, + 0, 0, 0, 0, 0, -1, -1, 0, 0, 0, 1, 1]]) ++ [aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = + true := by + decide +kernel + theorem treePart79_check : treePart79.check splitForms farkasReceipts cells (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2534,7 +3640,9 @@ theorem treePart79_check : -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 0, 1, 1]]) ++ [aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart79_check_chunked /-- Subtree splitting on `- length[0] + length[2] + length[3] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 55, 136, 156, 157, 158, 159 and Farkas @@ -2571,6 +3679,19 @@ def treePart80 : CompactCellTree := 657, 1272, 662, 716, 719, 1158, 1157, 656, 1271, 1068, 792, 1273])) (.absurd 1264))))) +private theorem treePart80_check_chunked : + treePart80.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ [aff + [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, + 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, + -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, -1])]) ++ [aff [0, + 0, 0, 0, 0, 0, -1, -1, 0, 0, 0, 1, 1]]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, + 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) = true := by + decide +kernel + theorem treePart80_check : treePart80.check splitForms farkasReceipts cells ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2582,7 +3703,9 @@ theorem treePart80_check : -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 0, 1, 1]]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart80_check_chunked /-- Subtree splitting on `length[0] - length[3] - length[5] + length[11]` in the row-04 symmetry chamber, with leaves selecting cells 55, 97, 106, 121, 122, 131, 156 and Farkas receipts @@ -2622,6 +3745,20 @@ def treePart81 : CompactCellTree := (.absurd 1277))) (.absurd 1278))))) +private theorem treePart81_check_chunked : + treePart81.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ [aff + [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, + 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, + -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, -1])]) ++ [aff [0, + 0, 0, 0, 0, 0, -1, -1, 0, 0, 0, 1, 1]]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, + 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, + 1])]) = true := by + decide +kernel + theorem treePart81_check : treePart81.check splitForms farkasReceipts cells ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2634,13 +3771,27 @@ theorem treePart81_check : 0, 0, 0, 0, 0, -1, -1, 0, 0, 0, 1, 1]]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart81_check_chunked /-- Contradiction leaf using Farkas receipt 1279 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart82 : CompactCellTree := .absurd 1279 +private theorem treePart82_check_chunked : + treePart82.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ [aff + [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, + 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, + -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 0, 1, 1])]) = true := by + decide +kernel + theorem treePart82_check : treePart82.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2651,13 +3802,25 @@ theorem treePart82_check : 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 0, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 0, 1, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart82_check_chunked /-- Contradiction leaf using Farkas receipt 82 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart83 : CompactCellTree := .absurd 82 +private theorem treePart83_check_chunked : + treePart83.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) ++ [aff [0, -1, 0, -1, + 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart83_check : treePart83.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2666,13 +3829,26 @@ theorem treePart83_check : -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart83_check_chunked /-- Contradiction leaf using Farkas receipt 1132 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart84 : CompactCellTree := .absurd 1132 +private theorem treePart84_check_chunked : + treePart84.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, + 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by + decide +kernel + theorem treePart84_check : treePart84.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2682,13 +3858,28 @@ theorem treePart84_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart84_check_chunked /-- Contradiction leaf using Farkas receipt 1201 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart85 : CompactCellTree := .absurd 1201 +private theorem treePart85_check_chunked : + treePart85.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 0, 0, 0, + 0, 0, -1, -1, 0, 1, 1, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 1, 0, -1, 0, -1]]) ++ [aff [0, + 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart85_check : treePart85.check splitForms farkasReceipts cells (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2700,7 +3891,9 @@ theorem treePart85_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 1, 1, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 1, 0, -1, 0, -1]]) ++ [aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart85_check_chunked /-- Subtree splitting on `- length[0] + length[2] + length[3] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 62, 160, 161, 162, 163, 164 and Farkas @@ -2737,6 +3930,20 @@ def treePart86 : CompactCellTree := 657, 1272, 662, 716, 1157, 654, 1156, 656, 1271, 1068, 719, 1247])) (.absurd 1264))))) +private theorem treePart86_check_chunked : + treePart86.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 0, 0, 0, + 0, 0, -1, -1, 0, 1, 1, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 1, 0, -1, 0, -1]]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) = true := by + decide +kernel + theorem treePart86_check : treePart86.check splitForms farkasReceipts cells ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2749,7 +3956,9 @@ theorem treePart86_check : 0, 0, -1, -1, 0, 1, 1, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 1, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart86_check_chunked /-- Subtree splitting on `length[0] - length[3] - length[5] + length[11]` in the row-04 symmetry chamber, with leaves selecting cells 62, 160, 165, 166, 167, 168, 169 and Farkas receipts @@ -2789,6 +3998,20 @@ def treePart87 : CompactCellTree := (.absurd 1277))) (.absurd 1278))))) +private theorem treePart87_check_chunked : + treePart87.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 0, 0, 0, + 0, 0, -1, -1, 0, 1, 1, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 1, 0, -1, 0, -1]]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) = true := by + decide +kernel + theorem treePart87_check : treePart87.check splitForms farkasReceipts cells ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2801,13 +4024,28 @@ theorem treePart87_check : 0, 0, -1, -1, 0, 1, 1, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 1, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart87_check_chunked /-- Contradiction leaf using Farkas receipt 1282 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart88 : CompactCellTree := .absurd 1282 +private theorem treePart88_check_chunked : + treePart88.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 0, 0, 0, + 0, 0, -1, -1, 0, 1, 1, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 1, 0, + -1, 0, -1])]) = true := by + decide +kernel + theorem treePart88_check : treePart88.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2819,13 +4057,29 @@ theorem treePart88_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 1, 1, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 1, 0, -1, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart88_check_chunked /-- Contradiction leaf using Farkas receipt 1283 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart89 : CompactCellTree := .absurd 1283 +private theorem treePart89_check_chunked : + treePart89.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 1, 1, 0, 1])]) ++ [aff [0, 0, 0, 0, + 0, 0, 1, 0, 1, 0, -1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 1, -1, -1, 0, -1]]) ++ [aff + [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart89_check : treePart89.check splitForms farkasReceipts cells ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2838,7 +4092,9 @@ theorem treePart89_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 1, 1, 0, 1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 1, 0, -1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 1, -1, -1, 0, -1]]) ++ [aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart89_check_chunked /-- Subtree splitting on `- length[1] - length[2] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 59, 140, 170, 171, 172, 173 and Farkas receipts @@ -2870,6 +4126,21 @@ def treePart90 : CompactCellTree := 809, 1290, 740, 735, 1170, 1280, 1281, 742, 1289, 1071, 1250, 1291, 737])) (.absurd 1147))))) +private theorem treePart90_check_chunked : + treePart90.checkLookup splitForms farkasReceiptLookup cells + (((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) + ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 1, -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 1, 1, 0, 1])]) ++ [aff [0, 0, 0, 0, + 0, 0, 1, 0, 1, 0, -1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 1, -1, -1, 0, -1]]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) = true := by + decide +kernel + theorem treePart90_check : treePart90.check splitForms farkasReceipts cells (((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) @@ -2883,7 +4154,9 @@ theorem treePart90_check : 0, 0, 1, 0, 1, 0, -1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 1, -1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart90_check_chunked /-- Subtree splitting on `- length[1] - length[2] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 59, 96, 105, 118, 120, 130, 170 and Farkas @@ -2918,6 +4191,21 @@ def treePart91 : CompactCellTree := (.absurd 1226))) (.absurd 1298))))) +private theorem treePart91_check_chunked : + treePart91.checkLookup splitForms farkasReceiptLookup cells + (((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) + ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 1, -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 1, 1, 0, 1])]) ++ [aff [0, 0, 0, 0, + 0, 0, 1, 0, 1, 0, -1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 1, -1, -1, 0, -1]]) ++ + [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) = true := by + decide +kernel + theorem treePart91_check : treePart91.check splitForms farkasReceipts cells (((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) @@ -2931,13 +4219,29 @@ theorem treePart91_check : 0, 0, 1, 0, 1, 0, -1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 1, -1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, -1, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart91_check_chunked /-- Contradiction leaf using Farkas receipt 1299 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart92 : CompactCellTree := .absurd 1299 +private theorem treePart92_check_chunked : + treePart92.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 1, 1, 0, 1])]) ++ [aff [0, 0, 0, 0, + 0, 0, 1, 0, 1, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 1, -1, + -1, 0, -1])]) = true := by + decide +kernel + theorem treePart92_check : treePart92.check splitForms farkasReceipts cells (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2950,13 +4254,28 @@ theorem treePart92_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 1, 1, 0, 1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 1, 0, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 1, -1, -1, 0, -1])]) = true := by + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart92_check_chunked + +/-- Contradiction leaf using Farkas receipt 1282 to exclude the accumulated affine constraints +in this row-04 branch. -/ +def treePart93 : CompactCellTree := + .absurd 1282 + +private theorem treePart93_check_chunked : + treePart93.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, -1, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 1, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 1, 0, -1, 0, -1])]) = true := by decide +kernel -/-- Contradiction leaf using Farkas receipt 1282 to exclude the accumulated affine constraints -in this row-04 branch. -/ -def treePart93 : CompactCellTree := - .absurd 1282 - theorem treePart93_check : treePart93.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2968,13 +4287,25 @@ theorem treePart93_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 1, 1, 0, 1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 1, 0, -1, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart93_check_chunked /-- Contradiction leaf using Farkas receipt 82 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart94 : CompactCellTree := .absurd 82 +private theorem treePart94_check_chunked : + treePart94.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = + true := by + decide +kernel + theorem treePart94_check : treePart94.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2983,13 +4314,25 @@ theorem treePart94_check : -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart94_check_chunked /-- Contradiction leaf using Farkas receipt 1132 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart95 : CompactCellTree := .absurd 1132 +private theorem treePart95_check_chunked : + treePart95.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, + 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by + decide +kernel + theorem treePart95_check : treePart95.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -2998,13 +4341,27 @@ theorem treePart95_check : -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart95_check_chunked /-- Contradiction leaf using Farkas receipt 1300 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart96 : CompactCellTree := .absurd 1300 +private theorem treePart96_check_chunked : + treePart96.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, + 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, + -1])]) ++ [aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, + 0, 0, -1, -1]]) = true := by + decide +kernel + theorem treePart96_check : treePart96.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3015,7 +4372,9 @@ theorem treePart96_check : 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart96_check_chunked /-- Subtree splitting on `length[5] - length[8] - length[10] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 19, 142, 143, 151, 154, 157, 171, 174, 175, 176 @@ -3066,6 +4425,18 @@ def treePart97 : CompactCellTree := 378, 442, 320, 392, 1232, 1319, 319, 1303, 440, 631, 1320, 714]) (.absurd 633))))) +private theorem treePart97_check_chunked : + treePart97.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, + 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, + -1])]) ++ [aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, + 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1])]) = true := by + decide +kernel + theorem treePart97_check : treePart97.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3076,13 +4447,28 @@ theorem treePart97_check : 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart97_check_chunked /-- Contradiction leaf using Farkas receipt 1321 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart98 : CompactCellTree := .absurd 1321 +private theorem treePart98_check_chunked : + treePart98.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, + 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, + -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, + 0, 1, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1]]) = + true := by + decide +kernel + theorem treePart98_check : treePart98.check splitForms farkasReceipts cells (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3094,7 +4480,9 @@ theorem treePart98_check : -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 1, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart98_check_chunked /-- Subtree splitting on `length[5] - length[8] - length[10] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 144, 145, 177, 178, 179 and Farkas receipts @@ -3122,6 +4510,19 @@ def treePart99 : CompactCellTree := 592, 637, 478, 636, 1215, 470, 1335, 1309, 1066, 1331, 1148, 1332, 1333]) (.absurd 1336))))) +private theorem treePart99_check_chunked : + treePart99.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, + 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, + -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, + 0, 1, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, + 0, 0, 0, -1, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) = true := by + decide +kernel + theorem treePart99_check : treePart99.check splitForms farkasReceipts cells ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3133,7 +4534,9 @@ theorem treePart99_check : -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 1, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart99_check_chunked /-- Subtree splitting on `- length[5] - length[6] + length[9] + length[11]` in the row-04 symmetry chamber, with leaves selecting cells 158, 172, 177, 178, 180, 181, 182 and Farkas @@ -3174,6 +4577,20 @@ def treePart100 : CompactCellTree := (.absurd 1343))) (.absurd 1344))))) +private theorem treePart100_check_chunked : + treePart100.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, + 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, + -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, + 0, 1, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, + 0, 0, 0, -1, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, + 1])]) = true := by + decide +kernel + theorem treePart100_check : treePart100.check splitForms farkasReceipts cells ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3186,13 +4603,27 @@ theorem treePart100_check : 0, 1, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart100_check_chunked /-- Contradiction leaf using Farkas receipt 1345 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart101 : CompactCellTree := .absurd 1345 +private theorem treePart101_check_chunked : + treePart101.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, + 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, + -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 1, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) = true := by + decide +kernel + theorem treePart101_check : treePart101.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3203,13 +4634,25 @@ theorem treePart101_check : 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 1, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart101_check_chunked /-- Contradiction leaf using Farkas receipt 1346 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart102 : CompactCellTree := .absurd 1346 +private theorem treePart102_check_chunked : + treePart102.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 1, 1, 0, 1, -1, 0, -1]]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart102_check : treePart102.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3218,13 +4661,26 @@ theorem treePart102_check : -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1]]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart102_check_chunked /-- Contradiction leaf using Farkas receipt 1347 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart103 : CompactCellTree := .absurd 1347 +private theorem treePart103_check_chunked : + treePart103.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 1, 1, 0, 1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, + 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by + decide +kernel + theorem treePart103_check : treePart103.check splitForms farkasReceipts cells (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3234,7 +4690,9 @@ theorem treePart103_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart103_check_chunked /-- Subtree splitting on `length[5] + length[6] - length[9] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 154, 157, 158, 180 and Farkas receipts excluding @@ -3258,6 +4716,18 @@ def treePart104 : CompactCellTree := (.absurd 1350))) (.absurd 1351)) +private theorem treePart104_check_chunked : + treePart104.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 1, 1, 0, 1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, + 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff + [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1]]) = true := by + decide +kernel + theorem treePart104_check : treePart104.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3268,7 +4738,9 @@ theorem treePart104_check : 0, 1, 1, 0, 1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart104_check_chunked /-- Subtree splitting on `- length[5] - length[6] + length[8] + length[9] + length[11]` in the row-04 symmetry chamber, with leaves selecting cells 161, 162, 171, 172 and Farkas receipts @@ -3301,6 +4773,18 @@ def treePart105 : CompactCellTree := (.absurd 1359)) (.absurd 1354))) +private theorem treePart105_check_chunked : + treePart105.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 1, 1, 0, 1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, + 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) = true := by + decide +kernel + theorem treePart105_check : treePart105.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3311,7 +4795,9 @@ theorem treePart105_check : 0, 1, 1, 0, 1, -1, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart105_check_chunked /-- Subtree splitting on `- length[0] - length[2] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 151, 179 and Farkas receipts excluding @@ -3333,6 +4819,16 @@ def treePart106 : CompactCellTree := (.absurd 1348))) (.absurd 1363)))) +private theorem treePart106_check_chunked : + treePart106.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1])]) = true := by + decide +kernel + theorem treePart106_check : treePart106.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3341,13 +4837,25 @@ theorem treePart106_check : -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart106_check_chunked /-- Contradiction leaf using Farkas receipt 82 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart107 : CompactCellTree := .absurd 82 +private theorem treePart107_check_chunked : + treePart107.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [aff [0, -1, 0, -1, 0, 0, + 1, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart107_check : treePart107.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3356,13 +4864,26 @@ theorem treePart107_check : -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart107_check_chunked /-- Contradiction leaf using Farkas receipt 509 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart108 : CompactCellTree := .absurd 509 +private theorem treePart108_check_chunked : + treePart108.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff + [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, + -1]]) = true := by + decide +kernel + theorem treePart108_check : treePart108.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3372,13 +4893,26 @@ theorem treePart108_check : 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart108_check_chunked /-- Contradiction leaf using Farkas receipt 1347 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart109 : CompactCellTree := .absurd 1347 +private theorem treePart109_check_chunked : + treePart109.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff + [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 1, + 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by + decide +kernel + theorem treePart109_check : treePart109.check splitForms farkasReceipts cells (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3388,13 +4922,28 @@ theorem treePart109_check : 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart109_check_chunked /-- Contradiction leaf using Farkas receipt 1364 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart110 : CompactCellTree := .absurd 1364 +private theorem treePart110_check_chunked : + treePart110.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff + [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 1, + 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, + 0, -1])]) ++ [aff [0, 0, 1, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 1, -1, -1, 0, -1, + 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1]]) = true := by + decide +kernel + theorem treePart110_check : treePart110.check splitForms farkasReceipts cells ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3406,7 +4955,9 @@ theorem treePart110_check : 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 0, 1, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 1, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart110_check_chunked /-- Subtree splitting on `length[5] + length[6] + length[8] - length[9] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 23, 134, 135, 136, 137, 138, 139, 140, 141 @@ -3458,6 +5009,20 @@ def treePart111 : CompactCellTree := 1087, 1367, 592, 636, 1215, 1379, 479, 1309, 1066, 1331, 1148, 1385, 807]) (.absurd 1386))))) +private theorem treePart111_check_chunked : + treePart111.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff + [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 1, + 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, + 0, -1])]) ++ [aff [0, 0, 1, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 1, -1, -1, 0, -1, + 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1])]) + = true := by + decide +kernel + theorem treePart111_check : treePart111.check splitForms farkasReceipts cells ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3470,13 +5035,28 @@ theorem treePart111_check : 0, -1])]) ++ [aff [0, 0, 1, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 1, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart111_check_chunked /-- Contradiction leaf using Farkas receipt 1387 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart112 : CompactCellTree := .absurd 1387 +private theorem treePart112_check_chunked : + treePart112.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff + [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 1, + 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, + 0, -1])]) ++ [aff [0, 0, 1, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff + [0, 0, 1, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) = true := by + decide +kernel + theorem treePart112_check : treePart112.check splitForms farkasReceipts cells (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3488,13 +5068,28 @@ theorem treePart112_check : 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 0, 1, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 1, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart112_check_chunked /-- Contradiction leaf using Farkas receipt 1388 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart113 : CompactCellTree := .absurd 1388 +private theorem treePart113_check_chunked : + treePart113.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff + [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 1, + 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, + 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 1, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) = true := + by + decide +kernel + theorem treePart113_check : treePart113.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3506,7 +5101,9 @@ theorem treePart113_check : 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 1, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart113_check_chunked /-- Subtree splitting on `length[5] + length[6] + length[8] - length[9] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 137, 141, 149 and Farkas receipts excluding @@ -3549,6 +5146,16 @@ def treePart114 : CompactCellTree := (.absurd 1399)) (.absurd 1400)))))) +private theorem treePart114_check_chunked : + treePart114.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) = true := by + decide +kernel + theorem treePart114_check : treePart114.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3557,7 +5164,9 @@ theorem treePart114_check : -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart114_check_chunked /-- Subtree splitting on `- length[0] - length[2] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 135, 136 and Farkas receipts excluding @@ -3585,6 +5194,17 @@ def treePart115 : CompactCellTree := (.absurd 1399)) (.absurd 1400))))) +private theorem treePart115_check_chunked : + treePart115.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ [aff [0, 0, 0, 0, + 0, 0, -1, -1, 0, 0, 1, 0, 1]]) = true := by + decide +kernel + theorem treePart115_check : treePart115.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3594,7 +5214,9 @@ theorem treePart115_check : 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart115_check_chunked /-- Subtree splitting on `- length[0] - length[2] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 140, 163 and Farkas receipts excluding @@ -3627,6 +5249,17 @@ def treePart116 : CompactCellTree := (.absurd 1399)) (.absurd 1400))))) +private theorem treePart116_check_chunked : + treePart116.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, 0, -1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, 1, 1, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) = true := by + decide +kernel + theorem treePart116_check : treePart116.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3636,13 +5269,25 @@ theorem treePart116_check : 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart116_check_chunked /-- Contradiction leaf using Farkas receipt 1406 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart117 : CompactCellTree := .absurd 1406 +private theorem treePart117_check_chunked : + treePart117.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 1, 0, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [aff [0, + -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart117_check : treePart117.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3651,7 +5296,9 @@ theorem treePart117_check : [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart117_check_chunked /-- Subtree splitting on `length[5] - length[8] - length[9] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 17, 91, 92, 93, 94, 95, 96, 97, 98, 99 and Farkas receipts @@ -3700,6 +5347,17 @@ def treePart118 : CompactCellTree := 405, 443, 409, 417, 445, 449, 418, 451, 588, 1140, 1414]))) (.absurd 1415)))))) +private theorem treePart118_check_chunked : + treePart118.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 1, 0, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 0, + 1, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart118_check : treePart118.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3709,13 +5367,27 @@ theorem treePart118_check : -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart118_check_chunked /-- Contradiction leaf using Farkas receipt 1416 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart119 : CompactCellTree := .absurd 1416 +private theorem treePart119_check_chunked : + treePart119.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 1, 0, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, + 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by + decide +kernel + theorem treePart119_check : treePart119.check splitForms farkasReceipts cells (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3726,13 +5398,29 @@ theorem treePart119_check : [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart119_check_chunked /-- Contradiction leaf using Farkas receipt 1321 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart120 : CompactCellTree := .absurd 1321 +private theorem treePart120_check_chunked : + treePart120.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 1, 0, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 0, 1, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1]]) = true := + by + decide +kernel + theorem treePart120_check : treePart120.check splitForms farkasReceipts cells (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3745,7 +5433,9 @@ theorem treePart120_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 0, 1, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart120_check_chunked /-- Subtree splitting on `length[5] + length[6] + length[8] - length[9] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 18, 125, 126, 127, 128, 129, 130, 131, 132 @@ -3797,6 +5487,20 @@ def treePart121 : CompactCellTree := 417, 453, 409, 449, 1213, 1316, 418, 414, 1418, 1140, 1428, 803]) (.absurd 1429))))) +private theorem treePart121_check_chunked : + treePart121.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 1, 0, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 0, 1, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, + -1, -1])]) = true := by + decide +kernel + theorem treePart121_check : treePart121.check splitForms farkasReceipts cells (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3809,13 +5513,28 @@ theorem treePart121_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, 0, 1, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart121_check_chunked /-- Contradiction leaf using Farkas receipt 1430 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart122 : CompactCellTree := .absurd 1430 +private theorem treePart122_check_chunked : + treePart122.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 1, 0, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 1, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) = true := by + decide +kernel + theorem treePart122_check : treePart122.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3827,7 +5546,9 @@ theorem treePart122_check : [AffineForm.violation (aff [0, -1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 1, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart122_check_chunked /-- Subtree splitting on `- length[0] - length[2] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 93, 127, 146, 147 and Farkas receipts excluding @@ -3855,6 +5576,17 @@ def treePart123 : CompactCellTree := (.absurd 1436))) (.absurd 1437)))) +private theorem treePart123_check_chunked : + treePart123.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 1, 0, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, + 1, 0, 1, -1, 0, -1]]) = true := by + decide +kernel + theorem treePart123_check : treePart123.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3864,7 +5596,9 @@ theorem treePart123_check : -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart123_check_chunked /-- Subtree splitting on `- length[0] - length[2] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 17, 93, 98, 132 and Farkas receipts excluding @@ -3894,6 +5628,17 @@ def treePart124 : CompactCellTree := (.absurd 1443)) (.absurd 1444))))) +private theorem treePart124_check_chunked : + treePart124.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 1, 0, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1])]) = true := by + decide +kernel + theorem treePart124_check : treePart124.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3903,7 +5648,9 @@ theorem treePart124_check : -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart124_check_chunked /-- Subtree splitting on `- length[0] - length[2] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 17, 92, 97, 126, 131 and Farkas receipts excluding @@ -3936,6 +5683,17 @@ def treePart125 : CompactCellTree := (.absurd 1443)) (.absurd 1444))))) +private theorem treePart125_check_chunked : + treePart125.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 1, 0, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ [aff + [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1]]) = true := by + decide +kernel + theorem treePart125_check : treePart125.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3945,7 +5703,9 @@ theorem treePart125_check : -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart125_check_chunked /-- Subtree splitting on `- length[0] - length[2] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 17, 96, 130, 165, 166 and Farkas receipts @@ -3986,6 +5746,17 @@ def treePart126 : CompactCellTree := (.absurd 1454)) (.absurd 1444))))) +private theorem treePart126_check_chunked : + treePart126.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 1, 0, 0, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, + -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) = true := by + decide +kernel + theorem treePart126_check : treePart126.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -3995,13 +5766,26 @@ theorem treePart126_check : -1, 0, -1, 0, 0, 0, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart126_check_chunked /-- Contradiction leaf using Farkas receipt 82 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart127 : CompactCellTree := .absurd 82 +private theorem treePart127_check_chunked : + treePart127.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := + by + decide +kernel + theorem treePart127_check : treePart127.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -4011,7 +5795,9 @@ theorem treePart127_check : [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart127_check_chunked /-- Subtree splitting on `length[5] - length[8] - length[9] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 49, 183, 184, 185, 186, 187, 188, 189, 190, 191 and Farkas @@ -4066,6 +5852,17 @@ def treePart128 : CompactCellTree := (.absurd 1466)))))) (.absurd 1467)) +private theorem treePart128_check_chunked : + treePart128.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) = true := by + decide +kernel + theorem treePart128_check : treePart128.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -4075,13 +5872,27 @@ theorem treePart128_check : [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart128_check_chunked /-- Contradiction leaf using Farkas receipt 1347 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart129 : CompactCellTree := .absurd 1347 +private theorem treePart129_check_chunked : + treePart129.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by + decide +kernel + theorem treePart129_check : treePart129.check splitForms farkasReceipts cells (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -4092,13 +5903,29 @@ theorem treePart129_check : 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart129_check_chunked /-- Contradiction leaf using Farkas receipt 1364 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart130 : CompactCellTree := .absurd 1364 +private theorem treePart130_check_chunked : + treePart130.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, -1, 0, 0, + 0, 1, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, -1, 0, -1, 0, 1, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, + 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1]]) = true := by + decide +kernel + theorem treePart130_check : treePart130.check splitForms farkasReceipts cells ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -4111,7 +5938,9 @@ theorem treePart130_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, -1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, -1, 0, -1, 0, 1, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart130_check_chunked /-- Subtree splitting on `length[5] + length[6] + length[8] - length[9] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 22, 110, 114, 116, 119, 120, 122, 124, 192 @@ -4163,6 +5992,20 @@ def treePart131 : CompactCellTree := 474, 478, 1145, 636, 1215, 1379, 479, 1470, 469, 715, 1148, 1385, 807]) (.absurd 1386))))) +private theorem treePart131_check_chunked : + treePart131.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, -1, 0, 0, + 0, 1, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, -1, 0, -1, 0, 1, 1, 0, 0, 0, 0, 0, -1]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1])]) = true := by + decide +kernel + theorem treePart131_check : treePart131.check splitForms farkasReceipts cells ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -4175,13 +6018,29 @@ theorem treePart131_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, -1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, -1]]) ++ [aff [0, -1, 0, -1, 0, 1, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart131_check_chunked /-- Contradiction leaf using Farkas receipt 1486 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart132 : CompactCellTree := .absurd 1486 +private theorem treePart132_check_chunked : + treePart132.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, -1, 0, 0, + 0, 1, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 1, 1, 0, 0, 0, + 0, 0, -1])]) = true := by + decide +kernel + theorem treePart132_check : treePart132.check splitForms farkasReceipts cells (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -4194,13 +6053,28 @@ theorem treePart132_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [aff [0, -1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 1, 1, 0, 0, 0, 0, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart132_check_chunked /-- Contradiction leaf using Farkas receipt 1467 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart133 : CompactCellTree := .absurd 1467 +private theorem treePart133_check_chunked : + treePart133.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, + 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, -1])]) = true := by + decide +kernel + theorem treePart133_check : treePart133.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -4212,7 +6086,9 @@ theorem treePart133_check : 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, -1, -1, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart133_check_chunked /-- Subtree splitting on `- length[0] - length[2] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 110, 112, 185, 193 and Farkas receipts excluding @@ -4243,6 +6119,17 @@ def treePart134 : CompactCellTree := (.absurd 684))) (.absurd 1490))) +private theorem treePart134_check_chunked : + treePart134.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1]]) = true := by + decide +kernel + theorem treePart134_check : treePart134.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -4252,7 +6139,9 @@ theorem treePart134_check : [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart134_check_chunked /-- Subtree splitting on `- length[0] - length[2] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 124, 190 and Farkas receipts excluding @@ -4285,6 +6174,18 @@ def treePart135 : CompactCellTree := (.absurd 1494)) (.absurd 1493))))) +private theorem treePart135_check_chunked : + treePart135.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, + 0, -1])]) = true := by + decide +kernel + theorem treePart135_check : treePart135.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -4295,7 +6196,9 @@ theorem treePart135_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 1, 0, 1, -1, 0, -1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart135_check_chunked /-- Subtree splitting on `- length[0] - length[2] + length[5] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 114, 122, 184, 189 and Farkas receipts excluding @@ -4335,6 +6238,18 @@ def treePart136 : CompactCellTree := (.absurd 1494)) (.absurd 1493))))) +private theorem treePart136_check_chunked : + treePart136.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ [aff [0, 0, 0, 0, + 0, 0, -1, -1, 0, 0, 1, 0, 1]]) = true := by + decide +kernel + theorem treePart136_check : treePart136.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -4345,13 +6260,28 @@ theorem treePart136_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart136_check_chunked /-- Contradiction leaf using Farkas receipt 1389 to exclude the accumulated affine constraints in this row-04 branch. -/ def treePart137 : CompactCellTree := .absurd 1389 +private theorem treePart137_check_chunked : + treePart137.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) ++ [aff [0, -1, 0, -1, + 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by + decide +kernel + theorem treePart137_check : treePart137.check splitForms farkasReceipts cells (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -4363,7 +6293,9 @@ theorem treePart137_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) ++ [aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart137_check_chunked /-- Subtree splitting on `length[5] - length[8] - length[9] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 188, 194 and Farkas receipts excluding inconsistent sign @@ -4387,6 +6319,20 @@ def treePart138 : CompactCellTree := (.absurd 1497)) (.absurd 1493))) +private theorem treePart138_check_chunked : + treePart138.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, 1, + -1, 0, -1, 0, 0, 0, 0, 0, 1]]) = true := by + decide +kernel + theorem treePart138_check : treePart138.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -4399,7 +6345,9 @@ theorem treePart138_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart138_check_chunked /-- Subtree splitting on `length[5] - length[8] - length[9] - length[11]` in the row-04 symmetry chamber, with leaves selecting cells 120, 169 and Farkas receipts excluding inconsistent sign @@ -4427,6 +6375,20 @@ def treePart139 : CompactCellTree := (.absurd 1494)) (.absurd 1493))) +private theorem treePart139_check_chunked : + treePart139.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, -1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, -1, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) ++ + [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ + [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) = true := by + decide +kernel + theorem treePart139_check : treePart139.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1])]) ++ @@ -4439,7 +6401,9 @@ theorem treePart139_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 1, 0, 1])]) ++ [AffineForm.violation (aff [0, -1, 0, -1, 0, 0, 1, 0, 0, 0, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, 1, 0, 1, -1, 0, -1, 0, 0, 0, 0, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart139_check_chunked /-- A branch of the final row-04 cover assembly, starting at split form 1 and combining the previously verified decision subtrees. -/ diff --git a/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow06CoverReceipts.lean b/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow06CoverReceipts.lean index 516d4a25d8..5c69c1527a 100644 --- a/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow06CoverReceipts.lean +++ b/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow06CoverReceipts.lean @@ -6,6 +6,7 @@ Authors: Nathan Pflueger module public import LeanPool.BrillNoetherGraphs.Utilities.Subdivision.AffineCover +public import LeanPool.BrillNoetherGraphs.Utilities.Foundations.ChunkedLookup /-! # Sparse Farkas receipts for the row-06 closed cover @@ -2508,4 +2509,36 @@ def farkasReceipts : List Certificate.AffineCover.FarkasData := farkasReceipts0 ++ farkasReceipts1 ++ farkasReceipts2 ++ farkasReceipts3 ++ farkasReceipts4 ++ farkasReceipts5 ++ farkasReceipts6 ++ farkasReceipts7 ++ farkasReceipts8 +/-- Existing receipt blocks with their checked sizes, avoiding repeated prefix traversal. -/ +def farkasReceiptChunks : List (ℕ × List Certificate.AffineCover.FarkasData) := + [(128, farkasReceipts0), + (128, farkasReceipts1), + (128, farkasReceipts2), + (128, farkasReceipts3), + (128, farkasReceipts4), + (128, farkasReceipts5), + (128, farkasReceipts6), + (128, farkasReceipts7), + (50, farkasReceipts8)] + +private theorem farkasReceiptChunks_sizes : + ∀ chunk ∈ farkasReceiptChunks, chunk.1 = chunk.2.length := by + intro chunk hMem + simp only [farkasReceiptChunks, List.mem_cons, List.not_mem_nil, or_false] at hMem + rcases hMem with rfl | rfl | rfl | rfl | rfl | rfl | rfl | rfl | rfl <;> rfl + +/-- Block lookup keeps the original table, order, and out-of-range default. -/ +def farkasReceiptLookup (index : ℕ) : Certificate.AffineCover.FarkasData := + List.lookupChunks farkasReceiptChunks index { terms := [] } + +theorem farkasReceiptLookup_eq_getD (index : ℕ) : + farkasReceiptLookup index = farkasReceipts.getD index { terms := [] } := by + have hTable : farkasReceiptChunks.flatMap Prod.snd = farkasReceipts := by + simp only [farkasReceiptChunks, List.flatMap_cons, List.flatMap_nil, List.append_nil, + List.append_assoc, farkasReceipts] + have hLookup := List.lookupChunks_eq_getD_flatMap farkasReceiptChunks + farkasReceiptChunks_sizes index { terms := [] } + rw [hTable] at hLookup + exact hLookup + end AtanasovRanganathan.GenusFiveRow06FixedCover diff --git a/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow06FixedCover.lean b/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow06FixedCover.lean index 6c34d6a9e4..63afaaa604 100644 --- a/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow06FixedCover.lean +++ b/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow06FixedCover.lean @@ -14,6 +14,7 @@ public import LeanPool.BrillNoetherGraphs.LowGenus.GenusFiveRow06CoverCells3 public import LeanPool.BrillNoetherGraphs.LowGenus.GenusFiveRow06CoverCells4 public import LeanPool.BrillNoetherGraphs.LowGenus.GenusFiveRow06Symmetry public import LeanPool.BrillNoetherGraphs.LowGenus.GenusFiveRow06CoverReceipts +import LeanPool.BrillNoetherGraphs.LowGenus.CompactCellTreeLookup /-! **Independent generated check.** This module provides an additional generated proof of row 06 and is not imported by the main `LowGenus` root. @@ -186,12 +187,21 @@ def treePart0 : CompactCellTree := 109, 110, 111, 112, 113, 114]) (.absurd 115)))))) +private theorem treePart0_check_chunked : + treePart0.checkLookup splitForms farkasReceiptLookup cells + ((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, + 0, 1, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, + -1, 0, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart0_check : treePart0.check splitForms farkasReceipts cells ((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart0_check_chunked /-- Subtree splitting on `- 2 * length[4] + length[7]` in the row-06 symmetry chamber, with leaves selecting cells 0, 6, 7, 8, 9, 10 and Farkas receipts excluding inconsistent sign @@ -217,26 +227,46 @@ def treePart1 : CompactCellTree := 158, 159, 160, 161, 162, 163, 164, 165]) (.absurd 166))))))) +private theorem treePart1_check_chunked : + treePart1.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, + 0, 1, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, + 0]]) = true := by + decide +kernel + theorem treePart1_check : treePart1.check splitForms farkasReceipts cells (((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart1_check_chunked /-- Contradiction leaf using Farkas receipt 167 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart2 : CompactCellTree := .absurd 167 +private theorem treePart2_check_chunked : + treePart2.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, + 0, 1, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, + -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart2_check : treePart2.check splitForms farkasReceipts cells ((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart2_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 11, 12, 13, 14, 15 and Farkas receipts excluding inconsistent sign @@ -257,6 +287,16 @@ def treePart3 : CompactCellTree := 177, 178, 165, 160, 161, 162, 163]) (.absurd 179))))) +private theorem treePart3_check_chunked : + treePart3.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, + 0, 0, 1, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + -1, 0, 0, 2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart3_check : treePart3.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, @@ -265,13 +305,26 @@ theorem treePart3_check : [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart3_check_chunked /-- Contradiction leaf using Farkas receipt 180 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart4 : CompactCellTree := .absurd 180 +private theorem treePart4_check_chunked : + treePart4.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, + 0, 0, 1, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + -2, 0, 0, 2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart4_check : treePart4.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, @@ -281,7 +334,9 @@ theorem treePart4_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart4_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 16, 17, 18, 19, 20 and Farkas receipts excluding inconsistent sign @@ -304,6 +359,18 @@ def treePart5 : CompactCellTree := 225, 226, 227, 228, 229, 230, 231, 232, 233]) (.absurd 234))))) +private theorem treePart5_check_chunked : + treePart5.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, + 0, 0, 1, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 1, -1, 0, -2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart5_check : treePart5.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, @@ -314,7 +381,9 @@ theorem treePart5_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 1, -1, 0, -2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart5_check_chunked /-- Subtree splitting on `2 * length[4] - length[5] - 2 * length[7]` in the row-06 symmetry chamber, with leaves selecting cells 21, 22, 23, 24, 25, 26, 27, 28, 29, 30 and Farkas receipts @@ -356,6 +425,18 @@ def treePart6 : CompactCellTree := (.absurd 299)))))) (.absurd 300)) +private theorem treePart6_check_chunked : + treePart6.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, + 0, 0, 1, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, -1, 0, -2, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart6_check : treePart6.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, @@ -366,7 +447,9 @@ theorem treePart6_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, -1, 0, -2, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart6_check_chunked /-- Subtree splitting on `- 2 * length[8] + length[9]` in the row-06 symmetry chamber, with leaves selecting cells 0, 31, 32, 33, 34, 35 and Farkas receipts excluding inconsistent sign @@ -392,26 +475,46 @@ def treePart7 : CompactCellTree := 158, 159, 160, 309, 163, 165, 162, 310]) (.absurd 311))))))) +private theorem treePart7_check_chunked : + treePart7.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, + 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0])]) ++ + [aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, + 0]]) = true := by + decide +kernel + theorem treePart7_check : treePart7.check splitForms farkasReceipts cells (((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart7_check_chunked /-- Contradiction leaf using Farkas receipt 312 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart8 : CompactCellTree := .absurd 312 +private theorem treePart8_check_chunked : + treePart8.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, + 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0])]) ++ + [aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, + 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0]]) = true := by + decide +kernel + theorem treePart8_check : treePart8.check splitForms farkasReceipts cells ((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart8_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 36, 37, 38, 39, 40 and Farkas receipts excluding inconsistent sign @@ -432,6 +535,15 @@ def treePart9 : CompactCellTree := 177, 178, 165, 160, 163, 162, 310]) (.absurd 179))))) +private theorem treePart9_check_chunked : + treePart9.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, + 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0])]) + ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, + -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, + 1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0]]) = true := by + decide +kernel + theorem treePart9_check : treePart9.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, @@ -439,13 +551,25 @@ theorem treePart9_check : ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart9_check_chunked /-- Contradiction leaf using Farkas receipt 313 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart10 : CompactCellTree := .absurd 313 +private theorem treePart10_check_chunked : + treePart10.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, + 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0])]) + ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, + -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, + 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0]]) = true := by + decide +kernel + theorem treePart10_check : treePart10.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, @@ -454,7 +578,9 @@ theorem treePart10_check : -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart10_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 41, 42, 43, 44, 45 and Farkas receipts excluding inconsistent sign @@ -477,6 +603,17 @@ def treePart11 : CompactCellTree := 225, 226, 227, 228, 231, 321, 322, 230, 323]) (.absurd 234))))) +private theorem treePart11_check_chunked : + treePart11.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, + 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0])]) + ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, + -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, + 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, -2, -1, 0]]) = true := by + decide +kernel + theorem treePart11_check : treePart11.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, @@ -486,7 +623,9 @@ theorem treePart11_check : 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart11_check_chunked /-- Subtree splitting on `2 * length[8] - 2 * length[9] - length[10]` in the row-06 symmetry chamber, with leaves selecting cells 46, 47, 48, 49, 50, 51, 52, 53, 54 and Farkas receipts @@ -533,6 +672,17 @@ def treePart12 : CompactCellTree := (.absurd 338)) (.absurd 264)))))) +private theorem treePart12_check_chunked : + treePart12.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, + 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0])]) + ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, + -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, + 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) = true := by + decide +kernel + theorem treePart12_check : treePart12.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, @@ -542,20 +692,32 @@ theorem treePart12_check : 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart12_check_chunked /-- Contradiction leaf using Farkas receipt 339 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart13 : CompactCellTree := .absurd 339 +private theorem treePart13_check_chunked : + treePart13.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, + 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, + -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0]]) = true := by + decide +kernel + theorem treePart13_check : treePart13.check splitForms farkasReceipts cells ((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart13_check_chunked /-- Subtree splitting on `- 2 * length[4] + length[7]` in the row-06 symmetry chamber, with leaves selecting cells 31, 55, 56, 57, 58, 59 and Farkas receipts excluding inconsistent sign @@ -582,6 +744,15 @@ def treePart14 : CompactCellTree := 224, 344, 228, 269, 230, 231, 345, 227]) (.absurd 346))))))) +private theorem treePart14_check_chunked : + treePart14.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, + 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0])]) + ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, + -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, + 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0]]) = true := by + decide +kernel + theorem treePart14_check : treePart14.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, @@ -589,13 +760,25 @@ theorem treePart14_check : ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart14_check_chunked /-- Contradiction leaf using Farkas receipt 347 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart15 : CompactCellTree := .absurd 347 +private theorem treePart15_check_chunked : + treePart15.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, + 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0])]) + ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, + -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ [aff [0, + 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0]]) = true := by + decide +kernel + theorem treePart15_check : treePart15.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, @@ -604,7 +787,9 @@ theorem treePart15_check : -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart15_check_chunked /-- Subtree splitting on `- 2 * length[4] + length[7]` in the row-06 symmetry chamber, with leaves selecting cells 32, 60, 61, 62, 63, 64 and Farkas receipts excluding inconsistent sign @@ -633,6 +818,17 @@ def treePart16 : CompactCellTree := 289, 353, 293, 354, 355, 356, 295, 298, 357, 292]) (.absurd 358))))))) +private theorem treePart16_check_chunked : + treePart16.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, + 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0])]) + ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, + -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, -2, -1, 0]]) = true := by + decide +kernel + theorem treePart16_check : treePart16.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, @@ -642,13 +838,27 @@ theorem treePart16_check : 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart16_check_chunked /-- Contradiction leaf using Farkas receipt 359 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart17 : CompactCellTree := .absurd 359 +private theorem treePart17_check_chunked : + treePart17.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, + 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, + -2, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, -2, 0, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart17_check : treePart17.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -659,7 +869,9 @@ theorem treePart17_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart17_check_chunked /-- Subtree splitting on `2 * length[8] - 2 * length[9] - length[10]` in the row-06 symmetry chamber, with leaves selecting cells 65, 66, 67 and Farkas receipts excluding inconsistent sign @@ -676,6 +888,19 @@ def treePart18 : CompactCellTree := 361, 269, 227, 230, 271]) (.absurd 362))) +private theorem treePart18_check_chunked : + treePart18.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, + 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, + -2, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + -1, 0, 0, 2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart18_check : treePart18.check splitForms farkasReceipts cells (((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -687,7 +912,9 @@ theorem treePart18_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart18_check_chunked /-- Subtree splitting on `- 2 * length[4] + 2 * length[7]` in the row-06 symmetry chamber, with leaves selecting cells 68, 69, 70, 71, 72, 73, 74, 75 and Farkas receipts excluding inconsistent @@ -727,6 +954,19 @@ def treePart19 : CompactCellTree := (.absurd 442))))) (.absurd 443)))) +private theorem treePart19_check_chunked : + treePart19.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, + 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, + -2, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart19_check : treePart19.check splitForms farkasReceipts cells (((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -738,13 +978,24 @@ theorem treePart19_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart19_check_chunked /-- Contradiction leaf using Farkas receipt 339 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart20 : CompactCellTree := .absurd 339 +private theorem treePart20_check_chunked : + treePart20.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, + 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -2, 1, 0, 0]]) = true := by + decide +kernel + theorem treePart20_check : treePart20.check splitForms farkasReceipts cells ((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, @@ -752,13 +1003,25 @@ theorem treePart20_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart20_check_chunked /-- Contradiction leaf using Farkas receipt 444 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart21 : CompactCellTree := .absurd 444 +private theorem treePart21_check_chunked : + treePart21.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, + 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0])]) + ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 2, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart21_check : treePart21.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, @@ -767,7 +1030,9 @@ theorem treePart21_check : [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart21_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 76, 77, 78, 79, 80 and Farkas receipts excluding inconsistent sign @@ -790,6 +1055,17 @@ def treePart22 : CompactCellTree := 225, 226, 227, 228, 269, 230, 231]) (.absurd 234))))) +private theorem treePart22_check_chunked : + treePart22.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, + 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0])]) + ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 2, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, + 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart22_check : treePart22.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, @@ -799,13 +1075,27 @@ theorem treePart22_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart22_check_chunked /-- Contradiction leaf using Farkas receipt 445 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart23 : CompactCellTree := .absurd 445 +private theorem treePart23_check_chunked : + treePart23.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 2, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, + 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart23_check : treePart23.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -816,7 +1106,9 @@ theorem treePart23_check : 0, 0, 0, 0, -1, 2, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart23_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 81, 82, 83, 84, 85 and Farkas receipts excluding inconsistent sign @@ -839,6 +1131,19 @@ def treePart24 : CompactCellTree := 290, 291, 292, 293, 296, 295, 298, 392, 393]) (.absurd 299))))) +private theorem treePart24_check_chunked : + treePart24.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 2, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 1, -1, 0, -2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart24_check : treePart24.check splitForms farkasReceipts cells (((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -850,7 +1155,9 @@ theorem treePart24_check : 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 1, -1, 0, -2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart24_check_chunked /-- Subtree splitting on `2 * length[4] - length[5] - 2 * length[7]` in the row-06 symmetry chamber, with leaves selecting cells 86, 87, 88, 89, 90, 91, 92, 93, 94, 95 and Farkas receipts @@ -892,6 +1199,19 @@ def treePart25 : CompactCellTree := (.absurd 468)))))) (.absurd 469)) +private theorem treePart25_check_chunked : + treePart25.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 2, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, -1, 0, -2, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart25_check : treePart25.check splitForms farkasReceipts cells (((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -903,13 +1223,26 @@ theorem treePart25_check : 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, -1, 0, -2, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart25_check_chunked /-- Contradiction leaf using Farkas receipt 347 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart26 : CompactCellTree := .absurd 347 +private theorem treePart26_check_chunked : + treePart26.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, + 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0])]) + ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -2, 2, 0, 0]]) = true := by + decide +kernel + theorem treePart26_check : treePart26.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, @@ -919,15 +1252,17 @@ theorem treePart26_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart26_check_chunked /-- Contradiction leaf using Farkas receipt 359 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart27 : CompactCellTree := .absurd 359 -theorem treePart27_check : - treePart27.check splitForms farkasReceipts cells +private theorem treePart27_check_chunked : + treePart27.checkLookup splitForms farkasReceiptLookup cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ @@ -938,7 +1273,21 @@ theorem treePart27_check : 0, 0, 0, 0, 1, -2, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0]]) = true := by decide +kernel -/-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with +theorem treePart27_check : + treePart27.check splitForms farkasReceipts cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, -2, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0]]) = true := by + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart27_check_chunked + +/-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 96, 97, 98, 99, 100 and Farkas receipts excluding inconsistent sign branches. -/ def treePart28 : CompactCellTree := @@ -959,6 +1308,19 @@ def treePart28 : CompactCellTree := 290, 291, 292, 293, 354, 355, 356, 295, 298]) (.absurd 299))))) +private theorem treePart28_check_chunked : + treePart28.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, -2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, + 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart28_check : treePart28.check splitForms farkasReceipts cells (((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -970,13 +1332,29 @@ theorem treePart28_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart28_check_chunked /-- Contradiction leaf using Farkas receipt 363 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart29 : CompactCellTree := .absurd 363 +private theorem treePart29_check_chunked : + treePart29.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, -2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, + 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart29_check : treePart29.check splitForms farkasReceipts cells ((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -989,7 +1367,9 @@ theorem treePart29_check : 0, 0, 0, 0, 1, -2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart29_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 101, 102, 103, 104, 105 and Farkas receipts excluding inconsistent sign @@ -1012,6 +1392,21 @@ def treePart30 : CompactCellTree := 463, 464, 419, 413, 465, 470, 471, 417, 467, 472, 473]) (.absurd 468))))) +private theorem treePart30_check_chunked : + treePart30.checkLookup splitForms farkasReceiptLookup cells + (((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, -2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 1, -1, 0, -2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart30_check : treePart30.check splitForms farkasReceipts cells (((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, @@ -1025,7 +1420,9 @@ theorem treePart30_check : 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 1, -1, 0, -2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart30_check_chunked /-- Subtree splitting on `2 * length[4] - length[5] - 2 * length[7]` in the row-06 symmetry chamber, with leaves selecting cells 106, 107, 108, 109, 110, 111, 112, 113, 114, 115 and Farkas @@ -1067,6 +1464,21 @@ def treePart31 : CompactCellTree := (.absurd 519)))))) (.absurd 520)) +private theorem treePart31_check_chunked : + treePart31.checkLookup splitForms farkasReceiptLookup cells + (((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, -2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, -1, 0, -2, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart31_check : treePart31.check splitForms farkasReceipts cells (((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, @@ -1080,13 +1492,28 @@ theorem treePart31_check : 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, -1, 0, -2, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart31_check_chunked /-- Contradiction leaf using Farkas receipt 521 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart32 : CompactCellTree := .absurd 521 +private theorem treePart32_check_chunked : + treePart32.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, 2, -2, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart32_check : treePart32.check splitForms farkasReceipts cells (((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -1098,7 +1525,9 @@ theorem treePart32_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart32_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 116, 117, 118, 119, 120 and Farkas receipts excluding inconsistent sign @@ -1121,6 +1550,20 @@ def treePart33 : CompactCellTree := 452, 453, 388, 381, 523, 383, 384, 385, 454]) (.absurd 455))))) +private theorem treePart33_check_chunked : + treePart33.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, 2, -2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, + 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart33_check : treePart33.check splitForms farkasReceipts cells ((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -1133,13 +1576,30 @@ theorem treePart33_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart33_check_chunked /-- Contradiction leaf using Farkas receipt 524 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart34 : CompactCellTree := .absurd 524 +private theorem treePart34_check_chunked : + treePart34.checkLookup splitForms farkasReceiptLookup cells + (((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, 2, -2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, + 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart34_check : treePart34.check splitForms farkasReceipts cells (((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, @@ -1153,13 +1613,31 @@ theorem treePart34_check : 0, 0, 0, 0, 0, 2, -2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart34_check_chunked /-- Contradiction leaf using Farkas receipt 525 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart35 : CompactCellTree := .absurd 525 +private theorem treePart35_check_chunked : + treePart35.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, 2, -2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, + 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 2, + -2, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart35_check : treePart35.check splitForms farkasReceipts cells ((((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, @@ -1174,7 +1652,9 @@ theorem treePart35_check : 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 2, -2, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart35_check_chunked /-- Subtree splitting on `length[4] - length[5] - 2 * length[7]` in the row-06 symmetry chamber, with leaves selecting cells 121, 122, 123 and Farkas receipts excluding inconsistent sign @@ -1191,6 +1671,23 @@ def treePart36 : CompactCellTree := 526, 470, 471, 417, 527, 528, 419]) (.absurd 529))) +private theorem treePart36_check_chunked : + treePart36.checkLookup splitForms farkasReceiptLookup cells + (((((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, 2, -2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, + 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 2, -2, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 2, + -1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart36_check : treePart36.check splitForms farkasReceipts cells (((((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, @@ -1206,7 +1703,9 @@ theorem treePart36_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 2, -2, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 2, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart36_check_chunked /-- Subtree splitting on `- length[0] - 2 * length[2] + length[3]` in the row-06 symmetry chamber, with leaves selecting cells 124, 125, 126, 127, 128, 129, 130, 131, 132 and Farkas @@ -1247,6 +1746,23 @@ def treePart37 : CompactCellTree := (.absurd 571)))) (.absurd 468))) +private theorem treePart37_check_chunked : + treePart37.checkLookup splitForms farkasReceiptLookup cells + (((((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, 2, -2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, + 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 2, -2, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 2, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart37_check : treePart37.check splitForms farkasReceipts cells (((((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, @@ -1262,13 +1778,29 @@ theorem treePart37_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 2, -2, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 2, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart37_check_chunked /-- Contradiction leaf using Farkas receipt 521 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart38 : CompactCellTree := .absurd 521 +private theorem treePart38_check_chunked : + treePart38.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, -2, 0, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart38_check : treePart38.check splitForms farkasReceipts cells (((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -1281,7 +1813,9 @@ theorem treePart38_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart38_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 133, 134, 135, 136, 137 and Farkas receipts excluding inconsistent sign @@ -1304,6 +1838,21 @@ def treePart39 : CompactCellTree := 463, 464, 419, 413, 573, 415, 527, 417, 467]) (.absurd 468))))) +private theorem treePart39_check_chunked : + treePart39.checkLookup splitForms farkasReceiptLookup cells + (((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 2, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart39_check : treePart39.check splitForms farkasReceipts cells (((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, @@ -1317,13 +1866,31 @@ theorem treePart39_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart39_check_chunked /-- Contradiction leaf using Farkas receipt 574 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart40 : CompactCellTree := .absurd 574 +private theorem treePart40_check_chunked : + treePart40.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 2, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, + 0])]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart40_check : treePart40.check splitForms farkasReceipts cells ((((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, @@ -1338,13 +1905,32 @@ theorem treePart40_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart40_check_chunked /-- Contradiction leaf using Farkas receipt 575 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart41 : CompactCellTree := .absurd 575 +private theorem treePart41_check_chunked : + treePart41.checkLookup splitForms farkasReceiptLookup cells + (((((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 2, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, + 0, 2, -2, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart41_check : treePart41.check splitForms farkasReceipts cells (((((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, @@ -1360,7 +1946,9 @@ theorem treePart41_check : 0, 0, 0, 0, -1, 2, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 2, -2, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart41_check_chunked /-- Subtree splitting on `length[4] - length[5] - 2 * length[7]` in the row-06 symmetry chamber, with leaves selecting cells 138, 139, 140 and Farkas receipts excluding inconsistent sign @@ -1377,6 +1965,24 @@ def treePart42 : CompactCellTree := 576, 436, 533, 438, 577, 534, 441]) (.absurd 535))) +private theorem treePart42_check_chunked : + treePart42.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 2, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 2, -2, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 2, + -1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart42_check : treePart42.check splitForms farkasReceipts cells ((((((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, @@ -1393,7 +1999,9 @@ theorem treePart42_check : 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 2, -2, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 2, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart42_check_chunked /-- Subtree splitting on `- length[0] - 2 * length[2] + length[3]` in the row-06 symmetry chamber, with leaves selecting cells 141, 142, 143, 144, 145, 146, 147, 148, 149 and Farkas @@ -1434,6 +2042,24 @@ def treePart43 : CompactCellTree := (.absurd 613)))) (.absurd 487))) +private theorem treePart43_check_chunked : + treePart43.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 2, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 2, -2, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 2, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart43_check : treePart43.check splitForms farkasReceipts cells ((((((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, @@ -1450,13 +2076,30 @@ theorem treePart43_check : 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 2, -2, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 2, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart43_check_chunked /-- Contradiction leaf using Farkas receipt 614 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart44 : CompactCellTree := .absurd 614 +private theorem treePart44_check_chunked : + treePart44.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 1])]) = true := by + decide +kernel + theorem treePart44_check : treePart44.check splitForms farkasReceipts cells ((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, @@ -1470,7 +2113,9 @@ theorem treePart44_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart44_check_chunked /-- Subtree splitting on `length[8] - 2 * length[9]` in the row-06 symmetry chamber, with leaves selecting cells 0, 150, 151, 152, 153, 154 and Farkas receipts excluding inconsistent sign @@ -1496,25 +2141,44 @@ def treePart45 : CompactCellTree := 139, 308, 625, 626, 145, 627, 143, 142]) (.absurd 628))))))) +private theorem treePart45_check_chunked : + treePart45.checkLookup splitForms farkasReceiptLookup cells + ((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, + 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0]]) ++ + [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart45_check : treePart45.check splitForms farkasReceipts cells ((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart45_check_chunked /-- Contradiction leaf using Farkas receipt 629 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart46 : CompactCellTree := .absurd 629 +private theorem treePart46_check_chunked : + treePart46.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, + 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, -2, 0, 0]]) = true := by + decide +kernel + theorem treePart46_check : treePart46.check splitForms farkasReceipts cells (((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart46_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 155, 156, 157, 158, 159 and Farkas receipts excluding inconsistent sign @@ -1535,6 +2199,15 @@ def treePart47 : CompactCellTree := 236, 635, 145, 625, 141, 143, 142]) (.absurd 636))))) +private theorem treePart47_check_chunked : + treePart47.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0]]) + ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 2, -1, 0, 0]]) = true := by + decide +kernel + theorem treePart47_check : treePart47.check splitForms farkasReceipts cells ((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -1542,13 +2215,25 @@ theorem treePart47_check : ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart47_check_chunked /-- Contradiction leaf using Farkas receipt 637 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart48 : CompactCellTree := .absurd 637 +private theorem treePart48_check_chunked : + treePart48.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0]]) + ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 2, -2, 0, 0]]) = true := by + decide +kernel + theorem treePart48_check : treePart48.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -1557,7 +2242,9 @@ theorem treePart48_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart48_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 160, 161, 162, 163, 164 and Farkas receipts excluding inconsistent sign @@ -1580,6 +2267,17 @@ def treePart49 : CompactCellTree := 328, 650, 205, 651, 652, 319, 653, 208, 207]) (.absurd 654))))) +private theorem treePart49_check_chunked : + treePart49.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0]]) + ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -2, 1, -1, 0]]) = true := by + decide +kernel + theorem treePart49_check : treePart49.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -1589,7 +2287,9 @@ theorem treePart49_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart49_check_chunked /-- Subtree splitting on `- 2 * length[8] + 2 * length[9] - length[10]` in the row-06 symmetry chamber, with leaves selecting cells 165, 166, 167, 168, 169, 170, 171, 172, 173, 174 and Farkas @@ -1631,6 +2331,17 @@ def treePart50 : CompactCellTree := (.absurd 264)))))) (.absurd 673)) +private theorem treePart50_check_chunked : + treePart50.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0]]) + ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) = true := by + decide +kernel + theorem treePart50_check : treePart50.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -1640,20 +2351,32 @@ theorem treePart50_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart50_check_chunked /-- Contradiction leaf using Farkas receipt 629 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart51 : CompactCellTree := .absurd 629 +private theorem treePart51_check_chunked : + treePart51.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, + 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, + 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, 1, -2, 0, 0]]) = true := by + decide +kernel + theorem treePart51_check : treePart51.check splitForms farkasReceipts cells (((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart51_check_chunked /-- Subtree splitting on `- 2 * length[4] + length[7]` in the row-06 symmetry chamber, with leaves selecting cells 150, 175, 176, 177, 178, 179 and Farkas receipts excluding inconsistent @@ -1679,6 +2402,15 @@ def treePart52 : CompactCellTree := 202, 320, 664, 206, 208, 651, 677, 205]) (.absurd 678))))))) +private theorem treePart52_check_chunked : + treePart52.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, + 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 2, -1, 0, 0]]) = true := by + decide +kernel + theorem treePart52_check : treePart52.check splitForms farkasReceipts cells ((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -1686,13 +2418,25 @@ theorem treePart52_check : 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart52_check_chunked /-- Contradiction leaf using Farkas receipt 637 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart53 : CompactCellTree := .absurd 637 +private theorem treePart53_check_chunked : + treePart53.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, + 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 2, -2, 0, 0]]) = true := by + decide +kernel + theorem treePart53_check : treePart53.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -1701,7 +2445,9 @@ theorem treePart53_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart53_check_chunked /-- Subtree splitting on `- 2 * length[4] + length[7]` in the row-06 symmetry chamber, with leaves selecting cells 151, 180, 181, 182, 183, 184 and Farkas receipts excluding inconsistent @@ -1730,6 +2476,17 @@ def treePart54 : CompactCellTree := 254, 326, 684, 685, 325, 686, 260, 261, 687, 257]) (.absurd 688))))))) +private theorem treePart54_check_chunked : + treePart54.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, + 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -2, 1, -1, 0]]) = true := by + decide +kernel + theorem treePart54_check : treePart54.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -1739,7 +2496,9 @@ theorem treePart54_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart54_check_chunked /-- Subtree splitting on `- 2 * length[4] + length[7]` in the row-06 symmetry chamber, with leaves selecting cells 152, 185, 186, 187, 188, 189 and Farkas receipts excluding inconsistent @@ -1768,6 +2527,18 @@ def treePart55 : CompactCellTree := 289, 337, 354, 690, 356, 691, 295, 298, 357, 292]) (.absurd 692))))))) +private theorem treePart55_check_chunked : + treePart55.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, + 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, -2, 2, -1, 0]]) = true := by + decide +kernel + theorem treePart55_check : treePart55.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -1778,7 +2549,9 @@ theorem treePart55_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, -1, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart55_check_chunked /-- Subtree splitting on `- 2 * length[4] + length[7]` in the row-06 symmetry chamber, with leaves selecting cells 190, 191, 192, 193, 194 and Farkas receipts excluding inconsistent sign @@ -1810,6 +2583,18 @@ def treePart56 : CompactCellTree := (.absurd 709))))))) (.absurd 710))) +private theorem treePart56_check_chunked : + treePart56.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, + 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, -1, 0])]) = true := by + decide +kernel + theorem treePart56_check : treePart56.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -1820,26 +2605,48 @@ theorem treePart56_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, -1, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart56_check_chunked /-- Contradiction leaf using Farkas receipt 629 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart57 : CompactCellTree := .absurd 629 +private theorem treePart57_check_chunked : + treePart57.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, + 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, + 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) + ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0]]) = true := by + decide +kernel + theorem treePart57_check : treePart57.check splitForms farkasReceipts cells (((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart57_check_chunked /-- Contradiction leaf using Farkas receipt 711 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart58 : CompactCellTree := .absurd 711 +private theorem treePart58_check_chunked : + treePart58.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, + 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ [aff [0, 0, + 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0]]) = true + := by + decide +kernel + theorem treePart58_check : treePart58.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -1848,7 +2655,9 @@ theorem treePart58_check : 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart58_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 195, 196, 197, 198, 199 and Farkas receipts excluding inconsistent sign @@ -1870,6 +2679,16 @@ def treePart59 : CompactCellTree := 328, 650, 205, 664, 206, 208, 651]) (.absurd 654))))) +private theorem treePart59_check_chunked : + treePart59.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, + 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ [aff [0, 0, + 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, + 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart59_check : treePart59.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -1878,13 +2697,26 @@ theorem treePart59_check : 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart59_check_chunked /-- Contradiction leaf using Farkas receipt 712 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart60 : CompactCellTree := .absurd 712 +private theorem treePart60_check_chunked : + treePart60.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, + 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ [aff [0, 0, + 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, + 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ + [aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart60_check : treePart60.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -1894,7 +2726,9 @@ theorem treePart60_check : 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart60_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 200, 201, 202, 203, 204 and Farkas receipts excluding inconsistent sign @@ -1917,6 +2751,18 @@ def treePart61 : CompactCellTree := 255, 256, 257, 670, 258, 260, 261, 262, 263]) (.absurd 264))))) +private theorem treePart61_check_chunked : + treePart61.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ [aff [0, + 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, + 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 1, -1, 0, -2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart61_check : treePart61.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation @@ -1927,7 +2773,9 @@ theorem treePart61_check : 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 1, -1, 0, -2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart61_check_chunked /-- Subtree splitting on `2 * length[4] - length[5] - 2 * length[7]` in the row-06 symmetry chamber, with leaves selecting cells 205, 206, 207, 208, 209, 210, 211, 212, 213, 214 and Farkas @@ -1969,6 +2817,18 @@ def treePart62 : CompactCellTree := (.absurd 455)))))) (.absurd 719)) +private theorem treePart62_check_chunked : + treePart62.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ [aff [0, + 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, + 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, -1, 0, -2, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart62_check : treePart62.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation @@ -1979,13 +2839,25 @@ theorem treePart62_check : 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, -1, 0, -2, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart62_check_chunked /-- Contradiction leaf using Farkas receipt 637 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart63 : CompactCellTree := .absurd 637 +private theorem treePart63_check_chunked : + treePart63.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, + 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 2, -2, 0, 0]]) = true := by + decide +kernel + theorem treePart63_check : treePart63.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -1994,13 +2866,26 @@ theorem treePart63_check : 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart63_check_chunked /-- Contradiction leaf using Farkas receipt 720 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart64 : CompactCellTree := .absurd 720 +private theorem treePart64_check_chunked : + treePart64.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, + 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -2, 1, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart64_check : treePart64.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff @@ -2010,7 +2895,9 @@ theorem treePart64_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart64_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 215, 216, 217, 218, 219 and Farkas receipts excluding inconsistent sign @@ -2033,6 +2920,18 @@ def treePart65 : CompactCellTree := 255, 256, 257, 684, 685, 325, 686, 260, 261]) (.absurd 264))))) +private theorem treePart65_check_chunked : + treePart65.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -2, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, + 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart65_check : treePart65.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation @@ -2043,13 +2942,28 @@ theorem treePart65_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart65_check_chunked /-- Contradiction leaf using Farkas receipt 721 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart66 : CompactCellTree := .absurd 721 +private theorem treePart66_check_chunked : + treePart66.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -2, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, + 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart66_check : treePart66.check splitForms farkasReceipts cells (((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation @@ -2061,7 +2975,9 @@ theorem treePart66_check : 0, 0, 0, 0, -2, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart66_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 220, 221, 222, 223, 224 and Farkas receipts excluding inconsistent sign @@ -2084,6 +3000,20 @@ def treePart67 : CompactCellTree := 452, 453, 388, 717, 723, 384, 724, 385, 454, 397, 398]) (.absurd 455))))) +private theorem treePart67_check_chunked : + treePart67.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -2, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 1, -1, 0, -2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart67_check : treePart67.check splitForms farkasReceipts cells ((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation @@ -2096,7 +3026,9 @@ theorem treePart67_check : 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 1, -1, 0, -2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart67_check_chunked /-- Subtree splitting on `2 * length[4] - length[5] - 2 * length[7]` in the row-06 symmetry chamber, with leaves selecting cells 225, 226, 227, 228, 229, 230, 231, 232, 233, 234 and Farkas @@ -2138,6 +3070,20 @@ def treePart68 : CompactCellTree := (.absurd 487)))))) (.absurd 735)) +private theorem treePart68_check_chunked : + treePart68.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -2, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, -1, 0, -2, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart68_check : treePart68.check splitForms farkasReceipts cells ((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation @@ -2150,13 +3096,27 @@ theorem treePart68_check : 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, -1, 0, -2, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart68_check_chunked /-- Contradiction leaf using Farkas receipt 693 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart69 : CompactCellTree := .absurd 693 +private theorem treePart69_check_chunked : + treePart69.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, -2, 2, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart69_check : treePart69.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation @@ -2167,7 +3127,9 @@ theorem treePart69_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart69_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 235, 236, 237, 238, 239 and Farkas receipts excluding inconsistent sign @@ -2190,6 +3152,19 @@ def treePart70 : CompactCellTree := 290, 291, 292, 354, 690, 356, 691, 295, 298]) (.absurd 299))))) +private theorem treePart70_check_chunked : + treePart70.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, -2, 2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, + 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart70_check : treePart70.check splitForms farkasReceipts cells (((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation @@ -2201,13 +3176,29 @@ theorem treePart70_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart70_check_chunked /-- Contradiction leaf using Farkas receipt 736 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart71 : CompactCellTree := .absurd 736 +private theorem treePart71_check_chunked : + treePart71.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, -2, 2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, + 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart71_check : treePart71.check splitForms farkasReceipts cells ((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation @@ -2220,7 +3211,9 @@ theorem treePart71_check : 0, 0, 0, 0, 0, -2, 2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart71_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 240, 241, 242, 243, 244 and Farkas receipts excluding inconsistent sign @@ -2243,6 +3236,21 @@ def treePart72 : CompactCellTree := 463, 464, 419, 465, 726, 471, 738, 417, 467, 472, 473]) (.absurd 468))))) +private theorem treePart72_check_chunked : + treePart72.checkLookup splitForms farkasReceiptLookup cells + (((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, -2, 2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, + 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 1, -1, 0, -2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart72_check : treePart72.check splitForms farkasReceipts cells (((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation @@ -2256,7 +3264,9 @@ theorem treePart72_check : 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 1, -1, 0, -2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart72_check_chunked /-- Subtree splitting on `2 * length[4] - length[5] - 2 * length[7]` in the row-06 symmetry chamber, with leaves selecting cells 245, 246, 247, 248, 249, 250, 251, 252, 253 and Farkas @@ -2303,6 +3313,21 @@ def treePart73 : CompactCellTree := (.absurd 746)) (.absurd 487)))))) +private theorem treePart73_check_chunked : + treePart73.checkLookup splitForms farkasReceiptLookup cells + (((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, -2, 2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, + 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, -1, 0, -2, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart73_check : treePart73.check splitForms farkasReceipts cells (((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation @@ -2316,13 +3341,28 @@ theorem treePart73_check : 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, -1, 0, -2, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart73_check_chunked /-- Contradiction leaf using Farkas receipt 693 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart74 : CompactCellTree := .absurd 693 +private theorem treePart74_check_chunked : + treePart74.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, -2, 0, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart74_check : treePart74.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation @@ -2334,7 +3374,9 @@ theorem treePart74_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart74_check_chunked /-- Subtree splitting on `2 * length[8] - length[9] + length[11]` in the row-06 symmetry chamber, with leaves selecting cells 254, 255, 256, 257, 258 and Farkas receipts excluding @@ -2359,6 +3401,20 @@ def treePart75 : CompactCellTree := (.absurd 455)))))) (.absurd 747) +private theorem treePart75_check_chunked : + treePart75.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + -1, 0, 0, 2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart75_check : treePart75.check splitForms farkasReceipts cells (((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation @@ -2371,13 +3427,30 @@ theorem treePart75_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart75_check_chunked /-- Contradiction leaf using Farkas receipt 736 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart76 : CompactCellTree := .absurd 736 +private theorem treePart76_check_chunked : + treePart76.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + -2, 0, 0, 2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart76_check : treePart76.check splitForms farkasReceipts cells ((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation @@ -2391,7 +3464,9 @@ theorem treePart76_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart76_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 259, 260, 261, 262, 263 and Farkas receipts excluding inconsistent sign @@ -2414,6 +3489,22 @@ def treePart77 : CompactCellTree := 479, 480, 441, 748, 749, 577, 750, 438, 484, 485, 486]) (.absurd 487))))) +private theorem treePart77_check_chunked : + treePart77.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 2, -1, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 1, -1, 0, -2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart77_check : treePart77.check splitForms farkasReceipts cells ((((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation @@ -2428,7 +3519,9 @@ theorem treePart77_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, 1, -1, 0, -2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart77_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 264, 265, 266, 267, 268, 269, 270, 271 and Farkas receipts excluding @@ -2470,6 +3563,23 @@ def treePart78 : CompactCellTree := (.absurd 761))) (.absurd 487))))) +private theorem treePart78_check_chunked : + treePart78.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 2, -1, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, -1, 0, -2, 0, 0, + 0, 0])]) = true := by + decide +kernel + theorem treePart78_check : treePart78.check splitForms farkasReceipts cells ((((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation @@ -2485,13 +3595,31 @@ theorem treePart78_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, -1, 0, -2, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart78_check_chunked /-- Contradiction leaf using Farkas receipt 762 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart79 : CompactCellTree := .absurd 762 +private theorem treePart79_check_chunked : + treePart79.checkLookup splitForms farkasReceiptLookup cells + (((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + -1, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 1])]) = true := by + decide +kernel + theorem treePart79_check : treePart79.check splitForms farkasReceipts cells (((((((((((((base ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation @@ -2506,7 +3634,9 @@ theorem treePart79_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, 0, 0, 2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart79_check_chunked /-- Subtree splitting on `length[4] - 2 * length[7]` in the row-06 symmetry chamber, with leaves selecting cells 0, 272, 273, 274, 275 and Farkas receipts excluding inconsistent sign branches. -/ @@ -2528,25 +3658,44 @@ def treePart80 : CompactCellTree := 114, 111, 112, 771, 634, 110, 772]) (.absurd 773)))))) +private theorem treePart80_check_chunked : + treePart80.checkLookup splitForms farkasReceiptLookup cells + ((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, + 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0]]) ++ + [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart80_check : treePart80.check splitForms farkasReceipts cells ((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0]]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart80_check_chunked /-- Contradiction leaf using Farkas receipt 774 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart81 : CompactCellTree := .absurd 774 +private theorem treePart81_check_chunked : + treePart81.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0]]) + ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, + 0, 1, 0, 0, -2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart81_check : treePart81.check splitForms farkasReceipts cells (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart81_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 276, 277, 278, 279, 280 and Farkas receipts excluding inconsistent sign @@ -2567,6 +3716,15 @@ def treePart82 : CompactCellTree := 236, 635, 145, 141, 142, 625, 143]) (.absurd 636))))) +private theorem treePart82_check_chunked : + treePart82.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0]]) + ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 2, 0, 0, -1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart82_check : treePart82.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff @@ -2574,13 +3732,25 @@ theorem treePart82_check : ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart82_check_chunked /-- Contradiction leaf using Farkas receipt 775 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart83 : CompactCellTree := .absurd 775 +private theorem treePart83_check_chunked : + treePart83.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0]]) + ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 2, 0, 0, -2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart83_check : treePart83.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff @@ -2589,7 +3759,9 @@ theorem treePart83_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart83_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 281, 282, 283, 284, 285 and Farkas receipts excluding inconsistent sign @@ -2612,6 +3784,17 @@ def treePart84 : CompactCellTree := 328, 650, 205, 206, 207, 211, 783, 651, 784]) (.absurd 654))))) +private theorem treePart84_check_chunked : + treePart84.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0]]) + ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + -2, -1, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart84_check : treePart84.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff @@ -2621,7 +3804,9 @@ theorem treePart84_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -2, -1, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart84_check_chunked /-- Subtree splitting on `- 2 * length[4] - length[5] + 2 * length[7]` in the row-06 symmetry chamber, with leaves selecting cells 286, 287, 288, 289, 290, 291, 292, 293, 294, 295 and Farkas @@ -2663,6 +3848,17 @@ def treePart85 : CompactCellTree := (.absurd 264)))))) (.absurd 773)) +private theorem treePart85_check_chunked : + treePart85.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0]]) + ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, -1, 0, 1, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart85_check : treePart85.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff @@ -2672,20 +3868,32 @@ theorem treePart85_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, -1, 0, 1, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart85_check_chunked /-- Contradiction leaf using Farkas receipt 801 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart86 : CompactCellTree := .absurd 801 +private theorem treePart86_check_chunked : + treePart86.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, + 0, 0, -1, 1, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, -2, 1, 0, 0]]) = true := by + decide +kernel + theorem treePart86_check : treePart86.check splitForms farkasReceipts cells (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart86_check_chunked /-- Subtree splitting on `length[4] - 2 * length[7]` in the row-06 symmetry chamber, with leaves selecting cells 31, 296, 297, 298, 299 and Farkas receipts excluding inconsistent sign branches. -/ @@ -2707,6 +3915,15 @@ def treePart87 : CompactCellTree := 158, 310, 160, 661, 807, 647, 165, 808]) (.absurd 809)))))) +private theorem treePart87_check_chunked : + treePart87.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, + 0, 0, -1, 1, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 2, 0, 0]]) = true := by + decide +kernel + theorem treePart87_check : treePart87.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff @@ -2714,13 +3931,25 @@ theorem treePart87_check : 0, 0, -1, 1, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart87_check_chunked /-- Contradiction leaf using Farkas receipt 810 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart88 : CompactCellTree := .absurd 810 +private theorem treePart88_check_chunked : + treePart88.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, + 0, 0, -1, 1, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -2, 2, 0, 0]]) = true := by + decide +kernel + theorem treePart88_check : treePart88.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff @@ -2729,7 +3958,9 @@ theorem treePart88_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart88_check_chunked /-- Subtree splitting on `length[4] - 2 * length[7]` in the row-06 symmetry chamber, with leaves selecting cells 32, 300, 301, 302, 303 and Farkas receipts excluding inconsistent sign branches. -/ @@ -2753,6 +3984,17 @@ def treePart89 : CompactCellTree := 224, 323, 228, 681, 321, 322, 816, 241, 227, 817]) (.absurd 818)))))) +private theorem treePart89_check_chunked : + treePart89.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, + 0, 0, -1, 1, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, -2, -1, 0]]) = true := by + decide +kernel + theorem treePart89_check : treePart89.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff @@ -2762,7 +4004,9 @@ theorem treePart89_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart89_check_chunked /-- Subtree splitting on `length[4] - 2 * length[7]` in the row-06 symmetry chamber, with leaves selecting cells 304, 305, 306, 307, 308, 309, 310, 311 and Farkas receipts excluding @@ -2808,6 +4052,17 @@ def treePart90 : CompactCellTree := (.absurd 836)))))) (.absurd 311)))) +private theorem treePart90_check_chunked : + treePart90.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, + 0, 0, -1, 1, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) = true := by + decide +kernel + theorem treePart90_check : treePart90.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff @@ -2817,26 +4072,48 @@ theorem treePart90_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart90_check_chunked /-- Contradiction leaf using Farkas receipt 801 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart91 : CompactCellTree := .absurd 801 +private theorem treePart91_check_chunked : + treePart91.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, + 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, + 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0]]) = true := by + decide +kernel + theorem treePart91_check : treePart91.check splitForms farkasReceipts cells (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart91_check_chunked /-- Contradiction leaf using Farkas receipt 837 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart92 : CompactCellTree := .absurd 837 +private theorem treePart92_check_chunked : + treePart92.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, + 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ [aff [0, 0, + 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0]]) = true + := by + decide +kernel + theorem treePart92_check : treePart92.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff @@ -2845,7 +4122,9 @@ theorem treePart92_check : 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart92_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 312, 313, 314, 315, 316 and Farkas receipts excluding inconsistent sign @@ -2867,6 +4146,16 @@ def treePart93 : CompactCellTree := 328, 650, 205, 206, 664, 651, 208]) (.absurd 654))))) +private theorem treePart93_check_chunked : + treePart93.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, + 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ [aff [0, 0, + 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, + 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart93_check : treePart93.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff @@ -2875,13 +4164,26 @@ theorem treePart93_check : 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart93_check_chunked /-- Contradiction leaf using Farkas receipt 838 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart94 : CompactCellTree := .absurd 838 +private theorem treePart94_check_chunked : + treePart94.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ [aff [0, + 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, + -2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) + ++ [aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart94_check : treePart94.check splitForms farkasReceipts cells (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -2891,7 +4193,9 @@ theorem treePart94_check : 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart94_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 317, 318, 319, 320, 321 and Farkas receipts excluding inconsistent sign @@ -2914,6 +4218,18 @@ def treePart95 : CompactCellTree := 255, 256, 257, 258, 670, 263, 830, 261, 843]) (.absurd 264))))) +private theorem treePart95_check_chunked : + treePart95.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ [aff [0, + 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, + -2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) + ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, + 0, -2, -1, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart95_check : treePart95.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -2924,7 +4240,9 @@ theorem treePart95_check : -2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -2, -1, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart95_check_chunked /-- Subtree splitting on `- 2 * length[4] - length[5] + 2 * length[7]` in the row-06 symmetry chamber, with leaves selecting cells 322, 323, 324, 325, 326, 327, 328, 329, 330, 331 and Farkas @@ -2966,6 +4284,18 @@ def treePart96 : CompactCellTree := (.absurd 455)))))) (.absurd 809)) +private theorem treePart96_check_chunked : + treePart96.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ [aff [0, + 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, + -2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) + ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, -1, 0, 1, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart96_check : treePart96.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -2976,13 +4306,25 @@ theorem treePart96_check : -2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, -1, 0, 1, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart96_check_chunked /-- Contradiction leaf using Farkas receipt 810 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart97 : CompactCellTree := .absurd 810 +private theorem treePart97_check_chunked : + treePart97.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, + 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -2, 2, 0, 0]]) = true := by + decide +kernel + theorem treePart97_check : treePart97.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff @@ -2991,13 +4333,26 @@ theorem treePart97_check : 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart97_check_chunked /-- Contradiction leaf using Farkas receipt 819 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart98 : CompactCellTree := .absurd 819 +private theorem treePart98_check_chunked : + treePart98.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, -2, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart98_check : treePart98.check splitForms farkasReceipts cells (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3007,7 +4362,9 @@ theorem treePart98_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart98_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 332, 333, 334, 335, 336 and Farkas receipts excluding inconsistent sign @@ -3030,6 +4387,18 @@ def treePart99 : CompactCellTree := 255, 256, 257, 258, 684, 324, 325, 261, 260]) (.absurd 264))))) +private theorem treePart99_check_chunked : + treePart99.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, -2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, + 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart99_check : treePart99.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3040,13 +4409,28 @@ theorem treePart99_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart99_check_chunked /-- Contradiction leaf using Farkas receipt 859 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart100 : CompactCellTree := .absurd 859 +private theorem treePart100_check_chunked : + treePart100.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, -2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, + 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart100_check : treePart100.check splitForms farkasReceipts cells (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3058,7 +4442,9 @@ theorem treePart100_check : 0, 0, 0, 0, 1, -2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart100_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 337, 338, 339, 340, 341 and Farkas receipts excluding inconsistent sign @@ -3081,6 +4467,20 @@ def treePart101 : CompactCellTree := 452, 453, 388, 381, 717, 383, 384, 398, 864, 454, 865]) (.absurd 455))))) +private theorem treePart101_check_chunked : + treePart101.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, -2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + -2, -1, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart101_check : treePart101.check splitForms farkasReceipts cells ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3093,7 +4493,9 @@ theorem treePart101_check : 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -2, -1, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart101_check_chunked /-- Subtree splitting on `- 2 * length[4] - length[5] + 2 * length[7]` in the row-06 symmetry chamber, with leaves selecting cells 342, 343, 344, 345, 346, 347, 348, 349, 350 and Farkas @@ -3140,6 +4542,20 @@ def treePart102 : CompactCellTree := (.absurd 883)) (.absurd 468)))))) +private theorem treePart102_check_chunked : + treePart102.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, -2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, -1, 0, 1, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart102_check : treePart102.check splitForms farkasReceipts cells ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3152,13 +4568,27 @@ theorem treePart102_check : 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, -1, 0, 1, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart102_check_chunked /-- Contradiction leaf using Farkas receipt 884 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart103 : CompactCellTree := .absurd 884 +private theorem treePart103_check_chunked : + treePart103.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, 2, -2, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart103_check : treePart103.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3169,7 +4599,9 @@ theorem treePart103_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart103_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 351, 352, 353, 354, 355 and Farkas receipts excluding inconsistent sign @@ -3192,6 +4624,19 @@ def treePart104 : CompactCellTree := 290, 291, 292, 293, 354, 355, 356, 298, 295]) (.absurd 299))))) +private theorem treePart104_check_chunked : + treePart104.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, 2, -2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, + 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart104_check : treePart104.check splitForms farkasReceipts cells (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3203,13 +4648,29 @@ theorem treePart104_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart104_check_chunked /-- Contradiction leaf using Farkas receipt 885 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart105 : CompactCellTree := .absurd 885 +private theorem treePart105_check_chunked : + treePart105.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, 2, -2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, + 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart105_check : treePart105.check splitForms farkasReceipts cells ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3222,7 +4683,9 @@ theorem treePart105_check : 0, 0, 0, 0, 0, 2, -2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart105_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 356, 357, 358, 359, 360 and Farkas receipts excluding inconsistent sign @@ -3245,6 +4708,21 @@ def treePart106 : CompactCellTree := 463, 464, 419, 413, 465, 470, 471, 473, 870, 467, 890]) (.absurd 468))))) +private theorem treePart106_check_chunked : + treePart106.checkLookup splitForms farkasReceiptLookup cells + (((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, 2, -2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, + 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + -2, -1, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart106_check : treePart106.check splitForms farkasReceipts cells (((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3258,7 +4736,9 @@ theorem treePart106_check : 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -2, -1, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart106_check_chunked /-- Subtree splitting on `- 2 * length[4] - length[5] + 2 * length[7]` in the row-06 symmetry chamber, with leaves selecting cells 361, 362, 363, 364, 365, 366, 367, 368, 369, 370 and Farkas @@ -3300,6 +4780,21 @@ def treePart107 : CompactCellTree := (.absurd 519)))))) (.absurd 826)) +private theorem treePart107_check_chunked : + treePart107.checkLookup splitForms farkasReceiptLookup cells + (((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, 2, -2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, + 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, -1, 0, 1, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart107_check : treePart107.check splitForms farkasReceipts cells (((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3313,13 +4808,28 @@ theorem treePart107_check : 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, -1, 0, 1, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart107_check_chunked /-- Contradiction leaf using Farkas receipt 884 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart108 : CompactCellTree := .absurd 884 +private theorem treePart108_check_chunked : + treePart108.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, 1, 0, 0, -2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart108_check : treePart108.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3331,7 +4841,9 @@ theorem treePart108_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart108_check_chunked /-- Subtree splitting on `- length[8] + 2 * length[9] + length[11]` in the row-06 symmetry chamber, with leaves selecting cells 371, 372, 373, 374, 375 and Farkas receipts excluding @@ -3356,6 +4868,20 @@ def treePart109 : CompactCellTree := (.absurd 455)))))) (.absurd 912) +private theorem treePart109_check_chunked : + treePart109.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 2, 0, 0, -1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart109_check : treePart109.check splitForms farkasReceipts cells (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3368,13 +4894,30 @@ theorem treePart109_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart109_check_chunked /-- Contradiction leaf using Farkas receipt 885 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart110 : CompactCellTree := .absurd 885 +private theorem treePart110_check_chunked : + treePart110.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 2, 0, 0, -2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart110_check : treePart110.check splitForms farkasReceipts cells ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3388,7 +4931,9 @@ theorem treePart110_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart110_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 376, 377, 378, 379, 380 and Farkas receipts excluding inconsistent sign @@ -3411,6 +4956,22 @@ def treePart111 : CompactCellTree := 479, 480, 441, 434, 918, 748, 577, 486, 895, 484, 919]) (.absurd 487))))) +private theorem treePart111_check_chunked : + treePart111.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) + ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, + 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 2, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, -2, -1, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart111_check : treePart111.check splitForms farkasReceipts cells ((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) @@ -3425,7 +4986,9 @@ theorem treePart111_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 1]]) ++ [aff [0, 0, 0, 0, 0, -2, -1, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart111_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 381, 382, 383, 384, 385, 386, 387, 388 and Farkas receipts excluding @@ -3467,6 +5030,23 @@ def treePart112 : CompactCellTree := (.absurd 935))) (.absurd 487))))) +private theorem treePart112_check_chunked : + treePart112.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) + ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, + 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 2, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, -1, 0, 1, 0, 0, + 0, 0])]) = true := by + decide +kernel + theorem treePart112_check : treePart112.check splitForms farkasReceipts cells ((((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) @@ -3482,13 +5062,31 @@ theorem treePart112_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, -1, 0, 1, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart112_check_chunked /-- Contradiction leaf using Farkas receipt 936 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart113 : CompactCellTree := .absurd 936 +private theorem treePart113_check_chunked : + treePart113.checkLookup splitForms farkasReceiptLookup cells + (((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 1])]) = true := by + decide +kernel + theorem treePart113_check : treePart113.check splitForms farkasReceipts cells (((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3503,19 +5101,30 @@ theorem treePart113_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 2, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart113_check_chunked /-- Contradiction leaf using Farkas receipt 937 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart114 : CompactCellTree := .absurd 937 +private theorem treePart114_check_chunked : + treePart114.checkLookup splitForms farkasReceiptLookup cells + ((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [aff [0, 0, 0, 1, + -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0]]) = true := by + decide +kernel + theorem treePart114_check : treePart114.check splitForms farkasReceipts cells ((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart114_check_chunked /-- Subtree splitting on `length[4] - 2 * length[7]` in the row-06 symmetry chamber, with leaves selecting cells 150, 389, 390, 391, 392 and Farkas receipts excluding inconsistent sign @@ -3538,19 +5147,38 @@ def treePart115 : CompactCellTree := 139, 142, 140, 141, 943, 176, 145, 944]) (.absurd 945)))))) +private theorem treePart115_check_chunked : + treePart115.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [aff [0, 0, 0, 1, + -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, + 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0]]) = true := by + decide +kernel + theorem treePart115_check : treePart115.check splitForms farkasReceipts cells (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart115_check_chunked /-- Contradiction leaf using Farkas receipt 946 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart116 : CompactCellTree := .absurd 946 +private theorem treePart116_check_chunked : + treePart116.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [aff [0, 0, 0, 1, + -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ [aff [0, + 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0]]) = true := by + decide +kernel + theorem treePart116_check : treePart116.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3558,7 +5186,9 @@ theorem treePart116_check : -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart116_check_chunked /-- Subtree splitting on `length[4] - 2 * length[7]` in the row-06 symmetry chamber, with leaves selecting cells 151, 393, 394, 395, 396 and Farkas receipts excluding inconsistent sign @@ -3584,6 +5214,16 @@ def treePart117 : CompactCellTree := 202, 207, 266, 652, 319, 957, 958, 209, 205, 959]) (.absurd 960)))))) +private theorem treePart117_check_chunked : + treePart117.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [aff [0, 0, 0, 1, + -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -2, 1, -1, 0]]) = true := by + decide +kernel + theorem treePart117_check : treePart117.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3592,13 +5232,26 @@ theorem treePart117_check : 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart117_check_chunked /-- Contradiction leaf using Farkas receipt 961 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart118 : CompactCellTree := .absurd 961 +private theorem treePart118_check_chunked : + treePart118.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [aff [0, 0, 0, 1, + -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, 1, 0, 0, -2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart118_check : treePart118.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3608,7 +5261,9 @@ theorem treePart118_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart118_check_chunked /-- Subtree splitting on `- 2 * length[8] + 2 * length[9] - length[10]` in the row-06 symmetry chamber, with leaves selecting cells 397, 398, 399 and Farkas receipts excluding inconsistent @@ -3625,6 +5280,18 @@ def treePart119 : CompactCellTree := 965, 165, 966, 187, 162]) (.absurd 967))) +private theorem treePart119_check_chunked : + treePart119.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [aff [0, 0, 0, 1, + -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 2, 0, 0, -1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart119_check : treePart119.check splitForms farkasReceipts cells (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3635,7 +5302,9 @@ theorem treePart119_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart119_check_chunked /-- Subtree splitting on `2 * length[4] - 2 * length[7]` in the row-06 symmetry chamber, with leaves selecting cells 400, 401, 402, 403, 404, 405, 406, 407 and Farkas receipts excluding @@ -3679,6 +5348,18 @@ def treePart120 : CompactCellTree := (.absurd 995)) (.absurd 985)))))) +private theorem treePart120_check_chunked : + treePart120.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [aff [0, 0, 0, 1, + -1, 0, 0, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart120_check : treePart120.check splitForms farkasReceipts cells (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3689,26 +5370,47 @@ theorem treePart120_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart120_check_chunked /-- Contradiction leaf using Farkas receipt 937 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart121 : CompactCellTree := .absurd 937 +private theorem treePart121_check_chunked : + treePart121.checkLookup splitForms farkasReceiptLookup cells + ((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, -2, 0, 0]]) = true := by + decide +kernel + theorem treePart121_check : treePart121.check splitForms farkasReceipts cells ((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart121_check_chunked /-- Contradiction leaf using Farkas receipt 996 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart122 : CompactCellTree := .absurd 996 +private theorem treePart122_check_chunked : + treePart122.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 2, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart122_check : treePart122.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3716,7 +5418,9 @@ theorem treePart122_check : [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart122_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 408, 409, 410, 411, 412 and Farkas receipts excluding inconsistent sign @@ -3737,6 +5441,16 @@ def treePart123 : CompactCellTree := 177, 178, 165, 159, 160, 163, 162]) (.absurd 179))))) +private theorem treePart123_check_chunked : + treePart123.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 2, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, + 0])]) ++ [aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart123_check : treePart123.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3745,13 +5459,26 @@ theorem treePart123_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart123_check_chunked /-- Contradiction leaf using Farkas receipt 997 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart124 : CompactCellTree := .absurd 997 +private theorem treePart124_check_chunked : + treePart124.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 2, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, + 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart124_check : treePart124.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3761,7 +5488,9 @@ theorem treePart124_check : 0, 0, 0, 0, 2, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart124_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 413, 414, 415, 416, 417 and Farkas receipts excluding inconsistent sign @@ -3784,6 +5513,18 @@ def treePart125 : CompactCellTree := 225, 226, 227, 344, 228, 233, 789, 231, 1002]) (.absurd 234))))) +private theorem treePart125_check_chunked : + treePart125.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 2, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + -2, -1, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart125_check : treePart125.check splitForms farkasReceipts cells (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3794,7 +5535,9 @@ theorem treePart125_check : 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -2, -1, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart125_check_chunked /-- Subtree splitting on `- 2 * length[4] - length[5] + 2 * length[7]` in the row-06 symmetry chamber, with leaves selecting cells 418, 419, 420, 421, 422, 423, 424, 425, 426, 427 and Farkas @@ -3836,6 +5579,18 @@ def treePart126 : CompactCellTree := (.absurd 299)))))) (.absurd 945)) +private theorem treePart126_check_chunked : + treePart126.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 2, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, -1, 0, 1, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart126_check : treePart126.check splitForms farkasReceipts cells (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3846,13 +5601,25 @@ theorem treePart126_check : 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, -1, 0, 1, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart126_check_chunked /-- Contradiction leaf using Farkas receipt 946 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart127 : CompactCellTree := .absurd 946 +private theorem treePart127_check_chunked : + treePart127.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 2, -2, 0, 0]]) = true := by + decide +kernel + theorem treePart127_check : treePart127.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3861,13 +5628,26 @@ theorem treePart127_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart127_check_chunked /-- Contradiction leaf using Farkas receipt 961 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart128 : CompactCellTree := .absurd 961 +private theorem treePart128_check_chunked : + treePart128.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -2, 1, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart128_check : treePart128.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3877,7 +5657,9 @@ theorem treePart128_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart128_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 428, 429, 430, 431, 432 and Farkas receipts excluding inconsistent sign @@ -3900,6 +5682,18 @@ def treePart129 : CompactCellTree := 225, 226, 227, 269, 659, 322, 1018, 231, 230]) (.absurd 234))))) +private theorem treePart129_check_chunked : + treePart129.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -2, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, + 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart129_check : treePart129.check splitForms farkasReceipts cells (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3910,13 +5704,28 @@ theorem treePart129_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart129_check_chunked /-- Contradiction leaf using Farkas receipt 968 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart130 : CompactCellTree := .absurd 968 +private theorem treePart130_check_chunked : + treePart130.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -2, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, + 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart130_check : treePart130.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3928,7 +5737,9 @@ theorem treePart130_check : 0, 0, 0, 0, -2, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart130_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 433, 434, 435, 436, 437 and Farkas receipts excluding inconsistent sign @@ -3951,6 +5762,20 @@ def treePart131 : CompactCellTree := 290, 291, 292, 296, 690, 356, 1021, 393, 832, 298, 1022]) (.absurd 299))))) +private theorem treePart131_check_chunked : + treePart131.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -2, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + -2, -1, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart131_check : treePart131.check splitForms farkasReceipts cells (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -3963,7 +5788,9 @@ theorem treePart131_check : 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -2, -1, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart131_check_chunked /-- Subtree splitting on `- 2 * length[4] - length[5] + 2 * length[7]` in the row-06 symmetry chamber, with leaves selecting cells 438, 439, 440, 441, 442, 443, 444, 445, 446, 447 and Farkas @@ -4005,6 +5832,20 @@ def treePart132 : CompactCellTree := (.absurd 468)))))) (.absurd 960)) +private theorem treePart132_check_chunked : + treePart132.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -2, 1, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, -1, 0, 1, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart132_check : treePart132.check splitForms farkasReceipts cells (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -4017,13 +5858,27 @@ theorem treePart132_check : 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, -1, 0, 1, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart132_check_chunked /-- Contradiction leaf using Farkas receipt 819 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart133 : CompactCellTree := .absurd 819 +private theorem treePart133_check_chunked : + treePart133.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, -2, 2, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart133_check : treePart133.check splitForms farkasReceipts cells (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -4034,7 +5889,9 @@ theorem treePart133_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart133_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 448, 449, 450, 451, 452 and Farkas receipts excluding inconsistent sign @@ -4057,6 +5914,19 @@ def treePart134 : CompactCellTree := 255, 256, 257, 684, 685, 325, 1037, 261, 260]) (.absurd 264))))) +private theorem treePart134_check_chunked : + treePart134.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, -2, 2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, + 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart134_check : treePart134.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -4068,13 +5938,29 @@ theorem treePart134_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart134_check_chunked /-- Contradiction leaf using Farkas receipt 859 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart135 : CompactCellTree := .absurd 859 +private theorem treePart135_check_chunked : + treePart135.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, -2, 2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, + 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff + [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart135_check : treePart135.check splitForms farkasReceipts cells (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -4087,7 +5973,9 @@ theorem treePart135_check : 0, 0, 0, 0, 0, -2, 2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart135_check_chunked /-- Subtree splitting on `2 * length[2] - 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 453, 454, 455, 456, 457 and Farkas receipts excluding inconsistent sign @@ -4110,6 +5998,21 @@ def treePart136 : CompactCellTree := 452, 453, 388, 717, 723, 384, 1039, 398, 864, 454, 865]) (.absurd 455))))) +private theorem treePart136_check_chunked : + treePart136.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, -2, 2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, + 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + -2, -1, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart136_check : treePart136.check splitForms farkasReceipts cells ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -4123,7 +6026,9 @@ theorem treePart136_check : 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -2, -1, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart136_check_chunked /-- Subtree splitting on `- 2 * length[4] - length[5] + 2 * length[7]` in the row-06 symmetry chamber, with leaves selecting cells 458, 459, 460, 461, 462, 463, 464, 465, 466 and Farkas @@ -4170,6 +6075,21 @@ def treePart137 : CompactCellTree := (.absurd 883)) (.absurd 468)))))) +private theorem treePart137_check_chunked : + treePart137.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, -2, 2, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, + 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, -1, 0, 1, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart137_check : treePart137.check splitForms farkasReceipts cells ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -4183,13 +6103,28 @@ theorem treePart137_check : 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 2, 0, 0, -2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -2, -1, 0, 1, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart137_check_chunked /-- Contradiction leaf using Farkas receipt 819 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart138 : CompactCellTree := .absurd 819 +private theorem treePart138_check_chunked : + treePart138.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, -1, 0])]) ++ [aff [0, 0, 0, 0, + 0, 1, 0, 0, -2, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart138_check : treePart138.check splitForms farkasReceipts cells (((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -4201,13 +6136,29 @@ theorem treePart138_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, -1, 0])]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart138_check_chunked /-- Contradiction leaf using Farkas receipt 721 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart139 : CompactCellTree := .absurd 721 +private theorem treePart139_check_chunked : + treePart139.checkLookup splitForms farkasReceiptLookup cells + (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 2, -1, 0, 1]]) ++ [aff [0, 0, 0, 2, -2, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart139_check : treePart139.check splitForms farkasReceipts cells (((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -4220,7 +6171,9 @@ theorem treePart139_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 1]]) ++ [aff [0, 0, 0, 2, -2, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart139_check_chunked /-- Subtree splitting on `2 * length[4] - length[7]` in the row-06 symmetry chamber, with leaves selecting cells 467, 468, 469, 470 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4242,6 +6195,21 @@ def treePart140 : CompactCellTree := 454, 380, 1048, 523, 1049, 834, 382, 388, 835]) (.absurd 1050))))) +private theorem treePart140_check_chunked : + treePart140.checkLookup splitForms farkasReceiptLookup cells + ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 2, -1, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 2, -2, 0, 0, 0, 0, 0, 0, 0, + 0])]) ++ [aff [0, 0, 0, 2, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart140_check : treePart140.check splitForms farkasReceipts cells ((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -4255,7 +6223,9 @@ theorem treePart140_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 2, -2, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 2, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart140_check_chunked /-- Subtree splitting on `2 * length[4] - length[7]` in the row-06 symmetry chamber, with leaves selecting cells 471, 472, 473, 474 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4277,6 +6247,22 @@ def treePart141 : CompactCellTree := 476, 477, 467, 412, 1054, 526, 1055, 921, 478, 419, 1056]) (.absurd 1057))))) +private theorem treePart141_check_chunked : + treePart141.checkLookup splitForms farkasReceiptLookup cells + (((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 2, -1, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 2, -2, 0, 0, 0, 0, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 2, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, + -1, 0, -2, 1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart141_check : treePart141.check splitForms farkasReceipts cells (((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -4291,7 +6277,9 @@ theorem treePart141_check : 0, 0, 0, 0, 2, -1, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 2, -2, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 2, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 0, -2, 1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart141_check_chunked /-- Subtree splitting on `- length[0] - 2 * length[2] + 2 * length[3]` in the row-06 symmetry chamber, with leaves selecting cells 475, 476, 477, 478, 479, 480, 481, 482 and Farkas receipts @@ -4333,6 +6321,22 @@ def treePart142 : CompactCellTree := (.absurd 929)))))) (.absurd 264)) +private theorem treePart142_check_chunked : + treePart142.checkLookup splitForms farkasReceiptLookup cells + (((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 2, -1, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 2, -2, 0, 0, 0, 0, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 2, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, -1, 0, -2, 1, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart142_check : treePart142.check splitForms farkasReceipts cells (((((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -4347,13 +6351,29 @@ theorem treePart142_check : 0, 0, 0, 0, 2, -1, 0, 1]]) ++ [AffineForm.violation (aff [0, 0, 0, 2, -2, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 2, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 0, -2, 1, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart142_check_chunked /-- Contradiction leaf using Farkas receipt 1073 to exclude the accumulated affine constraints in this row-06 branch. -/ def treePart143 : CompactCellTree := .absurd 1073 +private theorem treePart143_check_chunked : + treePart143.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -2, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 1, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, -1, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 1])]) = true := by + decide +kernel + theorem treePart143_check : treePart143.check splitForms farkasReceipts cells ((((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -1, 0, 0, 0, 0])]) ++ @@ -4366,7 +6386,9 @@ theorem treePart143_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 2, -1, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, -2, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 2, -1, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart143_check_chunked /-- A branch of the final row-06 cover assembly, starting at split form 2 and combining the previously verified decision subtrees. -/ diff --git a/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow14CoverReceipts.lean b/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow14CoverReceipts.lean index 79d76516ce..c7e45b99a6 100644 --- a/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow14CoverReceipts.lean +++ b/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow14CoverReceipts.lean @@ -6,6 +6,7 @@ Authors: Nathan Pflueger module public import LeanPool.BrillNoetherGraphs.Utilities.Subdivision.AffineCover +public import LeanPool.BrillNoetherGraphs.Utilities.Foundations.ChunkedLookup /-! # Sparse Farkas receipts for the row-14 closed cover @@ -772,4 +773,30 @@ referenced by decision-tree leaves. -/ def farkasReceipts : List Certificate.AffineCover.FarkasData := farkasReceipts0 ++ farkasReceipts1 ++ farkasReceipts2 +/-- Existing receipt blocks with their checked sizes, avoiding repeated prefix traversal. -/ +def farkasReceiptChunks : List (ℕ × List Certificate.AffineCover.FarkasData) := + [(128, farkasReceipts0), + (128, farkasReceipts1), + (91, farkasReceipts2)] + +private theorem farkasReceiptChunks_sizes : + ∀ chunk ∈ farkasReceiptChunks, chunk.1 = chunk.2.length := by + intro chunk hMem + simp only [farkasReceiptChunks, List.mem_cons, List.not_mem_nil, or_false] at hMem + rcases hMem with rfl | rfl | rfl <;> rfl + +/-- Block lookup keeps the original table, order, and out-of-range default. -/ +def farkasReceiptLookup (index : ℕ) : Certificate.AffineCover.FarkasData := + List.lookupChunks farkasReceiptChunks index { terms := [] } + +theorem farkasReceiptLookup_eq_getD (index : ℕ) : + farkasReceiptLookup index = farkasReceipts.getD index { terms := [] } := by + have hTable : farkasReceiptChunks.flatMap Prod.snd = farkasReceipts := by + simp only [farkasReceiptChunks, List.flatMap_cons, List.flatMap_nil, List.append_nil, + List.append_assoc, farkasReceipts] + have hLookup := List.lookupChunks_eq_getD_flatMap farkasReceiptChunks + farkasReceiptChunks_sizes index { terms := [] } + rw [hTable] at hLookup + exact hLookup + end AtanasovRanganathan.GenusFiveRow14FixedCover diff --git a/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow14FixedCover.lean b/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow14FixedCover.lean index d2a05b22ee..05a70c54c1 100644 --- a/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow14FixedCover.lean +++ b/LeanPool/BrillNoetherGraphs/LowGenus/GenusFiveRow14FixedCover.lean @@ -9,6 +9,7 @@ module public import LeanPool.BrillNoetherGraphs.LowGenus.GenusFiveClosedCover public import LeanPool.BrillNoetherGraphs.LowGenus.GenusFiveCoreAtlas public import LeanPool.BrillNoetherGraphs.LowGenus.GenusFiveRow14CoverReceipts +import LeanPool.BrillNoetherGraphs.LowGenus.CompactCellTreeLookup /-! **Independent generated check.** The main row-14 proof is the readable `GenusFiveRow14` construction via `ConfigurationBananaTail`; this module gives @@ -3485,12 +3486,21 @@ def treePart0 : CompactCellTree := (.absurd 62))) (.absurd 63)) +private theorem treePart0_check_chunked : + treePart0.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, + -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 1, 0, 0, 0, + 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart0_check : treePart0.check splitForms farkasReceipts cells (((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart0_check_chunked /-- Subtree splitting on `length[5] - length[10]` in the row-14 length cone, with leaves selecting cells 4, 5, 6, 7 and Farkas receipts excluding inconsistent sign branches. -/ @@ -3510,13 +3520,23 @@ def treePart1 : CompactCellTree := (.absurd 85))) (.absurd 86)) +private theorem treePart1_check_chunked : + treePart1.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, + -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 1, 0, 0, 0, + 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, + 0])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart1_check : treePart1.check splitForms farkasReceipts cells ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart1_check_chunked /-- Subtree splitting on `length[8] - length[11]` in the row-14 length cone, with leaves selecting cells 0, 8, 9, 10, 11, 12, 13 and Farkas receipts excluding inconsistent sign @@ -3560,6 +3580,15 @@ def treePart2 : CompactCellTree := (.absurd 156)))) (.absurd 157))) +private theorem treePart2_check_chunked : + treePart2.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, + 1, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 1, 0, 0, + 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, + 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) = true := by + decide +kernel + theorem treePart2_check : treePart2.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, @@ -3567,13 +3596,25 @@ theorem treePart2_check : 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart2_check_chunked /-- Contradiction leaf using Farkas receipt 158 to exclude the accumulated affine constraints in this row-14 branch. -/ def treePart3 : CompactCellTree := .absurd 158 +private theorem treePart3_check_chunked : + treePart3.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, + 1, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 1, 0, 0, + 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, -1, -1, 0, + 0, 0, 0, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart3_check : treePart3.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, @@ -3582,7 +3623,9 @@ theorem treePart3_check : 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart3_check_chunked /-- Subtree splitting on `length[2] - length[3]` in the row-14 length cone, with leaves selecting cells 14, 15, 16, 17, 18, 19 and Farkas receipts excluding inconsistent sign branches. -/ @@ -3627,6 +3670,16 @@ def treePart4 : CompactCellTree := (.absurd 188))) (.absurd 189)) +private theorem treePart4_check_chunked : + treePart4.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, + 1, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 1, 0, 0, + 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ + [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart4_check : treePart4.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, @@ -3635,7 +3688,9 @@ theorem treePart4_check : 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart4_check_chunked /-- Subtree splitting on `length[1] - length[7]` in the row-14 length cone, with leaves selecting cells 20, 21, 22, 23, 24, 25, 26, 27 and Farkas receipts excluding inconsistent sign @@ -3680,12 +3735,21 @@ def treePart5 : CompactCellTree := (.absurd 202)) (.absurd 203)) +private theorem treePart5_check_chunked : + treePart5.checkLookup splitForms farkasReceiptLookup cells + ((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, + -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [AffineForm.violation + (aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart5_check : treePart5.check splitForms farkasReceipts cells ((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart5_check_chunked /-- Subtree splitting on `- length[4] + length[5]` in the row-14 length cone, with leaves selecting cells 2, 3, 28, 29 and Farkas receipts excluding inconsistent sign branches. -/ @@ -3707,13 +3771,23 @@ def treePart6 : CompactCellTree := (.absurd 62))) (.absurd 63)) +private theorem treePart6_check_chunked : + treePart6.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, + -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ + [aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, + 0]]) = true := by + decide +kernel + theorem treePart6_check : treePart6.check splitForms farkasReceipts cells (((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart6_check_chunked /-- Subtree splitting on `- length[4] + length[5]` in the row-14 length cone, with leaves selecting cells 6, 7, 30, 31 and Farkas receipts excluding inconsistent sign branches. -/ @@ -3733,19 +3807,38 @@ def treePart7 : CompactCellTree := (.absurd 85))) (.absurd 86)) +private theorem treePart7_check_chunked : + treePart7.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, + -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ + [aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, + 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart7_check : treePart7.check splitForms farkasReceipts cells ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart7_check_chunked /-- Contradiction leaf using Farkas receipt 204 to exclude the accumulated affine constraints in this row-14 branch. -/ def treePart8 : CompactCellTree := .absurd 204 +private theorem treePart8_check_chunked : + treePart8.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, + 1, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) + ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, + 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 1, 0, 0, + 0, 0])]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart8_check : treePart8.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, @@ -3753,7 +3846,9 @@ theorem treePart8_check : ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart8_check_chunked /-- Subtree splitting on `- length[4] + length[5]` in the row-14 length cone, with leaves selecting cells 14, 15, 16, 17, 32, 33, 34, 35 and Farkas receipts excluding inconsistent sign @@ -3797,6 +3892,16 @@ def treePart9 : CompactCellTree := (.absurd 188))) (.absurd 209)) +private theorem treePart9_check_chunked : + treePart9.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, + 1, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) + ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, + 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 1, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff + [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart9_check : treePart9.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, @@ -3805,7 +3910,9 @@ theorem treePart9_check : 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart9_check_chunked /-- Subtree splitting on `- length[4] + length[5]` in the row-14 length cone, with leaves selecting cells 15, 17, 18, 19, 33, 35, 36, 37 and Farkas receipts excluding inconsistent sign @@ -3849,6 +3956,16 @@ def treePart10 : CompactCellTree := (.absurd 188))) (.absurd 209)) +private theorem treePart10_check_chunked : + treePart10.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, + 1, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) + ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, + 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 1, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart10_check : treePart10.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, @@ -3857,7 +3974,9 @@ theorem treePart10_check : 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart10_check_chunked /-- Subtree splitting on `length[1] - length[7]` in the row-14 length cone, with leaves selecting cells 22, 23, 26, 27, 38, 39, 40, 41 and Farkas receipts excluding inconsistent sign @@ -3902,12 +4021,21 @@ def treePart11 : CompactCellTree := (.absurd 202)) (.absurd 203)) +private theorem treePart11_check_chunked : + treePart11.checkLookup splitForms farkasReceiptLookup cells + ((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, + -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart11_check : treePart11.check splitForms farkasReceipts cells ((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart11_check_chunked /-- Subtree splitting on `length[4] - length[10]` in the row-14 length cone, with leaves selecting cells 42, 43, 44 and Farkas receipts excluding inconsistent sign branches. -/ @@ -3924,13 +4052,23 @@ def treePart12 : CompactCellTree := (.cell 43 [20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 37, 36, 34, 41, 39]) (.absurd 210))) +private theorem treePart12_check_chunked : + treePart12.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff [0, + 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, -1]]) ++ + [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, + 0]]) = true := by + decide +kernel + theorem treePart12_check : treePart12.check splitForms farkasReceipts cells (((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart12_check_chunked /-- Subtree splitting on `length[4] - length[10]` in the row-14 length cone, with leaves selecting cells 45, 46, 47 and Farkas receipts excluding inconsistent sign branches. -/ @@ -3947,19 +4085,38 @@ def treePart13 : CompactCellTree := (.cell 46 [42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 59, 58, 64, 65, 57]) (.absurd 211))) +private theorem treePart13_check_chunked : + treePart13.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, -1]]) + ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, + 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart13_check : treePart13.check splitForms farkasReceipts cells ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, -1]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart13_check_chunked /-- Contradiction leaf using Farkas receipt 204 to exclude the accumulated affine constraints in this row-14 branch. -/ def treePart14 : CompactCellTree := .absurd 204 +private theorem treePart14_check_chunked : + treePart14.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, -1]]) + ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, + 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 1, 0, 0, 0, + 0, 0])]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart14_check : treePart14.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff @@ -3967,7 +4124,9 @@ theorem treePart14_check : ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart14_check_chunked /-- Subtree splitting on `length[2] - length[3]` in the row-14 length cone, with leaves selecting cells 48, 49, 50, 51, 52, 53 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4006,6 +4165,16 @@ def treePart15 : CompactCellTree := (.absurd 156)))) (.absurd 216)) +private theorem treePart15_check_chunked : + treePart15.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, -1]]) + ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, + 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 1, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [aff + [0, 1, -1, 0, -1, 0, 0, -1, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart15_check : treePart15.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff @@ -4014,7 +4183,9 @@ theorem treePart15_check : 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [aff [0, 1, -1, 0, -1, 0, 0, -1, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart15_check_chunked /-- Subtree splitting on `- length[0] + length[1] + length[2] + length[6]` in the row-14 length cone, with leaves selecting cells 51, 52, 53, 54, 55, 56 and Farkas receipts excluding @@ -4054,6 +4225,16 @@ def treePart16 : CompactCellTree := (.absurd 156)))) (.absurd 216)) +private theorem treePart16_check_chunked : + treePart16.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, -1]]) + ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, + 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 1, 0, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 1, -1, 0, -1, 0, 0, -1, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart16_check : treePart16.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff @@ -4062,7 +4243,9 @@ theorem treePart16_check : 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 1, -1, 0, -1, 0, 0, -1, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart16_check_chunked /-- Subtree splitting on `length[1] - length[6]` in the row-14 length cone, with leaves selecting cells 24, 26, 40, 57, 58, 59 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4101,12 +4284,21 @@ def treePart17 : CompactCellTree := (.absurd 202)) (.absurd 203)) +private theorem treePart17_check_chunked : + treePart17.checkLookup splitForms farkasReceiptLookup cells + ((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff [0, + 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, -1]]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart17_check : treePart17.check splitForms farkasReceipts cells ((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, -1]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart17_check_chunked /-- Subtree splitting on `- length[8] + length[9]` in the row-14 length cone, with leaves selecting cells 60, 61, 62, 63, 64, 65 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4138,6 +4330,15 @@ def treePart18 : CompactCellTree := (.absurd 230))))))) (.absurd 231) +private theorem treePart18_check_chunked : + treePart18.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, 0, 0, -1])]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, + 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [aff + [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0]]) = true := by + decide +kernel + theorem treePart18_check : treePart18.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff @@ -4145,7 +4346,9 @@ theorem treePart18_check : 0, 0, 0, 1, 0, 0, -1])]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart18_check_chunked /-- Subtree splitting on `- length[4] + length[5]` in the row-14 length cone, with leaves selecting cell 66 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4157,6 +4360,16 @@ def treePart19 : CompactCellTree := (.absurd 233)) (.absurd 234) +private theorem treePart19_check_chunked : + treePart19.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, 0, 0, -1])]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, + 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, -1, -1, 0, + 0, 0, 0, 1, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart19_check : treePart19.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff @@ -4165,7 +4378,9 @@ theorem treePart19_check : 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart19_check_chunked /-- Subtree splitting on `- length[4] + length[5]` in the row-14 length cone, with leaves selecting cell 67 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4177,6 +4392,17 @@ def treePart20 : CompactCellTree := (.absurd 236)) (.absurd 237) +private theorem treePart20_check_chunked : + treePart20.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, 0, 0, -1])]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, + 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ + [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 0, 0, + 0, 0, 0, 1, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart20_check : treePart20.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff @@ -4186,7 +4412,9 @@ theorem treePart20_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart20_check_chunked /-- Subtree splitting on `- length[4] + length[5]` in the row-14 length cone, with leaves selecting cell 68 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4198,6 +4426,18 @@ def treePart21 : CompactCellTree := (.absurd 239)) (.absurd 240) +private theorem treePart21_check_chunked : + treePart21.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, 0, 0, -1])]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, + 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ + [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 1, 0, + 0, 0, 0, 1, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart21_check : treePart21.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation @@ -4208,7 +4448,9 @@ theorem treePart21_check : [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart21_check_chunked /-- Subtree splitting on `length[0] - length[1] - length[3] - length[6]` in the row-14 length cone, with leaves selecting cells 69, 70, 71 and Farkas receipts excluding inconsistent sign @@ -4246,6 +4488,18 @@ def treePart22 : CompactCellTree := (.absurd 266)) (.absurd 156))) +private theorem treePart22_check_chunked : + treePart22.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, 0, 0, -1])]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, + 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ + [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart22_check : treePart22.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation @@ -4256,7 +4510,9 @@ theorem treePart22_check : [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart22_check_chunked /-- Subtree splitting on `length[1] - length[6]` in the row-14 length cone, with leaves selecting cells 25, 41, 72, 73 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4285,6 +4541,15 @@ def treePart23 : CompactCellTree := (.absurd 233)) (.absurd 270))) +private theorem treePart23_check_chunked : + treePart23.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, 0, 0, -1])]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, + 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, + 0, 0, 0])]) = true := by + decide +kernel + theorem treePart23_check : treePart23.check splitForms farkasReceipts cells ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff @@ -4292,7 +4557,9 @@ theorem treePart23_check : 0, 0, 0, 1, 0, 0, -1])]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart23_check_chunked /-- Subtree splitting on `- length[8] + length[9]` in the row-14 length cone, with leaves selecting cells 74, 75, 76, 77, 78, 79 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4324,6 +4591,15 @@ def treePart24 : CompactCellTree := (.absurd 230))))))) (.absurd 231) +private theorem treePart24_check_chunked : + treePart24.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, 0, 0, -1])]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, + 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart24_check : treePart24.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff @@ -4331,7 +4607,9 @@ theorem treePart24_check : 0, 0, 0, 1, 0, 0, -1])]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart24_check_chunked /-- Subtree splitting on `- length[4] + length[10]` in the row-14 length cone, with leaves selecting cell 66 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4343,6 +4621,16 @@ def treePart25 : CompactCellTree := (.absurd 233)) (.absurd 234) +private theorem treePart25_check_chunked : + treePart25.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, 0, 0, -1])]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, + 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0, 0, + 0])]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart25_check : treePart25.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff @@ -4351,7 +4639,9 @@ theorem treePart25_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart25_check_chunked /-- Subtree splitting on `- length[4] + length[10]` in the row-14 length cone, with leaves selecting cell 67 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4363,6 +4653,17 @@ def treePart26 : CompactCellTree := (.absurd 236)) (.absurd 237) +private theorem treePart26_check_chunked : + treePart26.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, 0, 0, -1])]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, + 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [aff [0, + -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart26_check : treePart26.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff @@ -4372,7 +4673,9 @@ theorem treePart26_check : 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart26_check_chunked /-- Subtree splitting on `- length[4] + length[10]` in the row-14 length cone, with leaves selecting cell 68 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4384,6 +4687,18 @@ def treePart27 : CompactCellTree := (.absurd 239)) (.absurd 240) +private theorem treePart27_check_chunked : + treePart27.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, 0, 0, -1])]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, + 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 1, 0, + 0, 0, 0, 1, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart27_check : treePart27.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation @@ -4394,7 +4709,9 @@ theorem treePart27_check : 0])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart27_check_chunked /-- Subtree splitting on `length[0] - length[1] - length[3] - length[6]` in the row-14 length cone, with leaves selecting cells 69, 70, 71 and Farkas receipts excluding inconsistent sign @@ -4432,6 +4749,18 @@ def treePart28 : CompactCellTree := (.absurd 266)) (.absurd 156))) +private theorem treePart28_check_chunked : + treePart28.checkLookup splitForms farkasReceiptLookup cells + ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation + (aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, 1, 0, 0, -1])]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, + 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart28_check : treePart28.check splitForms farkasReceipts cells ((((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation @@ -4442,7 +4771,9 @@ theorem treePart28_check : 0])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart28_check_chunked /-- Subtree splitting on `length[1] - length[6]` in the row-14 length cone, with leaves selecting cells 27, 41, 73, 80 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4471,6 +4802,15 @@ def treePart29 : CompactCellTree := (.absurd 233)) (.absurd 270))) +private theorem treePart29_check_chunked : + treePart29.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, 0, 0, -1])]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart29_check : treePart29.check splitForms farkasReceipts cells ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff @@ -4478,7 +4818,9 @@ theorem treePart29_check : 0, 0, 0, 1, 0, 0, -1])]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart29_check_chunked /-- Subtree splitting on `- length[8] + length[9]` in the row-14 length cone, with leaves selecting cells 62, 63, 64, 65, 81 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4506,6 +4848,15 @@ def treePart30 : CompactCellTree := (.absurd 156)))))) (.absurd 231) +private theorem treePart30_check_chunked : + treePart30.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, + 0])]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, + 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) = true := by + decide +kernel + theorem treePart30_check : treePart30.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff @@ -4513,7 +4864,9 @@ theorem treePart30_check : 0, 0, 0, 1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart30_check_chunked /-- Subtree splitting on `length[4] - length[5]` in the row-14 length cone, with leaves selecting cell 82 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4524,6 +4877,16 @@ def treePart31 : CompactCellTree := (.absurd 233)) (.absurd 234) +private theorem treePart31_check_chunked : + treePart31.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, + 0])]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, + 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ + [aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart31_check : treePart31.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff @@ -4532,7 +4895,9 @@ theorem treePart31_check : 0])]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart31_check_chunked /-- Subtree splitting on `length[4] - length[5]` in the row-14 length cone, with leaves selecting cell 76 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4544,6 +4909,17 @@ def treePart32 : CompactCellTree := (.absurd 236)) (.absurd 237) +private theorem treePart32_check_chunked : + treePart32.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, + 0])]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, + 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 1, 0, + 0, 0, 0, 1, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart32_check : treePart32.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff @@ -4553,7 +4929,9 @@ theorem treePart32_check : 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart32_check_chunked /-- Subtree splitting on `length[0] - length[1] - length[3] - length[6]` in the row-14 length cone, with leaves selecting cells 77, 78, 79 and Farkas receipts excluding inconsistent sign @@ -4591,6 +4969,17 @@ def treePart33 : CompactCellTree := (.absurd 243)) (.absurd 130))) +private theorem treePart33_check_chunked : + treePart33.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, + 0])]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, + 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ + [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart33_check : treePart33.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff @@ -4600,7 +4989,9 @@ theorem treePart33_check : 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart33_check_chunked /-- Subtree splitting on `length[1] - length[6]` in the row-14 length cone, with leaves selecting cells 25, 27, 83, 84 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4633,6 +5024,15 @@ def treePart34 : CompactCellTree := (.absurd 279)) (.absurd 280)) +private theorem treePart34_check_chunked : + treePart34.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, + 0])]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [AffineForm.violation (aff [0, 1, + 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart34_check : treePart34.check splitForms farkasReceipts cells ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff @@ -4640,7 +5040,9 @@ theorem treePart34_check : 0, 0, 0, 1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart34_check_chunked /-- Subtree splitting on `- length[8] + length[9]` in the row-14 length cone, with leaves selecting cells 68, 69, 70, 71, 85 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4668,6 +5070,16 @@ def treePart35 : CompactCellTree := (.absurd 156)))))) (.absurd 231) +private theorem treePart35_check_chunked : + treePart35.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, + 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0]]) = true + := by + decide +kernel + theorem treePart35_check : treePart35.check splitForms farkasReceipts cells (((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff @@ -4676,7 +5088,9 @@ theorem treePart35_check : 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart35_check_chunked /-- Subtree splitting on `- length[5] + length[10]` in the row-14 length cone, with leaves selecting cell 82 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4687,6 +5101,16 @@ def treePart36 : CompactCellTree := (.absurd 233)) (.absurd 234) +private theorem treePart36_check_chunked : + treePart36.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, + 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 1, 0, 0, + 0, 0, 0, 0])]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart36_check : treePart36.check splitForms farkasReceipts cells ((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff @@ -4695,7 +5119,9 @@ theorem treePart36_check : 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart36_check_chunked /-- Subtree splitting on `- length[5] + length[10]` in the row-14 length cone, with leaves selecting cell 76 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4707,6 +5133,17 @@ def treePart37 : CompactCellTree := (.absurd 236)) (.absurd 237) +private theorem treePart37_check_chunked : + treePart37.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, + 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 1, 0, 0, + 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ + [aff [0, -1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart37_check : treePart37.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff @@ -4716,7 +5153,9 @@ theorem treePart37_check : 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart37_check_chunked /-- Subtree splitting on `length[0] - length[1] - length[3] - length[6]` in the row-14 length cone, with leaves selecting cells 77, 78, 79 and Farkas receipts excluding inconsistent sign @@ -4754,6 +5193,17 @@ def treePart38 : CompactCellTree := (.absurd 243)) (.absurd 130))) +private theorem treePart38_check_chunked : + treePart38.checkLookup splitForms farkasReceiptLookup cells + (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, + 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 1, 0, 0, + 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart38_check : treePart38.check splitForms farkasReceipts cells (((((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff @@ -4763,7 +5213,9 @@ theorem treePart38_check : 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart38_check_chunked /-- Subtree splitting on `length[1] - length[6]` in the row-14 length cone, with leaves selecting cells 27, 41, 84, 86 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4796,6 +5248,15 @@ def treePart39 : CompactCellTree := (.absurd 279)) (.absurd 280)) +private theorem treePart39_check_chunked : + treePart39.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, + 0, 0, 0, 1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart39_check : treePart39.check splitForms farkasReceipts cells ((((((base ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1]]) ++ [AffineForm.violation (aff @@ -4803,7 +5264,9 @@ theorem treePart39_check : 0, 0, 0, 1, 0, 0, -1])]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart39_check_chunked /-- Subtree splitting on `length[0] - length[7]` in the row-14 length cone, with leaves selecting cells 87, 88, 89, 90, 91, 92, 93 and Farkas receipts excluding inconsistent sign @@ -4841,13 +5304,23 @@ def treePart40 : CompactCellTree := (.absurd 279)) (.absurd 280))) +private theorem treePart40_check_chunked : + treePart40.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) + ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, + 0, 0]]) = true := by + decide +kernel + theorem treePart40_check : treePart40.check splitForms farkasReceipts cells (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart40_check_chunked /-- Subtree splitting on `length[0] - length[7]` in the row-14 length cone, with leaves selecting cells 1, 5, 11, 12, 13, 21, 25 and Farkas receipts excluding inconsistent sign @@ -4894,13 +5367,23 @@ def treePart41 : CompactCellTree := (.absurd 279)) (.absurd 280))) +private theorem treePart41_check_chunked : + treePart41.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) + ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, 1, -1, 0, 0])]) = true := by + decide +kernel + theorem treePart41_check : treePart41.check splitForms farkasReceipts cells (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart41_check_chunked /-- Subtree splitting on `- length[4] + length[5]` in the row-14 length cone, with leaves selecting cells 29, 94 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4914,13 +5397,23 @@ def treePart42 : CompactCellTree := (.absurd 62))) (.absurd 292) +private theorem treePart42_check_chunked : + treePart42.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) + ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, + 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart42_check : treePart42.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart42_check_chunked /-- Subtree splitting on `- length[0] + length[1] + length[7]` in the row-14 length cone, with leaves selecting cells 94, 95, 96, 97, 98 and Farkas receipts excluding inconsistent sign @@ -4947,6 +5440,16 @@ def treePart43 : CompactCellTree := 148, 150, 147, 152, 161, 155, 165, 153]) (.absurd 156))))) +private theorem treePart43_check_chunked : + treePart43.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) + ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, + 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, + 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, + 0, 1, -1, 0, 0]]) = true := by + decide +kernel + theorem treePart43_check : treePart43.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff @@ -4955,7 +5458,9 @@ theorem treePart43_check : 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart43_check_chunked /-- Subtree splitting on `- length[8] + length[11]` in the row-14 length cone, with leaves selecting cells 29, 31, 34, 35, 37 and Farkas receipts excluding inconsistent sign branches. -/ @@ -4983,6 +5488,16 @@ def treePart44 : CompactCellTree := (.absurd 230)))))) (.absurd 62) +private theorem treePart44_check_chunked : + treePart44.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) + ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, + 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, + 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, + 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) = true := by + decide +kernel + theorem treePart44_check : treePart44.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff @@ -4991,13 +5506,25 @@ theorem treePart44_check : 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart44_check_chunked /-- Contradiction leaf using Farkas receipt 292 to exclude the accumulated affine constraints in this row-14 branch. -/ def treePart45 : CompactCellTree := .absurd 292 +private theorem treePart45_check_chunked : + treePart45.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) + ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, + 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, + 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0])]) = true := + by + decide +kernel + theorem treePart45_check : treePart45.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff @@ -5006,7 +5533,9 @@ theorem treePart45_check : 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart45_check_chunked /-- Subtree splitting on `- length[0] + length[6]` in the row-14 length cone, with leaves selecting cells 41, 99, 100, 101 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5035,13 +5564,23 @@ def treePart46 : CompactCellTree := (.absurd 292)) (.absurd 203) +private theorem treePart46_check_chunked : + treePart46.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) + ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart46_check : treePart46.check splitForms farkasReceipts cells (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart46_check_chunked /-- Subtree splitting on `- length[0] + length[7]` in the row-14 length cone, with leaves selecting cells 102, 103, 104, 105, 106 and Farkas receipts excluding inconsistent sign @@ -5070,13 +5609,23 @@ def treePart47 : CompactCellTree := 121, 122, 128, 123, 273, 126, 129, 125, 127]) (.absurd 130)))))) +private theorem treePart47_check_chunked : + treePart47.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, + 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart47_check : treePart47.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart47_check_chunked /-- Subtree splitting on `- length[4] + length[10]` in the row-14 length cone, with leaves selecting cells 94, 95, 96, 97, 98 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5106,6 +5655,15 @@ def treePart48 : CompactCellTree := (.absurd 156))))))) (.absurd 63) +private theorem treePart48_check_chunked : + treePart48.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, + 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, + 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0, + 0, 0])]) = true := by + decide +kernel + theorem treePart48_check : treePart48.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff @@ -5113,7 +5671,9 @@ theorem treePart48_check : 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart48_check_chunked /-- Subtree splitting on `length[4] - length[5]` in the row-14 length cone, with leaves selecting cells 3, 29 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5124,6 +5684,15 @@ def treePart49 : CompactCellTree := (.cell 29 [42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 59, 58, 61, 57, 60, 56]) (.absurd 201)) +private theorem treePart49_check_chunked : + treePart49.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, + 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 0, 0, 1]]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart49_check : treePart49.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff @@ -5131,7 +5700,9 @@ theorem treePart49_check : 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 0, 0, 1]]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart49_check_chunked /-- Subtree splitting on `length[4] - length[5]` in the row-14 length cone, with leaves selecting cells 7, 31 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5142,6 +5713,16 @@ def treePart50 : CompactCellTree := (.cell 31 [66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 83, 82, 194, 84, 80]) (.absurd 209)) +private theorem treePart50_check_chunked : + treePart50.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, + 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, + 0])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart50_check : treePart50.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff @@ -5150,7 +5731,9 @@ theorem treePart50_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, -1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart50_check_chunked /-- Subtree splitting on `- length[0] - length[1] + length[7]` in the row-14 length cone, with leaves selecting cells 16, 17, 19, 34, 35, 37 and Farkas receipts excluding inconsistent sign @@ -5194,6 +5777,16 @@ def treePart51 : CompactCellTree := (.absurd 300))) (.absurd 301)))) +private theorem treePart51_check_chunked : + treePart51.checkLookup splitForms farkasReceiptLookup cells + ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, + 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 0, 0, 0, 0, -1, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart51_check : treePart51.check splitForms farkasReceipts cells ((((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff @@ -5202,13 +5795,24 @@ theorem treePart51_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 0, 0, 1]]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart51_check_chunked /-- Contradiction leaf using Farkas receipt 302 to exclude the accumulated affine constraints in this row-14 branch. -/ def treePart52 : CompactCellTree := .absurd 302 +private theorem treePart52_check_chunked : + treePart52.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, + 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 0, 0, 1])]) = true := by + decide +kernel + theorem treePart52_check : treePart52.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff @@ -5216,7 +5820,9 @@ theorem treePart52_check : 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 0, 0, 1])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart52_check_chunked /-- Subtree splitting on `length[1] - length[7]` in the row-14 length cone, with leaves selecting cells 100, 107, 108, 109 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5240,13 +5846,23 @@ def treePart53 : CompactCellTree := (.absurd 305)) (.absurd 306)) +private theorem treePart53_check_chunked : + treePart53.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, + 0, 0, 0, 0, -1, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, + 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) = true := by + decide +kernel + theorem treePart53_check : treePart53.check splitForms farkasReceipts cells (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart53_check_chunked /-- Subtree splitting on `- length[0] + length[6]` in the row-14 length cone, with leaves selecting cells 27, 41, 101, 110 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5279,13 +5895,23 @@ def treePart54 : CompactCellTree := (.absurd 309)))) (.absurd 310) +private theorem treePart54_check_chunked : + treePart54.checkLookup splitForms farkasReceiptLookup cells + (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff + [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, + 0, 0, 0, 0, -1, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) = true := by + decide +kernel + theorem treePart54_check : treePart54.check splitForms farkasReceipts cells (((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart54_check_chunked /-- Subtree splitting on `length[0] - length[6]` in the row-14 length cone, with leaves selecting cells 93, 111, 112, 113, 114, 115, 116, 117 and Farkas receipts excluding inconsistent @@ -5322,6 +5948,15 @@ def treePart55 : CompactCellTree := (.cell 93 [20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 36, 304, 34, 39, 32, 41, 37, 284])) +private theorem treePart55_check_chunked : + treePart55.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [aff [0, 0, + 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) = true + := by + decide +kernel + theorem treePart55_check : treePart55.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ @@ -5329,7 +5964,9 @@ theorem treePart55_check : 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart55_check_chunked /-- Subtree splitting on `length[0] - length[6]` in the row-14 length cone, with leaves selecting cells 93, 112, 113, 114, 115, 116, 117 and Farkas receipts excluding inconsistent sign @@ -5364,6 +6001,15 @@ def treePart56 : CompactCellTree := 80, 81]) (.absurd 296))) +private theorem treePart56_check_chunked : + treePart56.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [aff [0, 0, + 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 0, + 1, 0, 0, 0, 0])]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart56_check : treePart56.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ @@ -5371,7 +6017,9 @@ theorem treePart56_check : 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart56_check_chunked /-- Subtree splitting on `length[0] - length[6]` in the row-14 length cone, with leaves selecting cells 113, 114, 115, 116, 118 and Farkas receipts excluding inconsistent sign @@ -5400,6 +6048,16 @@ def treePart57 : CompactCellTree := (.absurd 156)))))) (.absurd 280) +private theorem treePart57_check_chunked : + treePart57.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [aff [0, 0, + 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 0, + 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) = + true := by + decide +kernel + theorem treePart57_check : treePart57.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ @@ -5408,7 +6066,9 @@ theorem treePart57_check : 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, -1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart57_check_chunked /-- Subtree splitting on `- length[0] + length[6]` in the row-14 length cone, with leaves selecting cells 119, 120, 121, 122, 123 and Farkas receipts excluding inconsistent sign @@ -5448,6 +6108,15 @@ def treePart58 : CompactCellTree := (.absurd 325)) (.absurd 130)))))) +private theorem treePart58_check_chunked : + treePart58.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, + 0, 0, -1, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart58_check : treePart58.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ @@ -5455,7 +6124,9 @@ theorem treePart58_check : 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart58_check_chunked /-- Subtree splitting on `length[1] - length[6]` in the row-14 length cone, with leaves selecting cells 109, 124 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5474,6 +6145,15 @@ def treePart59 : CompactCellTree := (.absurd 279)) (.absurd 280)) +private theorem treePart59_check_chunked : + treePart59.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart59_check : treePart59.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ @@ -5481,7 +6161,9 @@ theorem treePart59_check : 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart59_check_chunked /-- Subtree splitting on `length[0] - length[6]` in the row-14 length cone, with leaves selecting cells 25, 60, 61, 62, 63, 64, 65, 72 and Farkas receipts excluding inconsistent sign @@ -5524,6 +6206,15 @@ def treePart60 : CompactCellTree := 282]) (.absurd 331))) +private theorem treePart60_check_chunked : + treePart60.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, + 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 0, 1, + 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart60_check : treePart60.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ @@ -5531,7 +6222,9 @@ theorem treePart60_check : 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) ++ [aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart60_check_chunked /-- Subtree splitting on `length[0] - length[6]` in the row-14 length cone, with leaves selecting cells 25, 62, 63, 64, 65, 81, 83 and Farkas receipts excluding inconsistent sign @@ -5574,6 +6267,15 @@ def treePart61 : CompactCellTree := (.absurd 335)) (.absurd 309))) +private theorem treePart61_check_chunked : + treePart61.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, + 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, + -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart61_check : treePart61.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ @@ -5581,7 +6283,9 @@ theorem treePart61_check : 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0]]) ++ [AffineForm.violation (aff [0, -1, -1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart61_check_chunked /-- Subtree splitting on `length[4] - length[5]` in the row-14 length cone, with leaves selecting cells 76, 77, 78, 79, 82 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5614,6 +6318,15 @@ def treePart62 : CompactCellTree := (.absurd 329)) (.absurd 336) +private theorem treePart62_check_chunked : + treePart62.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, + 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) = true := by + decide +kernel + theorem treePart62_check : treePart62.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ @@ -5621,7 +6334,9 @@ theorem treePart62_check : 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart62_check_chunked /-- Subtree splitting on `length[1] - length[6]` in the row-14 length cone, with leaves selecting cells 27, 84 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5644,6 +6359,15 @@ def treePart63 : CompactCellTree := (.absurd 279)) (.absurd 280)) +private theorem treePart63_check_chunked : + treePart63.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, + 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart63_check : treePart63.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ @@ -5651,7 +6375,9 @@ theorem treePart63_check : 1, 0, 0, 0, 0, 0, -1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, -1, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart63_check_chunked /-- Subtree splitting on `- length[0] + length[6]` in the row-14 length cone, with leaves selecting cells 125, 126, 127, 128, 129 and Farkas receipts excluding inconsistent sign @@ -5679,6 +6405,15 @@ def treePart64 : CompactCellTree := 121, 122, 273, 123, 128, 126, 129, 214, 127]) (.absurd 130)))))) +private theorem treePart64_check_chunked : + treePart64.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, + 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, + 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) = true := by + decide +kernel + theorem treePart64_check : treePart64.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ @@ -5686,7 +6421,9 @@ theorem treePart64_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart64_check_chunked /-- Subtree splitting on `- length[0] + length[6]` in the row-14 length cone, with leaves selecting cells 68, 69, 70, 71, 85 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5725,6 +6462,15 @@ def treePart65 : CompactCellTree := (.absurd 340)) (.absurd 130)))))) +private theorem treePart65_check_chunked : + treePart65.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, + 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0]]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) = true := by + decide +kernel + theorem treePart65_check : treePart65.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ @@ -5732,7 +6478,9 @@ theorem treePart65_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [aff [0, 0, 0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart65_check_chunked /-- Subtree splitting on `- length[0] + length[6]` in the row-14 length cone, with leaves selecting cells 119, 120, 121, 122, 123 and Farkas receipts excluding inconsistent sign @@ -5761,6 +6509,16 @@ def treePart66 : CompactCellTree := 147, 148, 223, 162, 150, 161, 155, 165, 153]) (.absurd 156)))))) +private theorem treePart66_check_chunked : + treePart66.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, + 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 1, 0, 0, 0, 0, 0, + 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 1, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, + 1, -1, 0, 0]]) = true := by + decide +kernel + theorem treePart66_check : treePart66.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ @@ -5769,7 +6527,9 @@ theorem treePart66_check : 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 1, 0]]) ++ [aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0]]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart66_check_chunked /-- Subtree splitting on `- length[0] + length[6]` in the row-14 length cone, with leaves selecting cells 76, 77, 78, 79, 82 and Farkas receipts excluding inconsistent sign branches. -/ @@ -5808,6 +6568,16 @@ def treePart67 : CompactCellTree := (.absurd 345)) (.absurd 156)))))) +private theorem treePart67_check_chunked : + treePart67.checkLookup splitForms farkasReceiptLookup cells + (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, + 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 1, 0, 0, 0, 0, 0, + 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 1, 0]]) ++ [AffineForm.violation (aff [0, 0, + 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) = true := by + decide +kernel + theorem treePart67_check : treePart67.check splitForms farkasReceipts cells (((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ @@ -5816,13 +6586,24 @@ theorem treePart67_check : 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0])]) ++ [aff [0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 1, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart67_check_chunked /-- Contradiction leaf using Farkas receipt 346 to exclude the accumulated affine constraints in this row-14 branch. -/ def treePart68 : CompactCellTree := .absurd 346 +private theorem treePart68_check_chunked : + treePart68.checkLookup splitForms farkasReceiptLookup cells + ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, + 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 1, 0, 0, 0, 0, 0, + 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 1, 0])]) = true := by + decide +kernel + theorem treePart68_check : treePart68.check splitForms farkasReceipts cells ((((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ @@ -5830,7 +6611,9 @@ theorem treePart68_check : [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0]]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, -1, 1, 0, 0, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 1, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart68_check_chunked /-- Subtree splitting on `length[1] - length[6]` in the row-14 length cone, with leaves selecting cells 27, 41, 84, 86, 100, 109, 124, 130 and Farkas receipts excluding inconsistent @@ -5875,13 +6658,23 @@ def treePart69 : CompactCellTree := (.absurd 202)) (.absurd 203)) +private theorem treePart69_check_chunked : + treePart69.checkLookup splitForms farkasReceiptLookup cells + ((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ + [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ + [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0])]) = true := by + decide +kernel + theorem treePart69_check : treePart69.check splitForms farkasReceipts cells ((((base ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 0, 0, 1, -1, 0, 0, 0, 0])]) ++ [AffineForm.violation (aff [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, -1, 0])]) ++ [AffineForm.violation (aff [0, 1, 0, 0, 0, 0, 0, -1, 0, 0, 0, 0, 0])]) = true := by - decide +kernel + as_aux_lemma => + exact (CompactCellTree.checkLookup_eq_check _ _ _ _ + farkasReceiptLookup_eq_getD _ _).symm.trans treePart69_check_chunked /-- The complete compact decision tree for row 14 on the length cone, assembling 70 subtrees whose cell and Farkas certificates are replayed by the cover checker. -/ diff --git a/LeanPool/BrillNoetherGraphs/Utilities/Foundations/ChunkedLookup.lean b/LeanPool/BrillNoetherGraphs/Utilities/Foundations/ChunkedLookup.lean new file mode 100644 index 0000000000..f59a62136e --- /dev/null +++ b/LeanPool/BrillNoetherGraphs/Utilities/Foundations/ChunkedLookup.lean @@ -0,0 +1,41 @@ +/- +Copyright (c) 2026 Nathan Pflueger and OpenAI. All rights reserved. +Released under Apache 2.0 license as described in the file LICENSE. +Authors: Nathan Pflueger, OpenAI +-/ +module + +public import Mathlib.Data.List.GetD + +/-! # Size-tagged lookup for certificate tables -/ + +@[expose] public section + +namespace List + +/-- Look up a global index by skipping size-tagged blocks of an existing list table. -/ +def lookupChunks {α : Type*} (chunks : List (ℕ × List α)) (index : ℕ) (fallback : α) : α := + match chunks with + | [] => fallback + | (size, values) :: rest => + if index < size then values.getD index fallback + else lookupChunks rest (index - size) fallback + +/-- Correct size tags make block lookup agree with lookup in the concatenated table. -/ +theorem lookupChunks_eq_getD_flatMap {α : Type*} (chunks : List (ℕ × List α)) + (hSizes : ∀ chunk ∈ chunks, chunk.1 = chunk.2.length) (index : ℕ) (fallback : α) : + lookupChunks chunks index fallback = (chunks.flatMap Prod.snd).getD index fallback := by + induction chunks generalizing index with + | nil => rfl + | cons chunk chunks ih => + rcases chunk with ⟨size, values⟩ + have hSize : size = values.length := hSizes (size, values) (List.mem_cons.mpr (Or.inl rfl)) + have hRest : ∀ chunk ∈ chunks, chunk.1 = chunk.2.length := by + intro chunk hMem + exact hSizes chunk (List.mem_cons_of_mem _ hMem) + simp only [lookupChunks, List.flatMap_cons] + split <;> rename_i hIndex + · rw [List.getD_append values _ fallback index (by simpa only [← hSize] using hIndex)] + · rw [ih hRest, List.getD_append_right values _ fallback index + (by simpa only [← hSize] using Nat.le_of_not_gt hIndex), ← hSize] +end List