Too late comment but ...
If you use XyMTeX under PostScript Mode (latex --> dvips etc.),
please try the following code:
Code: Select all
\documentclass{article}
\usepackage{xymtexps}
\begin{document}
\def\updipolar#1{\psline[unit=0.1pt]{->}(40,100)(40,220)\put(0,240){#1}}
\DtetrahedralS{0==\lonepairA[1]{N};0==\updipolar{H$^+$};2==H;3A==H;4B==H}
\end{document}
If you use XyMTeX under PDF Mode (latex --> dvipdfmx etc.),
please try the following code:
Code: Select all
\documentclass{article}
\usepackage{xymtexpdf}
\begin{document}
\def\updipolar#1{\tikznodimension{%
\draw[-stealth](40\unitlength,100\unitlength)--%
(40\unitlength,220\unitlength);}\put(0,240){#1}}
\DtetrahedralS{0==\lonepairA[1]{N};0==\updipolar{H$^+$};2==H;3A==H;4B==H}
\end{document}