Curvature K Decreasing In Rho

Documentation

Lean 4 Proof

theorem curvatureK_decreasing_in_rho {J : ℕ} (hJ : 2 ≤ J)
    {rho1 rho2 : ℝ} (hrho : rho1 < rho2) :
    curvatureK J rho2 < curvatureK J rho1 := by
  simp only [curvatureK]
  apply div_lt_div_of_pos_right _ (by exact_mod_cast (show 0 < J by omega))
  exact mul_lt_mul_of_pos_right (by linarith) (by
    have : (2 : ℝ) ≤ ↑J := by exact_mod_cast hJ
    linarith)

Dependency Graph

Module Section

Bilateral Trade Collapse Ordering