summaryrefslogtreecommitdiff
path: root/info/examples/PSTricks_en/33-03-31.ltx
diff options
context:
space:
mode:
Diffstat (limited to 'info/examples/PSTricks_en/33-03-31.ltx')
-rw-r--r--info/examples/PSTricks_en/33-03-31.ltx53
1 files changed, 53 insertions, 0 deletions
diff --git a/info/examples/PSTricks_en/33-03-31.ltx b/info/examples/PSTricks_en/33-03-31.ltx
new file mode 100644
index 0000000000..1e87f0cbb5
--- /dev/null
+++ b/info/examples/PSTricks_en/33-03-31.ltx
@@ -0,0 +1,53 @@
+%%
+%% A DANTE-Edition example
+%%
+%% Example 33-03-31 on page 702.
+%%
+%% 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{375.57637pt}
+\setlength\parindent{0pt}
+
+\usepackage{pst-optexp}
+
+\begin{document}
+\begin{pspicture}(11.7,6.4)
+ \addtopsstyle{Fiber}{linecolor=red!90!black}\psset{usefiberstyle, optboxwidth=1}
+ \pnode(1,6){LD}\pnode([Xnodesep=5.5]LD){CPLin1}\pnode([offset=-2]CPLin1){CPLin2}
+ \pnode([Xnodesep=2]CPLin1){CPLout1}\pnode([Xnodesep=2]CPLin2){CPLout2}
+ \optbox[endbox, labeloffset=0, fiber]([Xnodesep=0.1]LD)(LD){LD}
+ \optmzm([Xnodesep=0.1]LD)([Xnodesep=1.5]LD){MZM}\optamp([Xnodesep=1.5]LD)([Xnodesep=2.5]LD){EDFA}
+ \optfilter([Xnodesep=2.5]LD)([Xnodesep=3.5]LD){BPF}\optswitch([Xnodesep=3.5]LD)([Xnodesep=4.5]LD){SW}
+ \polcontrol([Xnodesep=4.5]LD)(CPLin1){}
+ \optcoupler[labeloffset=-0.4](CPLin1)(CPLin2)(CPLout1)(CPLout2){50\,\%}
+ \optamp(CPLout1)([Xnodesep=1]CPLout1){EDFA}\optfilter([Xnodesep=1]CPLout1)([Xnodesep=2]CPLout1){BPF}
+ \optbox[endbox, labeloffset=0, conn=f-f]([Xnodesep=2]CPLout1)([Xnodesep=2.2]CPLout1){RX}
+ \pnode([Xnodesep=3]CPLout2){LoopRT}\pnode([offset=-3.5]LoopRT){LoopRB}
+ \pnode([Xnodesep=-5]CPLin2){LoopLT}\pnode([offset=-3.5]LoopLT){LoopLB}
+ \optamp(CPLout2)([Xnodesep=-1]LoopRT){EDFA}
+ \psline[linearc=1, style=Fiber]([Xnodesep=-1]LoopRT)(LoopRT)([offset=-2]LoopRT)
+ \psline[linearc=1, style=Fiber]([offset=1.5]LoopRB)(LoopRB)([Xnodesep=-1]LoopRB)
+ \optfiber[labelalign=b, labeloffset=-1]([Xnodesep=-3]LoopRB)([Xnodesep=-1]LoopRB){%
+ \begin{tabular}{c}conventional\\fibre 89.8~km\end{tabular}}
+ \optamp([Xnodesep=-3]LoopRB)([Xnodesep=-4.5]LoopRB){EDFA}
+ \optfilter([Xnodesep=-4.5]LoopRB)([Xnodesep=-6]LoopRB){BPF}
+ \optfiber[fiberloops=1, labeloffset=-1, labelalign=b]([Xnodesep=-8.5]LoopRB)([Xnodesep=-6]LoopRB){DCF 16.2~km}
+ \optamp([Xnodesep=-8.5]LoopRB)(LoopLB){EDFA}
+ \psline[style=Fiber,linearc=1](LoopLB)([Xnodesep=-1]LoopLB)([Xnodesep=-1, offset=3.5]LoopLB)(LoopLT)
+ \optfilter(LoopLT)([Xnodesep=1.5]LoopLT){BPF}
+ \optswitch([Xnodesep=1.5]LoopLT)([Xnodesep=3.5]LoopLT){SW}
+ \polcontrol([Xnodesep=3.5]LoopLT)(CPLin2){}
+\end{pspicture}
+\end{document}