summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/generic/pstricks/voss/bsp04.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/generic/pstricks/voss/bsp04.tex')
-rw-r--r--Master/texmf-dist/doc/generic/pstricks/voss/bsp04.tex62
1 files changed, 62 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/generic/pstricks/voss/bsp04.tex b/Master/texmf-dist/doc/generic/pstricks/voss/bsp04.tex
new file mode 100644
index 00000000000..ba120e60768
--- /dev/null
+++ b/Master/texmf-dist/doc/generic/pstricks/voss/bsp04.tex
@@ -0,0 +1,62 @@
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%% bsp04.tex ---
+%% Autor : Herbert Voss <voss@perce.de> (nach einer Idee von ???)
+%% Datum : 2004-04-25
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\documentclass{article}
+\usepackage[T1]{fontenc}
+\usepackage{pstricks}
+\usepackage{pst-slpe}
+\usepackage{pst-node}
+
+\def\OneDot{\psdot(0,0)}
+\def\TwoDots{\psdots(0,0.2)(0,-0.2)}
+\def\ObjectA{%
+ \pscircle[fillstyle=ccslope,slopebegin=white,slopeend=blue,
+ slopecenter=0.2 0.5](0.5,0.5){0.55}}
+\def\ObjectB{%
+ \psccurve[fillstyle=ccslope,slopebegin=white,slopeend=blue,
+ slopecenter=0.9 0.5](0,0.3)(0.2,0)(0.8,0.1)(1,0.2)(1,0.8)(0.8,0.9)(0.2,1)(0,0.8)}
+\def\ObjectC#1{%
+ \psccurve[fillstyle=solid,fillcolor=white]%
+ (0,0.3)(0.2,0)(0.8,0.1)(1,0.2)(1,0.8)(0.8,0.9)(0.2,1)(0,0.8)
+ \rput(0.5,0.5){#1}}
+\def\ObjectD#1{%
+ \pscircle[fillstyle=solid,fillcolor=white](0.5,0.5){0.55}
+ \rput(0.5,0.5){#1}}
+\def\Molecule#1#2#3{%
+ \pspicture(3,1.1)
+ \psset{dotscale=1.5}%
+ \rput(1.3,0.1){\ObjectA}
+ \rput(0.1,0.1){#1}
+ \rput{180}(2.9,1.1){#2}
+ \rput(1,0){\ObjectD{#3}}
+ \endpspicture%
+}
+\def\MoleculeA{\Molecule{\ObjectB}{\ObjectC{\TwoDots}}{\OneDot}}
+\def\MoleculeB{\Molecule{\ObjectB}{\ObjectC{\OneDot}}{\TwoDots}}
+\def\MoleculeC{\Molecule{\ObjectC{\OneDot}}{\ObjectB}{\TwoDots}}
+\def\MoleculeD{\Molecule{\ObjectC{\TwoDots}}{\ObjectB}{\OneDot}}
+%
+\parindent=0pt
+\pagestyle{empty}
+\begin{document}
+
+\begin{psmatrix}[colsep=0.5]
+ [name=MoleculeA] \MoleculeA \\[0pt]
+ [name=MoleculeB] \MoleculeB & [name=MoleculeC] \MoleculeC \\
+ & [name=MoleculeD] \MoleculeD
+\end{psmatrix}
+% Connections and labels
+\psset{arrowscale=2}
+\ncline[offset=0.2,linewidth=0.15]{MoleculeA}{MoleculeB}
+\ncline[offset=0.2,linewidth=0.15]{MoleculeC}{MoleculeD}
+\ncarc[offset=-0.4,arcangle=60]{MoleculeB}{MoleculeC}
+\naput{\psline[linestyle=dashed]{<-}(1,2)\rput[l](1.2,2){singlet coupling}}
+\ncbar[linestyle=dashed,angleA=-60,angleB=-135,armB=0]{<->}{MoleculeB}{MoleculeC}
+\nbput[npos=0.9]{lone pair repulsion}
+\nbput[npos=0.2]{$\pi_2$}
+\nbput[npos=1.8]{$\pi_3$}
+
+\end{document}
+