[pstricks] pstricks-add:hookarrow

[Bernd Sellentin]

Thanks, works fine.

Bernd

> >Looking at the code, there is no hookwidth defined for arrow type h.
> >Is there a way to change the side of the hook? I need it for typesetting
> > the equilibrium arrows in chemical formulas.
>
> \documentclass{article}
> \usepackage{pstricks-add}
> \makeatletter
> \@namedef{psas at h}{%
>   /Rhook {
>     CLW mul add dup
>     2 div /w ED mul dup /h ED mul
>     /a ED w neg h abs moveto 0 0 L
>     gsave stroke grestore
>   } def
>   0 \psk at arrowlength \psk at arrowsize \tx at Rhook}
> \makeatother
> \begin{document}
>
> \psline{-h}(0,0)(2,0)
>
> \psline[arrowsize=3mm]{-h}(0,0)(2,0)
>
> \psline[arrowsize=-3mm]{-h}(0,0)(2,0)
>
> \end{document}
>
>
> Herbert