From 8b880c1436d7e93279391ba362ab07c86272a449 Mon Sep 17 00:00:00 2001
From: Michael Orlitzky <michael@orlitzky.com>
Date: Sat, 6 Feb 2021 08:10:41 -0500
Subject: [PATCH] Add \zero{R} for the additive identity element in R.

---
 examples.tex    |  3 ++-
 mjo-algebra.tex | 12 ++++++++++++
 2 files changed, 14 insertions(+), 1 deletion(-)

diff --git a/examples.tex b/examples.tex
index 7646b66..015c5fd 100644
--- a/examples.tex
+++ b/examples.tex
@@ -38,7 +38,8 @@
     containing the set $\set{x,y,z}$.
 
     If $R$ has a multiplicative identity (that is, a unit) element,
-    then that element is denoted by $\unit{R}$.
+    then that element is denoted by $\unit{R}$. Its additive identity
+    element is $\zero{R}$.
   \end{section}
 
   \begin{section}{Algorithm}
diff --git a/mjo-algebra.tex b/mjo-algebra.tex
index 36ad4bd..25b96d9 100644
--- a/mjo-algebra.tex
+++ b/mjo-algebra.tex
@@ -12,6 +12,18 @@
 \input{mjo-common} % for \of, and \binopmany
 
 
+% The additive identity element of its argument, which should be
+% an algebraic structure.
+\newcommand*{\zero}[1]{ 0_{{#1}} }
+
+\ifdefined\newglossaryentry
+  \newglossaryentry{zero}{
+    name={\ensuremath{\zero{R}}},
+    description={the additive identity element of $R$},
+    sort=z
+  }
+\fi
+
 % The multiplicative identity element of its argument, which should be
 % an algebraic structure.
 \newcommand*{\unit}[1]{ 1_{{#1}} }
-- 
2.43.2