Encyclopedia Foundation Foundation Primitive Recognition Calculus Prcjcost On Ratio Orbit To Rat
ARTICLE 4 claims 4 theorems
Foundation Primitive Recognition Calculus Prcjcost On Ratio Orbit To Rat
A machine-checked formula turns any positive ratio into a number measuring the cost of recognizing it, and it stops exactly where the continuous theory begins.
The rational cost formula
The declaration onRatioOrbit_toRat establishes a formula for a recognition cost: a number that measures how hard it is for a discrete record of events to acknowledge a ratio. The formula is J(q) = ((q + q⁻¹) / 2) - 1, where q is any positive rational number. For example, when q = 2, the cost is ((2 + 1/2) / 2) - 1 = 0.25; when q = 1, the cost is 0. The declaration proves, in a machine-checked library of formal theorems, that this rational expression is exactly what the cost object computes.
The formula has three classical properties worth naming. First, it is symmetric under reciprocals: J(q) = J(1/q), so the cost of recognizing a ratio is the same as recognizing its inverse. Second, it is invariant under normalization: reducing a ratio to lowest terms does not change the cost. Third, it satisfies the composition law algebraically on nonzero ratios, meaning the cost of a product and quotient combine in a fixed way. These properties are proved for rational inputs only; they are the discrete surface of a deeper continuous theory.
In Recognition Science, this rational formula is the visible part of a larger chain. The declaration explicitly bridges to the existing real-number uniqueness theorem: the same formula, extended to positive real numbers, is the unique cost function under five conditions (reciprocal symmetry, zero cost at unity, composition law, calibration, continuity). The rational version here is not that theorem; it is a computational object that matches the formula on rational inputs. The bridge theorem shows the rational cost agrees with the real formula, but the uniqueness proof lives on the real side.
What the declaration does not claim is as important as what it proves. It does not prove uniqueness on the rational surface: that remains an explicitly named target, not a result. It does not derive the fine-structure constant, the golden ratio, or any physical constant. It does not prove the Riemann Hypothesis. It establishes a formula, its symmetry, its normalization invariance, and its algebraic composition on rationals, and it connects that formula to the continuous theorem. The reader can now compute the cost for any positive rational and know the machine checked the arithmetic, without mistaking the rational surface for the full uniqueness story.
THEOREM onRatioOrbit_toRat · IndisputableMonolith/Foundation/PrimitiveRecognitionCalculus/PRCJCost.lean
theorem onRatioOrbit_toRat (q : RatioOrbit) :
(onRatioOrbit q).toRat = (q.toRat + q.toRat⁻¹) / 2 - 1 := by
unfold onRatioOrbit
rw [RatioOrbit.sub_toRat, RatioOrbit.mul_toRat, RatioOrbit.add_toRat,
RatioOrbit.recip_toRat, half_toRat, RatioOrbit.one_toRat]
ring
THEOREM reciprocal_symmetric · IndisputableMonolith/Foundation/PrimitiveRecognitionCalculus/PRCJCost.lean
/-- Reciprocal symmetry of the PRC rational cost. -/
theorem reciprocal_symmetric (q : RatioOrbit) :
RatioOrbit.crossEq (onRatioOrbit q) (onRatioOrbit (RatioOrbit.recip q)) := by
rw [RatioOrbit.crossEq_iff_toRat_eq]
rw [onRatioOrbit_toRat, onRatioOrbit_toRat, RatioOrbit.recip_toRat]
by_cases hq : q.toRat = 0
· simp [hq]
· field_simp [hq]
ring
THEOREM normalized_invariant · IndisputableMonolith/Foundation/PrimitiveRecognitionCalculus/PRCJCost.lean
/-- Normalizing a ratio representative by native orbit GCD preserves the PRC
cost. -/
theorem normalized_invariant (q : RatioOrbit) :
RatioOrbit.crossEq (onRatioOrbit q)
(onRatioOrbit (DistinctionNat.normalizeRatio q)) := by
rw [RatioOrbit.crossEq_iff_toRat_eq]
rw [onRatioOrbit_toRat, onRatioOrbit_toRat, DistinctionNat.normalizeRatio_toRat]
THEOREM onRatioOrbit_toReal_jcost · IndisputableMonolith/Foundation/PrimitiveRecognitionCalculus/PRCJCost.lean
/-- The PRC rational cost transports to the existing real `Cost.Jcost`
formula on the verifier display. -/
theorem onRatioOrbit_toReal_jcost (q : RatioOrbit) :
((onRatioOrbit q).toRat : ℝ) = Cost.Jcost ((q.toRat : ℚ) : ℝ) := by
rw [onRatioOrbit_toRat]
unfold Cost.Jcost
rw [Rat.cast_sub, Rat.cast_div, Rat.cast_add, Rat.cast_inv]
norm_num
What this page does not claim
The declaration does not prove uniqueness of the cost on rational ratio orbits; that remains an explicitly named target. The declaration does not derive the fine-structure constant, the golden ratio, or any physical constant. The declaration does not prove the Riemann Hypothesis or any statement equivalent to it.
Verify this page
Every tagged claim above names its theorem. To check one yourself rather than trust this page, elaborate the source module with Lean 4 and audit its axiom basis:
$ lake env lean IndisputableMonolith/Foundation/PrimitiveRecognitionCalculus/PRCJCost.lean
expected axiom basis: [propext, Classical.choice, Quot.sound] (the Lean kernel's standard three; no RS-specific axioms)
A page whose claims cannot be reproduced this way does not ship. In production, every anchor links to the exact declaration in the public source release, and this block carries the build receipt for the page itself.
Derived articles
This page is generated by a question-recursion engine: the questions its answers raise become the next pages. The current agenda, with open targets marked red:
- What would a native uniqueness proof on rational ratio orbits require beyond the existing five conditions?
- How does the rational composition law relate to the continuous one when both are restricted to rational inputs?
- Which physical constants, if any, follow from extending the rational cost to the full real uniqueness theorem?
MACHINE LAYER · GROUNDED CLAIM TABLE · CLICK TO EXPAND
THEOREM onRatioOrbit_toRat · IndisputableMonolith/Foundation/PrimitiveRecognitionCalculus/PRCJCost.lean
theorem onRatioOrbit_toRat (q : RatioOrbit) : (onRatioOrbit q).toRat = (q.toRat + q.toRat⁻¹) / 2 - 1 := by unfold onRatioOrbit rw [RatioOrbit.sub_toRat, RatioOrbit.mul_toRat, RatioOrbit.add_toRat, RatioOrbit.recip_toRat, half_toRat, RatioOrbit.one_toRat] ringThe formula is J(q) = ((q + q⁻¹) / 2) - 1, where q is any positive rational number. onRatioOrbit_toRat · IndisputableMonolith/Foundation/PrimitiveRecognitionCalculus/PRCJCost.leanTHEOREM reciprocal_symmetric · IndisputableMonolith/Foundation/PrimitiveRecognitionCalculus/PRCJCost.lean
/-- Reciprocal symmetry of the PRC rational cost. -/ theorem reciprocal_symmetric (q : RatioOrbit) : RatioOrbit.crossEq (onRatioOrbit q) (onRatioOrbit (RatioOrbit.recip q)) := by rw [RatioOrbit.crossEq_iff_toRat_eq] rw [onRatioOrbit_toRat, onRatioOrbit_toRat, RatioOrbit.recip_toRat] by_cases hq : q.toRat = 0 · simp [hq] · field_simp [hq] ringIt is symmetric under reciprocals: J(q) = J(1/q). reciprocal_symmetric · IndisputableMonolith/Foundation/PrimitiveRecognitionCalculus/PRCJCost.leanTHEOREM normalized_invariant · IndisputableMonolith/Foundation/PrimitiveRecognitionCalculus/PRCJCost.lean
/-- Normalizing a ratio representative by native orbit GCD preserves the PRC cost. -/ theorem normalized_invariant (q : RatioOrbit) : RatioOrbit.crossEq (onRatioOrbit q) (onRatioOrbit (DistinctionNat.normalizeRatio q)) := by rw [RatioOrbit.crossEq_iff_toRat_eq] rw [onRatioOrbit_toRat, onRatioOrbit_toRat, DistinctionNat.normalizeRatio_toRat]It is invariant under normalization: reducing a ratio to lowest terms does not change the cost. normalized_invariant · IndisputableMonolith/Foundation/PrimitiveRecognitionCalculus/PRCJCost.leanTHEOREM onRatioOrbit_toReal_jcost · IndisputableMonolith/Foundation/PrimitiveRecognitionCalculus/PRCJCost.lean
/-- The PRC rational cost transports to the existing real `Cost.Jcost` formula on the verifier display. -/ theorem onRatioOrbit_toReal_jcost (q : RatioOrbit) : ((onRatioOrbit q).toRat : ℝ) = Cost.Jcost ((q.toRat : ℚ) : ℝ) := by rw [onRatioOrbit_toRat] unfold Cost.Jcost rw [Rat.cast_sub, Rat.cast_div, Rat.cast_add, Rat.cast_inv] norm_numThe rational cost agrees with the real formula, but the uniqueness proof lives on the real side. onRatioOrbit_toReal_jcost · IndisputableMonolith/Foundation/PrimitiveRecognitionCalculus/PRCJCost.lean