答え1
必要ない場合は( にのみ付属している\scriptstyle
と思いますが)、\xrightarrow
\textstyle
\documentclass{article}
\usepackage{kpfonts,Baskervaldx,mathrsfs,calligra}
\newcommand{\congto}{\altxrightarrow{\sim}}
\usepackage{stackengine,amsmath}
\newcommand\altxrightarrow[2][0pt]{\mathrel{\ensurestackMath{\stackengine%
{\dimexpr#1-7.5pt}{\xrightarrow{\phantom{#2}}}{\scriptstyle\!#2\,}%
{O}{c}{F}{F}{S}}}}
\begin{document}
$A\congto B$
$A\altxrightarrow{\equiv} B$
$A\altxrightarrow[-2pt]{\mathrm{wth}} B$
\end{document}
\altxrightarrow
無料で提供されます。