Current library: Alpha v34, 4,223 checked-use theorems; Stable remains 432. Historical first admissions, original proof editions, and non-admitted aliases are preserved. Exact original first-admission records.
Statement with defined notation
∀ b. ∀ c. ∀ l. ∀ p. ∀ s. l = S s · S s → FloorSqrt(p,s) → (∀ x. Lt(x,l) → ∃ y. BetaAt(b,c,x,y) ∧ Lt(y,p)) → ∃ x. ∃ y. ∃ z. Lt(x,l) ∧ (Lt(y,l) ∧ (¬x = y ∧ (BetaAt(b,c,x,z) ∧ BetaAt(b,c,y,z))))Every purple notation token opens its conservative definition. This reading surface never changes the unchanged intuitionistic kernel or confers checked-use authority.
Definitions used by this theorem
In the theorem statement
In local proof propositions
Exact expanded first-order statement
forall b c l p s. l = S s * S s -> (((exists bcs_sqrt_lower_gap_fpcd_floor. bcs_sqrt_lower_gap_fpcd_floor + (s) * (s) = (p)) /\ exists bcs_sqrt_upper_gap_fpcd_floor. bcs_sqrt_upper_gap_fpcd_floor + S (p) = S (s) * S (s))) -> (forall fom_index_fpcd_grid. (exists fom_gap_fpcd_grid_index_bound. fom_gap_fpcd_grid_index_bound + S (fom_index_fpcd_grid) = l) -> exists fom_value_fpcd_grid. ((((exists fom_beta_height_fpcd_grid_entry. fom_beta_height_fpcd_grid_entry + S (fom_value_fpcd_grid) = S ((S (fom_index_fpcd_grid)) * c)) /\ exists fom_beta_quotient_fpcd_grid_entry. b = fom_beta_quotient_fpcd_grid_entry * S ((S (fom_index_fpcd_grid)) * c) + (fom_value_fpcd_grid))) /\ (exists fom_gap_fpcd_grid_value_bound. fom_gap_fpcd_grid_value_bound + S (fom_value_fpcd_grid) = p))) -> (exists ftsp_first_fpcd_generic ftsp_second_fpcd_generic ftsp_value_fpcd_generic. ((exists ftsp_gap_fpcd_generic_first. ftsp_gap_fpcd_generic_first + S (ftsp_first_fpcd_generic) = l) /\ ((exists ftsp_gap_fpcd_generic_second. ftsp_gap_fpcd_generic_second + S (ftsp_second_fpcd_generic) = l) /\ (~(ftsp_first_fpcd_generic = ftsp_second_fpcd_generic) /\ ((((exists ff_h_ftsp_fpcd_generic_left. ff_h_ftsp_fpcd_generic_left + S (ftsp_value_fpcd_generic) = S ((S (ftsp_first_fpcd_generic)) * c)) /\ exists ff_q_ftsp_fpcd_generic_left. b = ff_q_ftsp_fpcd_generic_left * S ((S (ftsp_first_fpcd_generic)) * c) + (ftsp_value_fpcd_generic))) /\ (((exists ff_h_ftsp_fpcd_generic_right. ff_h_ftsp_fpcd_generic_right + S (ftsp_value_fpcd_generic) = S ((S (ftsp_second_fpcd_generic)) * c)) /\ exists ff_q_ftsp_fpcd_generic_right. b = ff_q_ftsp_fpcd_generic_right * S ((S (ftsp_second_fpcd_generic)) * c) + (ftsp_value_fpcd_generic))))))))Proof neighborhood
Direct theorem prerequisites
TS000I floor_square_successor_grid_strictly_exceeds_input TS000S finite_bounded_into_oversized_collisionDirect theorem dependents
Definition-aware tactic body
Only propositions whose conservative expansion has been checked for exact first-order equivalence are compacted. Every changed line retains its immutable exact replay command.
Read the argument
Proof checkpoints
This is a reading aid, not a new proof or a proof-tree certificate. Checkpoint groups are consecutive commands, not inferred branch boundaries. Every step links to the preserved script.
Named ingredients (2)
01Fix variables and assumptionsL1–8
02Use earlier factsL9–14
Instantiate or apply named facts and discharge the corresponding proof obligations.
03Calculate and transport equalitiesL15–15
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L15
rewrite hlength
04Use earlier factsL16–19
Original defined command ledger · 19 lines
- 0001
intro b - 0002
intro c - 0003
intro l - 0004
intro p - 0005
intro s - 0006
intro hlength - 0007
intro hfloor - 0008
intro hbounded - 0009
specialize finite_bounded_into_oversized_collision b - 0010
specialize finite_bounded_into_oversized_collision c - 0011
specialize finite_bounded_into_oversized_collision l - 0012
specialize finite_bounded_into_oversized_collision p - 0013
apply finite_bounded_into_oversized_collision - 0014
exact hbounded - 0015
rewrite hlength - 0016
specialize floor_square_successor_grid_strictly_exceeds_input p - 0017
specialize floor_square_successor_grid_strictly_exceeds_input s - 0018
apply floor_square_successor_grid_strictly_exceeds_input - 0019
exact hfloor