diff options
Diffstat (limited to 'Build/source/texk/dviout-util/tests/tpicsh.tex')
-rw-r--r-- | Build/source/texk/dviout-util/tests/tpicsh.tex | 41 |
1 files changed, 41 insertions, 0 deletions
diff --git a/Build/source/texk/dviout-util/tests/tpicsh.tex b/Build/source/texk/dviout-util/tests/tpicsh.tex new file mode 100644 index 00000000000..534672485d0 --- /dev/null +++ b/Build/source/texk/dviout-util/tests/tpicsh.tex @@ -0,0 +1,41 @@ +% tpic sh -> pa (-> fp, ip etc), ar, ia +% No correction is needed for this file! +\documentclass{article} +\begin{document} +\unitlength 0.001in + +SH (explicit)\par +\begin{picture}(850,550)(-50,-500) + \special{pn 8}% + \special{sh}% + \special{ia 350 200 400 250 0 6.28319}% + \special{sh 0}% + \special{ar 400 250 400 250 0 6.28319}% + \put(400,-250){\makebox(0,0){document}}% +\end{picture} +\newpage + +SH 0.1 (explicit)\par +\begin{picture}(600,400)(0,-300) + \special{pn 30}% + \special{sh 0.1}% + \special{pa 100 0}% + \special{pa 500 0}% + \special{pa 500 200}% + \special{pa 100 200}% + \special{pa 100 0}% + \special{fp}% +\end{picture} + +SH 0 (implicit: SH should not be inherited from the previous one!)\par +\begin{picture}(600,400)(0,-300) + \special{pn 30}% + \special{pa 100 0}% + \special{pa 500 0}% + \special{pa 500 200}% + \special{pa 100 200}% + \special{pa 100 0}% + \special{fp}% +\end{picture} + +\end{document} |