From b66ac09af03b69d409df27ef32c90fa38924af2f Mon Sep 17 00:00:00 2001
From: cyfraeviolae <cyfraeviolae>
Date: Tue, 18 May 2021 19:35:59 -0400
Subject: fix additive identity example

---
 app/Web.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'app')

diff --git a/app/Web.hs b/app/Web.hs
index ba54f85..89b6ac5 100644
--- a/app/Web.hs
+++ b/app/Web.hs
@@ -97,7 +97,7 @@ examples =
   [ ("1+1=2", "one plus one equals two."),
     ("Ax.Ay.x+y=y+x", "addition is commutative."),
     ("Ex.Ay.x>y", "there exists a largest natural."),
-    ("Ee.Ax.(x+e=x & Ay.(x+y=x -> e=y))", "the additive identity exists and is unique."),
+    ("Ee.Ae'.(Ax.e'+x=x <-> e=e')", "the additive identity exists and is unique."),
     ("Ax.Ey.2y=x", "every natural is even."),
     ("Ax.Ey.(2y=x | 2y+1=x)", "every natural is either even or odd."),
     ("Ax.Ay.Az.((x=y & y=z) -> x=z)", "equality is transitive."),
-- 
cgit v1.2.3