PA006A

beta_range_transport_entry

Stable checked-use theorem · independently closed

Two Range codes preserve every decoded entry extensionally.

Exact expanded PA statement

forall b c z d a l. (forall ff_i_transport_l. (exists ff_lt_transport_l_bound. ff_lt_transport_l_bound + S ff_i_transport_l = l) -> (((exists ff_h_transport_l_decoded. ff_h_transport_l_decoded + S (a + ff_i_transport_l) = S ((S (ff_i_transport_l)) * c)) /\ exists ff_q_transport_l_decoded. b = ff_q_transport_l_decoded * S ((S (ff_i_transport_l)) * c) + (a + ff_i_transport_l)))) -> (forall ff_i_transport_r. (exists ff_lt_transport_r_bound. ff_lt_transport_r_bound + S ff_i_transport_r = l) -> (((exists ff_h_transport_r_decoded. ff_h_transport_r_decoded + S (a + ff_i_transport_r) = S ((S (ff_i_transport_r)) * d)) /\ exists ff_q_transport_r_decoded. z = ff_q_transport_r_decoded * S ((S (ff_i_transport_r)) * d) + (a + ff_i_transport_r)))) -> forall i x. (exists h. h + S i = l) -> (((exists ff_h_range_transport_x. ff_h_range_transport_x + S (x) = S ((S (i)) * c)) /\ exists ff_q_range_transport_x. b = ff_q_range_transport_x * S ((S (i)) * c) + (x))) -> (((exists ff_h_range_transport_y. ff_h_range_transport_y + S (x) = S ((S (i)) * d)) /\ exists ff_q_range_transport_y. z = ff_q_range_transport_y * S ((S (i)) * d) + (x)))

Structural proof guide

Generated structural guide

Two Range codes preserve every decoded entry extensionally.

Use the direct prerequisites beta_range_entry_eq as previously established PA formulas.

The proof proceeds by intermediate claims (1), equality transport (2).

Referenced ingredients

Proof neighborhood

Direct dependencies

Direct dependents

Formal native tactic body

Dependencies are introduced as named hypotheses before line 1. Linked names are exact direct references. This Stable checked-use theorem is independently kernel-checked when replayed.

  1. 0001intro b
  2. 0002intro c
  3. 0003intro z
  4. 0004intro d
  5. 0005intro a
  6. 0006intro l
  7. 0007intro hleft
  8. 0008intro hright
  9. 0009intro i
  10. 0010intro x
  11. 0011intro hi
  12. 0012intro hx
  13. 0013have hxa : x = a + i
  14. 0014specialize beta_range_entry_eq b
  15. 0015specialize beta_range_entry_eq c
  16. 0016specialize beta_range_entry_eq a
  17. 0017specialize beta_range_entry_eq l
  18. 0018specialize beta_range_entry_eq i
  19. 0019specialize beta_range_entry_eq x
  20. 0020apply beta_range_entry_eq
  21. 0021exact hleft
  22. 0022exact hi
  23. 0023exact hx
  24. 0024rewrite hxa
  25. 0025rewrite hxa
  26. 0026specialize hright i
  27. 0027apply hright
  28. 0028exact hi