diff options
Diffstat (limited to 'Master/texmf-dist/doc/generic/pstricks/voss/bsp38.tex')
-rw-r--r-- | Master/texmf-dist/doc/generic/pstricks/voss/bsp38.tex | 66 |
1 files changed, 66 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/generic/pstricks/voss/bsp38.tex b/Master/texmf-dist/doc/generic/pstricks/voss/bsp38.tex new file mode 100644 index 00000000000..a8f57f4d168 --- /dev/null +++ b/Master/texmf-dist/doc/generic/pstricks/voss/bsp38.tex @@ -0,0 +1,66 @@ +\documentclass{article}% <voss@perce.de> 2003-01-24 +\usepackage{pstricks} +\usepackage{pst-optic} +\usepackage{pstricks-add} +\pagestyle{empty} +\parindent=0pt + +\begin{document} + +\begin{pspicture}(-8,-3)(7,5)%\psgrid[subgriddiv=0,griddots=10] + \rput(0,0){\lens[lensWidth=1,lensGlass=true,% + lensHeight=6,focus=4,drawing=false,AB=2.5]} + {% + \psset{linewidth=0.5pt,linestyle=dashed,arrowsize=5pt,arrows=|<->|} + \psline(-8,0)(4,0) + \pcline(-7.75,-3)(0,-3) + \lput*{:U}{2f} + \pcline(0,-3)(4,-3) + \lput*{:U}{f} + \pcline(7,0)(7,4) + \lput*{:U}{f} + \pcline(4,5)(5,5) + \lput*{:U}{s} + \pcline(5.25,2.3)(5.25,2.8) + \lput*{:U}{s} + } + \uput[90](0,3){\Large L} + \uput[45](-7.7,3){\Large B} + \uput[45](-7.7,-2){\Large E} + \uput[270](3,-0.5){\Large D} + \uput[-45](4,0){\Large A=F} + \uput[270](3,2){\Large S} + \uput[90](4,4){\Large Sp} + \uput[90](3.5,3.25){\Large B'} + \uput[0](6.3,2.25){\Large B''} + \uput[-90](6,1.1){\Large M} + \psarc[linewidth=0.5pt](-7.75,2.5){0.5}{-90}{0}\qdisk(-7.55,2.3){1pt} + \rput{210}(F'){\mirrorTwo} + {% + \psset{fillstyle=solid,fillcolor=lightgray} + \rput{210}(4,2.5){\psframe(-1,0)(1,0.2)} + \psframe(-8,-3)(-7.75,3) + \psframe(3,4)(3.8,4.2)\psframe(4.2,4)(5,4.2)% + }{% + \psset{linewidth=1pt,linecolor=red,% + arrowsize=5pt,ArrowInside=->,ArrowInsideNo=3} + \psline[linecolor=blue,ArrowInsideOffset=-0.2](F')(4,2.5) + \psline[linecolor=blue,ArrowInsideOffset=-0.2](4,2.3)(6,2.3) + \qdisk(6,2.3){2pt} + \psline[linestyle=dashed,arrows=-](F')(5.1,4) + \psline[linestyle=dashed,arrows=-](5,2.8)(6,2.8) + \psline(4,4)(F') + \psline[linecolor=blue,ArrowInsideOffset=-0.2](I)(F') + \psline(F')(I) + \psline[linecolor=blue,ArrowInsideOffset=-0.3](-7.75,2.5)(I) + \psline(I)(-7.75,2.5) + } + \psframe(5.5,1.1)(6.5,3.5) + \multido{\r=1.3+0.2}{12}{% + \psline(6.1,\r)(6.5,\r)% + } +\end{pspicture} + +Sp Spalt; D Drehspiegel; L Sammellinse; E Endspiegel; S halbdurchlässiger Spiegel; M Maßstab + +\end{document}
\ No newline at end of file |