lemma fr_inner_nonneg {S S_crit : ℝ} (_hS : 0 ≤ S) (_hSc : 0 < S_crit) : 0 ≤ 1 - min 1 (S / S_crit) := by simp [sub_nonneg]
thesis/CESProofs/Applications/SettlementFeedback.lean:349
Paper 7: Settlement Feedback and Monetary Policy in a Mesh Economy