theorem
proved
Jcost_pos_of_ne_one
show as:
view math explainer →
open explainer
Generate a durable explainer page for this declaration.
open lean source
IndisputableMonolith.Information.LocalCache on GitHub at line 231.
browse module
All declarations in this module, on Recognition.
explainer page
depends on
used by
-
srCost_pos_off_threshold -
aestheticCost_pos_off_optimum -
resonance_increases_stability -
above_threshold_positive -
oxidative_stress -
forecastCost_pos_off_unit -
chainCost_pos_off_unit -
Jcost_phi_pos -
asymmetry_positive_cost -
crossSectionRatio_pos -
dmCrossSection_pos -
hubble_tension_pos -
jcost_phi_pos -
potential_positive -
V_pos_off_vacuum -
jcost_ground_state -
Jcost_eq_zero_iff -
Jcost_pos_of_ne_one -
Jcost_pos_of_ne_one -
shared_sensitivity -
biased_reasoning_cost -
disease_cost -
market_arbitrage_gap -
minimum_at_one -
off_equilibrium_game_cost -
off_target_cost -
recognition_deficit -
turbulent_cost -
deviation_increases_cost -
nash_stability_at_homeostasis -
biased_agent -
off_equilibrium -
market_friction -
decileCost_pos_off_equal -
off_match_positive -
non_existence_has_positive_cost -
rsExists_iff_one -
cost_zero_set_singleton -
jcost_isolated_from_zero -
g_pos_off_zero
formal source
228theorem Jcost_min_at_one : Jcost 1 = 0 := Jcost_unit0
229
230/-- J-cost is strictly positive when r ≠ 1. -/
231theorem Jcost_pos_of_ne_one (r : ℝ) (hr : 0 < r) (hr_ne : r ≠ 1) :
232 0 < Jcost r := by
233 have h := Jcost_eq_sq (ne_of_gt hr)
234 rw [h]
235 apply div_pos
236 · have : r - 1 ≠ 0 := sub_ne_zero.mpr hr_ne
237 positivity
238 · positivity
239
240/-! ## §5 Working Memory Capacity -/
241
242/-- Working memory capacity prediction: φ³ ≈ 4.236.
243 The cache hierarchy at ratio φ gives Level 1 (working memory)
244 capacity = φ³ relative to Level 0 (focal attention, capacity 1). -/
245noncomputable def working_memory_capacity : ℝ := phi ^ 3
246
247theorem working_memory_approx :
248 4 < working_memory_capacity ∧ working_memory_capacity < 5 := by
249 unfold working_memory_capacity
250 constructor
251 · -- φ³ > 4: use φ > 1.61 and 1.61³ > 4
252 have hphi : phi > 1.61 := Constants.phi_gt_onePointSixOne
253 have hphi_pos : (0:ℝ) ≤ 1.61 := by norm_num
254 nlinarith [sq_nonneg phi, sq_nonneg (phi - 1.61), Constants.phi_pos,
255 show (1.61:ℝ)^3 > 4 by norm_num]
256 · -- φ³ < 5: use φ < 1.62
257 have hphi : phi < 1.62 := Constants.phi_lt_onePointSixTwo
258 have hphi_pos : (0:ℝ) < phi := Constants.phi_pos
259 nlinarith [sq_nonneg (1.62 - phi), sq_nonneg phi,
260 show (1.62:ℝ)^3 < 5 by norm_num]
261