diff --git a/EasyLean/Basic.lean b/EasyLean/Basic.lean index 305e1ca..a0fe91d 100644 --- a/EasyLean/Basic.lean +++ b/EasyLean/Basic.lean @@ -1,12 +1,12 @@ import Mathlib.Data.Real.Basic import Mathlib.Tactic.Linarith -theorem mathd_algebra_513 - (a b : ℝ) - (h₀ : 3 * a + 2 * b = 5) - (h₁ : a + b = 2) : - a = 1 ∧ b = 1 := by - sorry +theorem mathd_algebra_513 (a b : ℝ) (h₀ : 3 * a + 2 * b = 5) (h₁ : a + b = 2) : a = 1 ∧ b = 1 := by + constructor + · linarith [h₀, h₁] + · linarith [h₀, h₁] + + theorem eq_four : ∀ a b c d : Nat, a = b → a = d → a = c → c = b := by sorry