diff --git a/EasyLean/Basic.lean b/EasyLean/Basic.lean
index 305e1ca..02ad6f2 100644
--- a/EasyLean/Basic.lean
+++ b/EasyLean/Basic.lean
@@ -9,4 +9,5 @@ theorem mathd_algebra_513
   sorry
 
 theorem eq_four : ∀ a b c d : Nat, a = b → a = d → a = c → c = b := by
-  sorry
+  intro a b c d h1 h2 h3
+  rw [← h3, h1]