答案1
它可以在 scriptscript 样式中得到完善,但我不认为您真的需要它在第二级下标或上标中。
\documentclass{article}
\usepackage{amssymb,pict2e}
\makeatletter
\DeclareRobustCommand{\bleqslant}{%
\mathrel{\mathpalette\@bleqslant\relax}%
}
\newcommand{\@bleqslant}[2]{%
\sbox\z@{$#1\m@th\leqslant$}%
\ifx#1\displaystyle
\def\@blqwd{0.75}%
\else
\ifx#1\textstyle
\def\@blqwd{0.75}%
\else
\ifx#1\scriptstyle
\def\@blqwd{0.7}%
\else
\def\@blqwd{0.65}%
\linethickness{0.75\@wholewidth}%
\fi
\fi
\fi
\setlength{\unitlength}{\dimexpr\wd\z@+\dp\z@}%
\vcenter{\hbox{%
\begin{picture}(1,1)
\roundcap\roundjoin
\polyline(\@blqwd,0.3)(0.1,0.6)(\@blqwd,0.9)
\polyline(0.1,0.4)(\@blqwd,0.1)
\polyline(\@blqwd,0.8)(0.22,0.555)
\end{picture}%
}}%
}
\makeatother
\begin{document}
$\leqslant\bleqslant$
$\scriptstyle\leqslant\bleqslant$
$\scriptscriptstyle\leqslant\bleqslant$
\end{document}
答案2
如果您使用 pdftex,那么您可以\pdfliteral
这样使用:
\def\spleq{\mathrel{\hbox to5pt{%
\pdfliteral{q .9963 0 0 .9963 0 0 cm .5 0 0 .5 0 1.5 cm 1 j 1 J .7 w
10 8 m 0 3 l 10 -3 l S 0 1 m 10 -5 l S 2 2 m 10 6 l S Q}\hss}}}
$A \spleq B < C$
\bye
如果您需要不同的尺寸\scriptstyle
,那么scriptscriptstyle
您可以使用此修改:
\def\spleq{\mathrel{\mathpalette\spleqA\relax}}
\def\spleqA#1#2{\mkern1mu\hbox to\spleqB#1em{%
\pdfliteral{q .9963 0 0 .9963 0 0 cm \spleqB#1 0 0 \spleqB#1 0 1\spleqB#1 cm
1 j 1 J .7 w 10 8 m 0 3 l 10 -3 l S 0 1 m 10 -5 l S 2 2 m 10 6 l S Q}\hss}%
\mkern1mu}
\def\spleqB#1{\ifx#1\displaystyle.5\fi \ifx#1\textstyle.5\fi
\ifx#1\scriptstyle.35\fi \ifx#1\scriptscriptstyle.25\fi}