4

It seems that transmission gratings have not been implemented yet in the pst-optexp. Does anyone know whether there exists a workaround?

1
  • write to the PSTricks mailing list and you'll get an answer of the package author.
    – user2478
    Jul 11, 2013 at 19:52

1 Answer 1

6
+150

Version 4.4 of the pst-optexp package includes a \transmissiongrating:

\documentclass[pstricks, margin=5pt]{standalone}
\usepackage{pst-optexp}
\begin{document}
\begin{pspicture}(4.1,1.6)
  \pnodes(0,1){A}(2,1){B}(4,0.5){C}
  \transmissiongrating[reverse, gratingcount=9](A)(B)(C){TG}
  \optplane[angle=-10](C)
  \addtopsstyle{Beam}{ArrowInside=->, ArrowInsidePos=0.8, arrowinset=0, arrowscale=1.5}
  \drawbeam[linecolor=black](A){1}
  \addtopsstyle{Beam}{loadbeam, savebeam=false}
  \drawbeam[linecolor=green]{1-2}
  \drawbeam[linecolor=red, beamangle=5]{1-2}
  \drawbeam[linecolor=blue, beamangle=-5]{1-2}
\end{pspicture}
\end{document}

enter image description here

You must log in to answer this question.

Not the answer you're looking for? Browse other questions tagged .