Eine Gleichung um eine Liste wickeln

Question

Ist es möglich, einer Liste eine einzelne zentrierte Gleichungsnummer hinzuzufügen? Ich verwende in der ersten Liste „ausgerichtet, umschlossen mit Gleichung“, aber 1) es ist ziemlich viel manuelles Leerzeichen erforderlich, damit es richtig aussieht, und 2) lange Elemente verhalten sich falsch. Element (iii) ist auskommentiert, da es die Formatierung unterbricht und ich es nicht in den Griff zu bekommen scheine. Die Aufzählung in der zweiten Liste ist perfekt formatiert, aber es fehlt eine Gleichungsnummer. Ich bin für alle Vorschläge dankbar.

\documentclass[12pt, leqno]{book}
\usepackage{mathtools,amsthm} 
\usepackage[shortlabels]{enumitem}
\newcommand{\blank}[1]{\hspace*{#1}}  
\newcommand\abs[1]{\lvert#1\rvert}
\newcommand\dvd[2]{#1\!\mid\!#2}

\begin{document}
\noindent Using the equation env, this list is numbered and does what I want, except I'm struggling with
how to treat long lines (as in item (iii) which is commented out).
\begin{equation}
   \begin{aligned}
      &\text{(i) }   \enspace \text{If $a>b$ then $a+c > b+c$ for every $c \in D$.} \blank{15mm}  \\
      &\text{(ii) }  \>       \text{If $a>b$ and $c>0$, then $ac>bc$.}  \\ 
 %      &\text{(iii) }          \text{If If $a \neq 0$ and $\dvd{d}{a}$, then $\abs{d} \leq \abs{a}$. Moreover, if $a \neq 0$, and $d \neq \pm a$, then $\abs{d} < \abs{a}$. } \\
      &\text{(iv) }           \text{If $a>b$ and $b>c$, then $a>c$.}    \\ 
      &\text{(v) }   \>       \text{If $a \neq 0$, then $a^2 > 0$.}     \\ 
   \end{aligned}
\end{equation}

\noindent Using the enumerate env handles the items perfectly with the desired formatting. I just
don't get a centered equation number.

\begin{enumerate}[labelindent=\parindent, leftmargin=*, label=(\roman*),widest=viii, align=left, noitemsep]
   \item If $a>b$ then $a+c > b+c$ for every $c \in D$.
   \item If $a>b$ and $c>0$, then $ac>bc$.
   \item If If $a \neq 0$ and $\dvd{d}{a}$, then $\abs{d} \leq \abs{a}$. Moreover, if $a \neq 0$, and $d \neq \pm a$, then $\abs{d} < \abs{a}$.
   \item If $a>b$ and $b>c$, then $a>c$.
   \item If $a \neq 0$, then $a^2 > 0$.
\end{enumerate}
\end{document}

Answer 1

Setzen Sie die Enumerate-Umgebung einfach in ein \parbox. Übrigens finde ich, dass die Artikelnummern hier rechtsbündig besser aussehen. Ich habe auch die Gelegenheit genutzt, um \absmit `mathtools neu zu definieren (damit es eine variable Größe haben kann):

\documentclass[12pt, leqno]{book}
\usepackage{mathtools,amsthm}
\usepackage[showframe]{geometry}
\usepackage[shortlabels]{enumitem}
\newcommand{\blank}[1]{\hspace*{#1}}
\DeclarePairedDelimiter\abs\lvert\rvert
%\newcommand\abs[1]{\lvert#1\rvert}
\newcommand\dvd[2]{#1\!\mid\!#2}

\begin{document}

\noindent Using the enumerate env handles the items perfectly with the desired formatting. I just get a centred equation number.
\begin{equation}
  \parbox{0.9\linewidth}{\begin{enumerate}[labelindent=\parindent, leftmargin=*, label=(\roman*),widest=viii, labelsep=0.8em, noitemsep]
    \item If $a>b$ then $a+c > b+c$ for every $c \in D$.
    \item If $a>b$ and $c>0$, then $ac>bc$.
    \item If If $a \neq 0$ and $\dvd{d}{a}$, then $\abs{d} \leq \abs{a}$. Moreover, if $a \neq 0$, and $d \neq \pm a$, then $\abs{d} < \abs{a}$.
    \item If $a>b$ and $b>c$, then $a>c$.
    \item If $a \neq 0$, then $a^2 > 0$.
    \end{enumerate}}
\end{equation}

\end{document}