@ceccec/millennium-solutions 9.2.7 → 9.2.9

package/src/proof/sequences.lean

@@ -102,4 +102,35 @@ theorem the_sequence_takes_both_values :
   ((List.range 200).filter (fun n => tm n == 0)).length = 100
   ∧ ((List.range 200).filter (fun n => tm n == 1)).length = 100 := by decide
 
+
+-- ── the capped rows above, proved for every value — no bound ─────────────────────────────────────────────────
+-- cassini_at_even_indices, cassini_at_odd_indices and cassini_deviation_is_exactly_one were checked n ≤ 20; one law
+-- carries all three: at every index the product of the neighbours is the square, plus or minus one.
+theorem cassinis_identity_for_every_m :
+    ∀ m : Nat, fib (2 * m + 1) * fib (2 * m + 3) = fib (2 * m + 2) * fib (2 * m + 2) + 1 ∧
+      fib (2 * m) * fib (2 * m + 2) + 1 = fib (2 * m + 1) * fib (2 * m + 1) := by
+  intro m
+  induction m with
+  | zero => decide
+  | succ m ih =>
+    have r3 : fib (2 * m + 3) = fib (2 * m + 1) + fib (2 * m + 2) := rfl
+    have r4 : fib (2 * m + 4) = fib (2 * m + 2) + fib (2 * m + 3) := rfl
+    have r5 : fib (2 * m + 5) = fib (2 * m + 3) + fib (2 * m + 4) := rfl
+    show fib (2 * m + 3) * fib (2 * m + 5) = fib (2 * m + 4) * fib (2 * m + 4) + 1 ∧
+      fib (2 * m + 2) * fib (2 * m + 4) + 1 = fib (2 * m + 3) * fib (2 * m + 3)
+    have h := ih.1
+    rw [r5, r4, r3]
+    rw [r3] at h
+    generalize fib (2 * m + 1) = a at h ⊢
+    generalize fib (2 * m + 2) = b at h ⊢
+    constructor
+    · try simp only [Nat.mul_add, Nat.add_mul, Nat.pow_succ, Nat.pow_zero, Nat.one_mul, Nat.mul_one, Nat.reduceMul, Nat.reduceAdd] at *
+      try simp only [Nat.mul_assoc, Nat.mul_comm, Nat.mul_left_comm, Nat.reduceMul] at *
+      try simp only [Nat.mul_comm _ (OfNat.ofNat _), Nat.mul_left_comm _ (OfNat.ofNat _), Nat.reduceMul] at *
+      all_goals omega
+    · try simp only [Nat.mul_add, Nat.add_mul, Nat.pow_succ, Nat.pow_zero, Nat.one_mul, Nat.mul_one, Nat.reduceMul, Nat.reduceAdd] at *
+      try simp only [Nat.mul_assoc, Nat.mul_comm, Nat.mul_left_comm, Nat.reduceMul] at *
+      try simp only [Nat.mul_comm _ (OfNat.ofNat _), Nat.mul_left_comm _ (OfNat.ofNat _), Nat.reduceMul] at *
+      all_goals omega
+
 end Sequences

package/src/proof/trial-all.json

@@ -15772,5 +15772,179 @@
     "verdict": "UNVERIFIED",
     "ground": "no candidate in the current space — nothing to recompute",
     "receipt": "694fefdf-a71b-8019-84e5-04477e7be3d8"
