Hi,<br><br>I'm suggesting new drawing for dipole in pst-circ :<br><br>%%%%% A switch with an opening version called switcho<br>\def\pst@draw@switcho{%<br>  \ifx\psk@Dstyle\pst@Dstyle@close<br>    \pnode(-0.5,0){dipole@1}<br>
    \pnode(0.5,0){dipole@2}<br>    \qdisk(-0.5,0){1.5pt}<br>    \qdisk(0.5,0){1.5pt}<br>    \psline[arrows=-,linewidth=2\pslinewidth](-0.5,0.05)(0.5,0.05)<br>  \else<br>    \pnode(-0.55,0){dipole@1}<br>    \pnode(0.5,0){dipole@2}<br>
    \psline[arrows=-,linewidth=2\pslinewidth](-0.5,0)(0.5,0.25)<br>    \psarcn[arrowinset=0]{<-}(-0.5,0){0.75}{45}{-45}<br>    \pscircle[fillstyle=solid](-0.5,0){0.07}<br>    \qdisk(0.5,0){1.5pt}<br>  \fi<br>}<br>%%%%%%<br>
<br><br>%%%%%% a new design for coil<br>\def\pst@draw@coil{%<br>\psset{linewidth=1.5\pslinewidth}<br>        \pscurve[arrows=-](-0.63,0)(-0.45,0.2)(-0.25,0)(-0.3,-0.18)<br>      (-0.35,0)(-0.15,0.2)(0.05,0)(0,-0.18)(-0.05,0)<br>
      (0.15,0.2)(0.35,0)<br>      (0.3,-0.18)(0.25,0)(0.45,.2)(0.63,0)<br>    \pnode(-0.63,0){dipole@1}<br>    \pnode(0.63,0){dipole@2}<br>  \ifPst@variable\psline{->}(-0.75,-0.5)(0.75,0.5)\fi%<br>  }<br>  %%%%%%%<br><br>
<br>%%%%%%%% a new generator<br>\def\pst@draw@Uccc{%<br>  \pnode(-0.5,0){dipole@1}<br>  \pnode(0.5,0){dipole@2}<br>    \pscircle[linewidth=1.5\pslinewidth](0,0){0.5}<br>    \psline[linewidth=1.5\pslinewidth](-0.5,0)(0.5,0)<br>
}<br>%%%%%%%%%%<br><br>Best regards<font color="#0000ff"><font color="#000000"> </font></font><br><br>Fabien<br>