From 64b98ba9f70cd547cc7225a5d1f7603196b8a86e Mon Sep 17 00:00:00 2001
From: "aleph-prover-dev[bot]"
 <247854405+aleph-prover-dev[bot]@users.noreply.github.com>
Date: Wed, 22 Apr 2026 12:12:51 +0000
Subject: [PATCH] Proof for mathd_algebra_513

Automated commit at 20260422_121250
---
 EasyLean/Basic.lean | 15 ++++++++++++---
 1 file changed, 12 insertions(+), 3 deletions(-)

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