[tex-eplain] widering

[Daniel H. Luecking]

I am going to assume that you want the \widering from

yhmath.sty.


This was a bit tough, mostly because there is a bug

in its definition in yhmath.sty. But here goes:

\input eplain

% load the yh font for \wideparen
\font\yhten  =yhcmex10
\font\yhseven=yhcmex10 at 7pt
\font\yhfive =yhcmex10 at 5pt

% set up the math family for using it
\newfam\yhfam
\textfont\yhfam\yhten
\scriptfont\yhfam\yhseven
\scriptscriptfont\yhfam\yhfive

\def\yhex{\fam\yhfam}

% determine the hex digit for this new math family
\edef\yhhex{\ifcase\yhfam 0\or 1\or 2\or 3\or 4\or 5\or 6\or 7\or 8\or
9\or A\or B\or C\or D\or E\or F\fi}

\def\wideparen{\mathaccent"0\yhhex F3}
\def\ring{\mathaccent"17}
\def\widering#1{\ring{\wideparen{#1}}}
Test: $\widering{ABC}$.

\bye


Oddly, cmr contains the ring accent, but plain TeX doesn't

have a command to access it directly (just \aa for the accent

over an "a").


Dan


Daniel H. Luecking [luecking at uark.edu]
Department of Mathematical Sciences
1 University of Arkansas
Fayetteville, AR, USA 72701-1201
________________________________
From: tex-eplain <tex-eplain-bounces at tug.org> on behalf of Gérald Tenenbaum <gerald.ten at free.fr>
Sent: Tuesday, November 15, 2016 5:10 PM
To: tex-eplain at tug.org
Subject: [tex-eplain] widering

Hello,

How can one include the LaTeX command \widering into Eplain?
Many thanks for help.
Regards,

Gérald
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://tug.org/pipermail/tex-eplain/attachments/20161116/4ec384ff/attachment-0001.html>