theorem settlementR0Friction_one (e : SettlementEconomy) : settlementR0Friction e 1 = settlementR0 e := by rw [settlementR0Friction_eq]; ring
thesis/CESProofs/Applications/SettlementFeedback.lean:126
Paper 7: Settlement Feedback and Monetary Policy in a Mesh Economy