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
∀ k. ∀ a. ∀ b. ∀ e. ∀ f. ModEq(k,a + e,0) → ModEq(k,b,f) → ModEq(k,a · f + b · e,0)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 k a b e f. (exists ftcn_left_fssq_cross_reverse_a ftcn_right_fssq_cross_reverse_a. (a + e) + (k) * ftcn_left_fssq_cross_reverse_a = (0) + (k) * ftcn_right_fssq_cross_reverse_a) -> (exists ftcn_left_fssq_cross_reverse_b ftcn_right_fssq_cross_reverse_b. (b) + (k) * ftcn_left_fssq_cross_reverse_b = (f) + (k) * ftcn_right_fssq_cross_reverse_b) -> (exists ftcn_left_fssq_cross_reverse_result ftcn_right_fssq_cross_reverse_result. (a * f + b * e) + (k) * ftcn_left_fssq_cross_reverse_result = (0) + (k) * ftcn_right_fssq_cross_reverse_result)Proof neighborhood
Direct theorem prerequisites
Direct 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–7
02Establish hreverseL8–17
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply four square signed cross mixed zero.
- L8
have hreverse : ModEq(k,b · e + a · f,0)Definitions: ModEq(k,b · e + a · f,0)Original native command in the exact edition - L9
specialize four_square_signed_cross_mixed_zero k - L10
specialize four_square_signed_cross_mixed_zero b - L11
specialize four_square_signed_cross_mixed_zero a - L12
specialize four_square_signed_cross_mixed_zero f - L13
specialize four_square_signed_cross_mixed_zero e - L14
apply four_square_signed_cross_mixed_zero - L15
exact hb - L16
exact ha - L17
specialize four_square_signed_mod_zero_swap k
Original defined command ledger · 21 lines
- 0001
intro k - 0002
intro a - 0003
intro b - 0004
intro e - 0005
intro f - 0006
intro ha - 0007
intro hb - 0008
have hreverse : ModEq(k,b · e + a · f,0)Exact native replay line
have hreverse : exists ftcn_left_fssq_cross_reverse_order ftcn_right_fssq_cross_reverse_order. (b * e + a * f) + (k) * ftcn_left_fssq_cross_reverse_order = (0) + (k) * ftcn_right_fssq_cross_reverse_order - 0009
specialize four_square_signed_cross_mixed_zero k - 0010
specialize four_square_signed_cross_mixed_zero b - 0011
specialize four_square_signed_cross_mixed_zero a - 0012
specialize four_square_signed_cross_mixed_zero f - 0013
specialize four_square_signed_cross_mixed_zero e - 0014
apply four_square_signed_cross_mixed_zero - 0015
exact hb - 0016
exact ha - 0017
specialize four_square_signed_mod_zero_swap k - 0018
specialize four_square_signed_mod_zero_swap (b * e) - 0019
specialize four_square_signed_mod_zero_swap (a * f) - 0020
apply four_square_signed_mod_zero_swap - 0021
exact hreverse