diff options
author | Karl Berry <karl@freefriends.org> | 2006-07-21 23:46:03 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2006-07-21 23:46:03 +0000 |
commit | 51e3a37989b9f2ace36eb360c42fee6dcff11458 (patch) | |
tree | c9205688e89e5e15f5d9c326c1fdbbc77cb1d76f /Master/texmf-dist/doc/generic/pst-optic/pst-optic-examples.tex | |
parent | fe0b11acdb1182a4e0a4068d1876666f270752e8 (diff) |
pst-optic 0.95
git-svn-id: svn://tug.org/texlive/trunk@1890 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/doc/generic/pst-optic/pst-optic-examples.tex')
-rw-r--r-- | Master/texmf-dist/doc/generic/pst-optic/pst-optic-examples.tex | 308 |
1 files changed, 150 insertions, 158 deletions
diff --git a/Master/texmf-dist/doc/generic/pst-optic/pst-optic-examples.tex b/Master/texmf-dist/doc/generic/pst-optic/pst-optic-examples.tex index 3e3b4cf539b..50cafec9a3c 100644 --- a/Master/texmf-dist/doc/generic/pst-optic/pst-optic-examples.tex +++ b/Master/texmf-dist/doc/generic/pst-optic/pst-optic-examples.tex @@ -1,10 +1,10 @@ \documentclass[12pt]{article} \usepackage[T1]{fontenc} \usepackage[latin1]{inputenc} -\usepackage[vtex]{geometry} +\usepackage{geometry} \usepackage{graphicx} \usepackage{subfigure} -\usepackage{pstcol} +\usepackage{pstricks} \usepackage{pst-optic} \usepackage{pst-text} \usepackage{url} @@ -29,7 +29,7 @@ \newcommand{\PS}{PostScript} \newcommand\CMD[1]{\texttt{\textbackslash#1}} \psset{subgriddiv=0,gridlabels=7pt,griddots=5} -\usepackage[vtex]{hyperref} +\usepackage{hyperref} \begin{document} \author{Manuel Luque\thanks{Mluque5130@aol.com} \and Herbert Voß\thanks{voss@perce.de}} @@ -114,78 +114,82 @@ This PDF file was created with the \textbf{vlatex} program from the free availab \resizebox{\textwidth}{!}{% \begin{pspicture}(-8,-5)(8,3) - \rput(0,0){% - \lens[% - lensGlass=true,lensWidth=0.4,% - focus=4,AB=0.5,OA=-2.8,XO=2,drawing=false]% - \psline[linewidth=0.5pt](xLeft)(xRight) - } - \pnode(!XO 2.5){L1}% extrémité supérieure de la lentille - \pnode(!XO -2.5){L2}% extrémité inférieure de la lentille - \psOutLine[length=5.5,linestyle=none](B')(L1){END1} - \psBeforeLine[length=6,linestyle=none](L2)(B'){START} - \pspolygon[style=rayuresJaunes,linestyle=none](B)(L1)(END1)(START)(L2) - \psline[linewidth=1.5\pslinewidth,arrowinset=0]{->}(A)(B) - \uput[270](A){A} - \uput[90](B){B} - \psline[linewidth=1.5\pslinewidth,% - arrowinset=0,linestyle=dashed]{->}(A')(B') - \uput[270](A'){$\mathrm{A'}$} - \uput[90](B'){$\mathrm{B'}$} - \psset{linecolor=red,arrowsize=0.2} - \pcline[nodesepB=-4](B')(O) - \psline(B)(I)(F') - \psOutLine(I)(F'){END2} - \Arrows(I)(F') - \Arrows(B)(I) - \psOutLine[length=1,linestyle=dashed](I')(B'){END3} - \psline[linestyle=dashed](B)(F) - \psline(B)(I') - \Arrows[arrows=->>](B)(I') - \psline[linestyle=dashed](B')(I') - \psline[linestyle=dashed](B')(I) - \psOutLine[length=2,arrows=->>](B')(I'){END4} - \psOutLine[length=4](B')(I'){END5} - \rput(8,0){\psset{linecolor=black}\eye} -\end{pspicture}% +\rput(0,0){% + \lens[% + lensGlass=true,lensWidth=0.4,% + focus=4,AB=0.5,OA=-2.8,XO=2,drawing=false]% + \psline[linewidth=0.5pt](xLeft)(xRight)} +\pnode(!XO 2.5){L1}% extrmitsuprieuredelalentille +\pnode(!XO -2.5){L2}% extrmitinfrieuredelalentille +\psOutLine[length=5.5,linestyle=none](B')(L1){END1} +\psBeforeLine[length=6,linestyle=none](L2)(B'){START} +\pspolygon[style=rayuresJaunes,linestyle=none](B)(L1)(END1)(START)(L2) +\psline[linewidth=1.5\pslinewidth,arrowinset=0]{->}(A)(B) +\uput[270](A){A} +\uput[90](B){B} +\psline[linewidth=1.5\pslinewidth,arrowinset=0,% + linestyle=dashed]{->}(A')(B') +\uput[270](A'){$\mathrm{A'}$} +\uput[90](B'){$\mathrm{B'}$} +\psset{linecolor=red,arrowsize=0.2} +\pcline[nodesepB=-4](B)(O)% Mittelpunktstrahl +\psline[linecolor=red,linestyle=dashed](B)(B')% ruckwaertige Verlaengerung +\Arrows(B)(O)% Mittelpunktstrahl +\psOutLine[length=2,arrows=->](B)(O){END6}% Mittelpunktstrahl +\psline(B)(I)(F') +\psOutLine(I)(F'){END2} +\Arrows(I)(F') +\Arrows(B)(I) +\psOutLine[length=1,linestyle=dashed](I')(B'){END3} +\psline[linestyle=dashed](B)(F) +\psline(B)(I') +\Arrows[arrows=->>](B)(I') +\psline[linestyle=dashed](B')(I') +\psline[linestyle=dashed](B')(I) +\psOutLine[length=2,arrows=->>](B')(I'){END4} +\psOutLine[length=4](B')(I'){END5} +\rput(8,0){\psset{linecolor=black}\eye} +\end{pspicture} } \begin{lstlisting} \begin{pspicture}(-8,-5)(8,3) - \rput(0,0){% - \lens[% - lensGlass=true,lensWidth=0.4,% - focus=4,AB=0.5,OA=-2.8,XO=2,drawing=false]% - \psline[linewidth=0.5pt](xLeft)(xRight) - } - \pnode(!XO 2.5){L1}% extrémité supérieure de la lentille - \pnode(!XO -2.5){L2}% extrémité inférieure de la lentille - \psOutLine[length=5.5,linestyle=none](B')(L1){END1} - \psBeforeLine[length=6,linestyle=none](L2)(B'){START} - \pspolygon[style=rayuresJaunes,linestyle=none](B)(L1)(END1)(START)(L2) - \psline[linewidth=1.5\pslinewidth,arrowinset=0]{->}(A)(B) - \uput[270](A){A} - \uput[90](B){B} - \psline[linewidth=1.5\pslinewidth,% - arrowinset=0,linestyle=dashed]{->}(A')(B') - \uput[270](A'){$\mathrm{A'}$} - \uput[90](B'){$\mathrm{B'}$} - \psset{linecolor=red,arrowsize=0.2} - \pcline[nodesepB=-4](B')(O) - \psline(B)(I)(F') - \psOutLine(I)(F'){END2} - \Arrows(I)(F') - \Arrows(B)(I) - \psOutLine[length=1,linestyle=dashed](I')(B'){END3} - \psline[linestyle=dashed](B)(F) - \psline(B)(I') - \Arrows[arrows=->>](B)(I') - \psline[linestyle=dashed](B')(I') - \psline[linestyle=dashed](B')(I) - \psOutLine[length=2,arrows=->>](B')(I'){END4} - \psOutLine[length=4](B')(I'){END5} - \rput(8,0){\psset{linecolor=black}\eye} -\end{pspicture}% +\rput(0,0){% + \lens[% + lensGlass=true,lensWidth=0.4,% + focus=4,AB=0.5,OA=-2.8,XO=2,drawing=false]% + \psline[linewidth=0.5pt](xLeft)(xRight)} +\pnode(!XO 2.5){L1}% extrmitsuprieuredelalentille +\pnode(!XO -2.5){L2}% extrmitinfrieuredelalentille +\psOutLine[length=5.5,linestyle=none](B')(L1){END1} +\psBeforeLine[length=6,linestyle=none](L2)(B'){START} +\pspolygon[style=rayuresJaunes,linestyle=none](B)(L1)(END1)(START)(L2) +\psline[linewidth=1.5\pslinewidth,arrowinset=0]{->}(A)(B) +\uput[270](A){A} +\uput[90](B){B} +\psline[linewidth=1.5\pslinewidth,arrowinset=0,% + linestyle=dashed]{->}(A')(B') +\uput[270](A'){$\mathrm{A'}$} +\uput[90](B'){$\mathrm{B'}$} +\psset{linecolor=red,arrowsize=0.2} +\pcline[nodesepB=-4](B)(O)% Mittelpunktstrahl +\psline[linecolor=red,linestyle=dashed](B)(B')% ruckwaertige Verlaengerung +\Arrows(B)(O)% Mittelpunktstrahl +\psOutLine[length=2,arrows=->](B)(O){END6}% Mittelpunktstrahl +\psline(B)(I)(F') +\psOutLine(I)(F'){END2} +\Arrows(I)(F') +\Arrows(B)(I) +\psOutLine[length=1,linestyle=dashed](I')(B'){END3} +\psline[linestyle=dashed](B)(F) +\psline(B)(I') +\Arrows[arrows=->>](B)(I') +\psline[linestyle=dashed](B')(I') +\psline[linestyle=dashed](B')(I) +\psOutLine[length=2,arrows=->>](B')(I'){END4} +\psOutLine[length=4](B')(I'){END5} +\rput(8,0){\psset{linecolor=black}\eye} +\end{pspicture} \end{lstlisting} @@ -329,34 +333,35 @@ This is a simple system with two lenses, where the \verb|\lens| macro is used on \resizebox{\textwidth}{!}{ \begin{pspicture}*(-7.5,-3)(7.5,3) - \rput(0,0){% - \lens[% - lensGlass=true,lensWidth=0.5,lensType=DVG,% - XO=0,AB=2,OA=-4,focus=-6,spotAi=270,spotBi=90]% - \psline[linewidth=1pt](xLeft)(xRight) - } - \psOutLine[length=7](B')(I){END} + \rput(0,0){% + \lens[lensGlass=true,lensWidth=0.5,lensType=DVG,% + XO=0,AB=2,OA=-4,focus=-6,spotAi=270,spotBi=90]% + \psline[linewidth=1pt](xLeft)(xRight) + } + \psline[linecolor=red,linestyle=dashed](I')(F)% Verlaengerung des Brennstrahls + \psOutLine[length=7](B')(I){END} %pour prolonger au-delà de B' permet de définir END - \psBeforeLine[length=7](I')(B'){START}% permet de définir START - \pspolygon[style=rayuresJaunes,linestyle=none](B)(I)(END)(START)(I') - \psline(B)(I)(END) - \psline(B)(I')(START) + \psBeforeLine[length=7](I')(B'){START}% permet de définir START + \pspolygon[style=rayuresJaunes,linestyle=none](B)(I)(END)(START)(I') + \psline(B)(I)(END) + \psline(B)(I')(START) \end{pspicture}% } \begin{lstlisting} \begin{pspicture}*(-7.5,-3)(7.5,3) -\rput(0,0){% - \lens[lensGlass=true,lensType=DVG,lensWidth=0.5,% - XO=0,AB=2,OA=-4,focus=-6,spotAi=270,spotBi=90]% -} -\psOutLine[length=7](B')(I){END} -% pour prolonger au-delà de B' permet de définir END -\psBeforeLine[length=7](I')(B'){START} -% permet de définir START -\pspolygon[style=rayuresJaunes,linestyle=none](B)(I)(END)(START)(I') -\psline(B)(I)(END) -\psline(B)(I')(START) + \rput(0,0){% + \lens[lensGlass=true,lensWidth=0.5,lensType=DVG,% + XO=0,AB=2,OA=-4,focus=-6,spotAi=270,spotBi=90]% + \psline[linewidth=1pt](xLeft)(xRight) + } + \psline[linecolor=red,linestyle=dashed](I')(F)% Verlaengerung des Brennstrahls + \psOutLine[length=7](B')(I){END} +%pour prolonger au-delà de B' permet de définir END + \psBeforeLine[length=7](I')(B'){START}% permet de définir START + \pspolygon[style=rayuresJaunes,linestyle=none](B)(I)(END)(START)(I') + \psline(B)(I)(END) + \psline(B)(I')(START) \end{pspicture} \end{lstlisting} @@ -364,74 +369,61 @@ This is a simple system with two lenses, where the \verb|\lens| macro is used on \section{Virtual Image} \resizebox{\textwidth}{!}{% -\begin{pspicture}*(-7.5,-6.5)(7.5,7.5) - \rput(0,0){% - \lens[lensType=DVG,lensWidth=0.75,lensHeight=8,focus=-2,% - OA=1.5,AB=1,XO=-1,lensGlass=true,% - rayColor=red,yBottom=-5,yTop=5,drawing=false]% - \psline[linewidth=1pt](xLeft)(xRight) - } - \pnode(!XO 2.5){L1}%extrémité de la lentille sup - \pnode(!XO -2.5){L2}%extrémité de la lentille inf - {% - \psset{linecolor=red,linestyle=dashed} - \psline(L1)(B) - \psline(L2)(B)% - }{% - \psset{length=4,linestyle=none} - \psOutLine(B)(L1){A1} - \psOutLine(B)(L2){A4} - \psOutLine(L1)(B'){A2} - \psOutLine(L2)(B'){A3} - \pspolygon[style=rayuresJaunes](A1)(L1)(A2)(A3)(L2)(A4) - } - \psline[linestyle=dashed]{->}(A)(B) - \psline{->}(A')(B') - \uput[90](B){B} - \uput[90](B'){$\mathrm{B'}$} - \uput[270](A){A} - \uput[270](A'){$\mathrm{A'}$} - {% - \psset{linecolor=red} - \psline(A1)(L1)(A2) - \psline(A4)(L2)(A3)} -\end{pspicture} +\begin{pspicture*}(-7.5,-6.5)(7.5,7.5) +\rput(0,0){% + \lens[lensType=DVG,lensWidth=0.75, + lensHeight=7,focus=-2,OA=-6,AB=4,XO=-1,lensGlass=true,% + rayColor=red,yBottom=-5,yTop=5,drawing=false]% + \psline[linewidth=1pt](xLeft)(xRight)} +\pnode(!XO 2.9){L1}% extrmitdelalentillesup +\pnode(!XO -2.5){L2}% extrmitdelalentilleinf +{% + \psset{length=4,linestyle=none} + \psOutLine(B')(L1){A1} + \psOutLine(B')(L2){A2} + \pspolygon[style=rayuresJaunes,linestyle=none](B)(L1)(A1)(A2)(L2) + \psset{linecolor=red,linestyle=solid} + \psline(B)(L1)(A1) + \psline(B)(L2)(A2)% + \psline[linestyle=dashed](B')(L1) + \psline[linestyle=dashed](B')(L2)% +} +\psline[linestyle=dashed]{->}(A)(B) +\psline{->}(A')(B') +\uput[90](B){B} +\uput[90](B'){$\mathrm{B'}$} +\uput[270](A){A} +\uput[270](A'){$\mathrm{A'}$} +\end{pspicture*} } \begin{lstlisting} -\begin{pspicture}*(-7.5,-6.5)(7.5,7.5) - \rput(0,0){% - \lens[lensType=DVG,lensWidth=0.75,lensHeight=8,% - focus=-2,OA=1.5,AB=1,XO=-1,lensGlass=true,% - rayColor=red,yBottom=-5,yTop=5,drawing=false]% - \psline[linewidth=1pt](xLeft)(xRight) - } - \pnode(!XO 2.5){L1}%extrémité de la lentille sup - \pnode(!XO -2.5){L2}%extrémité de la lentille inf - {% - \psset{linecolor=red,linestyle=dashed} - \psline(L1)(B) - \psline(L2)(B)% - }{% - \psset{length=4,linestyle=none} - \psOutLine(B)(L1){A1} - \psOutLine(B)(L2){A4} - \psOutLine(L1)(B'){A2} - \psOutLine(L2)(B'){A3} - \pspolygon[style=rayuresJaunes]% - (A1)(L1)(A2)(A3)(L2)(A4) - } - \psline[linestyle=dashed]{->}(A)(B) - \psline{->}(A')(B') - \uput[90](B){B} - \uput[90](B'){$\mathrm{B'}$} - \uput[270](A){A} - \uput[270](A'){$\mathrm{A'}$} - {% - \psset{linecolor=red} - \psline(A1)(L1)(A2) - \psline(A4)(L2)(A3)} -\end{pspicture} +\begin{pspicture*}(-7.5,-6.5)(7.5,7.5) +\rput(0,0){% + \lens[lensType=DVG,lensWidth=0.75, + lensHeight=7,focus=-2,OA=-6,AB=4,XO=-1,lensGlass=true,% + rayColor=red,yBottom=-5,yTop=5,drawing=false]% + \psline[linewidth=1pt](xLeft)(xRight)} +\pnode(!XO 2.9){L1}% extrmitdelalentillesup +\pnode(!XO -2.5){L2}% extrmitdelalentilleinf +{% + \psset{length=4,linestyle=none} + \psOutLine(B')(L1){A1} + \psOutLine(B')(L2){A2} + \pspolygon[style=rayuresJaunes,linestyle=none](B)(L1)(A1)(A2)(L2) + \psset{linecolor=red,linestyle=solid} + \psline(B)(L1)(A1) + \psline(B)(L2)(A2)% + \psline[linestyle=dashed](B')(L1) + \psline[linestyle=dashed](B')(L2)% +} +\psline[linestyle=dashed]{->}(A)(B) +\psline{->}(A')(B') +\uput[90](B){B} +\uput[90](B'){$\mathrm{B'}$} +\uput[270](A){A} +\uput[270](A'){$\mathrm{A'}$} +\end{pspicture*} \end{lstlisting} \section{A Microscope} |