将 QED 放在上面的线上

Question

如果我有一个使用 QED 符号的定理环境，并且我在这样的定理的末尾放置了一个逐字块，那么 QED 符号就会被放在下面的新行上，从而产生额外的空间。有没有办法定义一个类似的宏，\qedhere但将符号放在上面一行的末尾，这样就不会为符号创建额外的一行？

梅威瑟：

\documentclass{article}
\usepackage{amsthm}

 \begin{document}
 \begin{proof}
 For example:
 \begin{verbatim}
 Some code.
 \end{verbatim}
 \qedhere
 \end{proof}
 \end{document}

编辑：这建议\par\vspace{-1.7\baselineskip}\qedhere，这有点用处，但有一个“神奇”值 1.7 需要调整，并且 QED 符号仍然可以放在下一页。

Answer 1

该代码似乎有效：

\documentclass{article}
\usepackage{amsthm}

 \begin{document}

 \begin{proof}
 For example:

 \begin{verbatim}
 Some code.
 \end{verbatim}
\vspace*{-\dimexpr2\baselineskip + \topsep + \partopsep}
 \qedhere
 \end{proof}

 \end{document}