Как создать новый оператор конвертации?

Question

Следующий тривиальный пример иллюстрирует мою цель — создать оператор преобразования ptcm( ptв cm). К сожалению, он приводит к ошибкам в мире TeX, в отличие от мира PS.

\documentclass{beamer}
\usepackage{pstricks}
\usepackage[active,tightpage]{preview}
\PreviewEnvironment{pspicture}
\PreviewBorder=12pt

\SpecialCoor

\begin{document}
\begin{frame}
\begin{pspicture}[showgrid=top](4,4)
\makeatletter
\pstVerb{/ptcm {\pst@number\psunit\space div} bind def}
\makeatother
\psline(!4 12 ptcm sub 0)
\end{pspicture}
\end{frame}
\end{document}

Сообщения об ошибках следующие:

! Undefined control sequence.
<argument> /ptcm {\pst 
                       @number\psunit \space div} bind def
l.17 \end{frame}

? 
! Emergency stop.
<argument> /ptcm {\pst 
                       @number\psunit \space div} bind def
l.17 \end{frame}

Как создать новый оператор конвертации?

Answer 1

<argument> /ptcm {\pst 
                       @number\psunit \space div} bind def

показывает, что \pst@numberбыло проанализировано как, \pst @numberпоскольку @не является буквой.

Beamer считывает тело кадра как аргумент макроса, поэтому его нужно поместить \makeatletterперед кадром.