diff options
Diffstat (limited to 'Master/texmf-dist/doc/latex/pstricks-examples-en/12-04-1.ltx')
-rw-r--r-- | Master/texmf-dist/doc/latex/pstricks-examples-en/12-04-1.ltx | 43 |
1 files changed, 43 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/latex/pstricks-examples-en/12-04-1.ltx b/Master/texmf-dist/doc/latex/pstricks-examples-en/12-04-1.ltx new file mode 100644 index 00000000000..8c8c5b8c628 --- /dev/null +++ b/Master/texmf-dist/doc/latex/pstricks-examples-en/12-04-1.ltx @@ -0,0 +1,43 @@ +%% +%% A DANTE-Edition example +%% +%% Example 12-04-1 on page 146. +%% +%% Copyright (C) 2011 Herbert Voss +%% +%% It may be distributed and/or modified under the conditions +%% of the LaTeX Project Public License, either version 1.3 +%% of this license or (at your option) any later version. +%% +%% See http://www.latex-project.org/lppl.txt for details. +%% +%% +%% ==== +% Show page(s) 1 +%% +\documentclass[]{article} +\pagestyle{empty} +\setlength\textwidth{201.70511pt} +\setlength\parindent{0pt} + +\usepackage{pstricks,pst-node,pst-coil} +\SpecialCoor + +\begin{document} +\begin{pspicture}(-2,-2)(2,2) + \pscircle{2} + \pnode(2;-90){O}\pnode(2;10){A} + \pnode(2;60){B}\pnode(2;190){C} + \pnode(2;-60){D} + \qdisk(A){3pt}\qdisk(B){3pt} + \qdisk(C){3pt}\qdisk(D){3pt} + \psset{coilarm=3mm,coilwidth=3mm} + \nccoil[linecolor=red]{-}{O}{A} + \nccoil[coilheight=1.4,linecolor=red]{-}{O}{B} + \nccoil[coilheight=.9,linecolor=red]{-}{O}{C} + \nccoil[coilheight=.5,linecolor=red]{-}{O}{D} + \rput(1.6,-.4){$m$}\rput(.8,-1){$k$} + \psline[linewidth=1.5pt]{<-}(-2,0)(0,0) + \rput(-1,.2){$r$} +\end{pspicture} +\end{document} |