+  },
+  {
+    "key": "lean_demand2_the_two_power_sums_are_one_sum",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "6551630b-4917-8c1c-999f-4728c266cfd1"
+  },
+  {
+    "key": "lean_demand2_nicomachus_sum_of_cubes_is_the_square_of_the_triangular_number_for_every_n",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "7aa0bbe0-b4ae-82e8-8319-7aed7047d654"
+  },
+  {
+    "key": "lean_demand2_the_sum_of_fifth_powers_has_the_closed_form_for_every_n",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "6916652f-bda2-80d1-882e-009dee2d791d"
+  },
+  {
+    "key": "lean_elementary_the_lucas_numbers_are_the_sum_of_the_neighbouring_fibonaccis_for_every_n",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "cacb33f1-2fc1-8887-87a8-67aa352b3ac6"
+  },
+  {
+    "key": "lean_families_cassinis_identity_for_every_m",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "75a810f1-ae27-8fb7-b4d3-b257c0c917c7"
+  },
+  {
+    "key": "lean_families_a_sum_over_one_to_n_plus_one_adds_the_last_term",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "f664ca1d-8371-8bd5-a369-060e34e5baaf"
+  },
+  {
+    "key": "lean_families_the_numbers_sum_to_their_closed_form_for_every_n",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "34fa9fc8-b8ed-8895-bb81-c92f4515e9fe"
+  },
+  {
+    "key": "lean_families_the_squares_sum_to_their_closed_form_for_every_n",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "0b7a0569-fb3f-8ba7-a49a-900c19bf369d"
+  },
+  {
+    "key": "lean_families_the_cubes_sum_to_their_closed_form_for_every_n",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "96b0047e-cf09-8755-be28-1cb49080d466"
+  },
+  {
+    "key": "lean_families_the_fourth_powers_sum_to_their_closed_form_for_every_n",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "3419aabd-970f-8738-ae26-0adbfd4cf7fb"
+  },
+  {
+    "key": "lean_families_the_fifth_powers_sum_to_their_closed_form_for_every_n",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "790310ea-f06d-875d-89aa-2aba93d133e3"
+  },
+  {
+    "key": "lean_families_power_sums_match_their_closed_forms_for_every_n",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "04b04822-598b-8529-a44c-7881174ec382"
+  },
+  {
+    "key": "lean_families_the_sums_of_triangular_numbers_are_the_tetrahedral_numbers_for_every_n",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "43b9cdd8-7110-8f6f-887b-297d0262ae80"
+  },
+  {
+    "key": "lean_sequences_cassinis_identity_for_every_m",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "3b815427-42b8-8b8c-abf3-423b1e268af3"
+  },
+  {
+    "key": "lean_nim_the_xor_of_two_bits_is_their_sum_mod_two",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "322304d5-f000-8492-8e7f-69ce46520610"
+  },
+  {
+    "key": "lean_nim_xor_commutes_at_every_fuel",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "b091d5a8-4e4a-8116-93d8-199afc028903"
+  },
+  {
+    "key": "lean_nim_one_more_step_of_fuel_changes_nothing_once_it_exceeds_an_argument",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "adf2ef5a-ef44-84b9-adb7-2edf0437284f"
+  },
+  {
+    "key": "lean_nim_more_fuel_changes_nothing_once_it_exceeds_an_argument",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "961d94be-959c-80ff-b0c4-03079551178a"
+  },
+  {
+    "key": "lean_nim_xor_reads_the_same_at_every_sufficient_fuel",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "e04a45b5-8834-8bc4-bf6e-bff90869081f"
+  },
+  {
+    "key": "lean_nim_a_number_xored_with_itself_is_zero_at_every_fuel",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "409e78df-b565-83bb-b177-aa46813c1cb7"
+  },
+  {
+    "key": "lean_nim_xor_splits_off_its_lowest_bit",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "fa8f797f-95fa-80c6-9abc-4bd21309d53a"
+  },
+  {
+    "key": "lean_nim_xor_undoes_itself_when_the_fuel_suffices",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "ba799e13-9cb6-8fc8-ab55-3879eb845e7f"
+  },
+  {
+    "key": "lean_nim_xor_is_commutative_for_every_a_b",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "e62bc467-f90b-8bb2-844c-c44676d6fce0"
+  },
+  {
+    "key": "lean_nim_xor_zero_is_identity_for_every_a",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "667bd69d-51ea-88da-a48e-ce4a33c4f518"
+  },
+  {
+    "key": "lean_nim_xor_is_its_own_inverse_for_every_a_b",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "e2f6d0f1-2fa2-832e-b884-1ac9f13160a0"
+  },
+  {
+    "key": "lean_nim_xor_is_the_sum_of_the_bits_plus_twice_the_xor_of_the_halves",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "07c467d9-8226-81d4-93b2-612ebd433b2b"
+  },
+  {
+    "key": "lean_nim_xor_is_associative_below_every_bound",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "0c3ef805-2811-8035-a30b-cc03489171c1"
+  },
+  {
+    "key": "lean_nim_xor_is_associative_for_every_a_b_c",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "d2a922d9-f09d-82db-ae54-2f92149512c9"
+  },
+  {
+    "key": "lean_nim_the_nim_sum_is_a_gf2_vector_addition_for_every_a_b_c",
+    "verdict": "UNVERIFIED",
+    "ground": "no candidate in the current space — nothing to recompute",
+    "receipt": "caa5c327-62cf-8171-9507-6453cfdaed0c"
   }
 ]