diff options
Diffstat (limited to 'Master/texmf-dist/doc/generic/pstricks/voss/bsp04.tex')
-rw-r--r-- | Master/texmf-dist/doc/generic/pstricks/voss/bsp04.tex | 62 |
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} + |