 \def\JPicScale{0.7}
 %\ifx\JPicScale\undefined\def\JPicScale{1}\fi
 \psset{unit=\JPicScale mm}
 \psset{linewidth=0.3,dotsep=1,hatchwidth=0.3,hatchsep=1.5,shadowsize=1,dimen=middle}
 \psset{dotsize=0.7 2.5,dotscale=1 1,fillcolor=black}
 \psset{arrowsize=1 2,arrowlength=1,arrowinset=0.25,tbarsize=0.7 5,bracketlength=0.15,rbracketlength=0.15}
 %\begin{pspicture}(0,0)(223.95,91.5)
 %\begin{pspicture}(10,50)(233.95,91.5)
 \begin{pspicture}(-5,65)(233.95,100)
 \rput{0}(58.57,63.5){\psellipse[fillstyle=crosshatch,linewidth=0.5,linestyle=dashed,dash=1 1](0,0)(2.53,2.47)}
 \rput{0}(72.86,63.5){\psellipse*[linewidth=0.75](0,0)(2.53,2.47)}
 \rput{0}(87.14,63.5){\psellipse*[fillstyle=crosshatch,linewidth=0.5,linestyle=dashed,dash=1 1](0,0)(2.53,2.47)}
 \rput{0}(101.43,63.5){\psellipse[fillstyle=crosshatch,linewidth=0.5,linestyle=dashed,dash=1 1](0,0)(2.53,2.47)}
 %\pspolygon[linewidth=0.75](58.57,91.5)(62.14,91.5)(62.14,88)(58.57,88)
 \rput{0}(60,90){\psellipse[linewidth=0.5](0,0)(2.53,2.47)}
 %\pspolygon[linewidth=0.75](78.31,91.32)(81.88,91.32)(81.88,87.82)(78.31,87.82)
 \rput{0}(80,90){\psellipse[linewidth=0.5](0,0)(2.53,2.47)}
 %\pspolygon[linewidth=0.75](97.76,91.32)(101.34,91.32)(101.34,87.82)(97.76,87.82)
 \rput{0}(99,90){\psellipse[linewidth=0.5](0,0)(2.53,2.47)}
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](55.75,63.47)(58.57,88)
 \psbezier(58.57,88)(58.57,88)(58.57,88)(58.57,88)
 \psbezier(58.57,88)(58.57,88)(58.57,88)(58.57,88)
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](57.44,65.68)(57.26,65.68)
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](60.36,87.97)(57.73,65.71)
 \psline[linewidth=0.75](62.05,87.54)(70.23,63.5)
 \psline(70.23,63.5)(70.23,63.32)
 \psline[linewidth=0.75](70.41,64.7)(78.31,87.82)
 \psline[linewidth=0.75](71.73,65.62)(79.25,87.54)
 \psline[linewidth=0.75](72.86,65.98)(80.28,87.73)
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](85.45,65.25)(80.94,87.82)
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](81.97,87.45)(99.55,65.07)
 \psline(74.36,65.34)(74.46,65.34)
 \psline[linewidth=0.75](74.36,65.34)(97.67,87.82)
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](98.89,87.63)(87.42,65.8)
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](100.39,87.63)(88.74,65.62)
 \rput{0}(118.57,63.5){\psellipse[fillstyle=crosshatch,linewidth=0.5,linestyle=dashed,dash=1 1](0,0)(2.53,2.47)}
 \rput{0}(132.86,63.5){\psellipse[fillstyle=crosshatch,linewidth=0.5,linestyle=dashed,dash=1 1](0,0)(2.53,2.47)}
 \rput{0}(147.14,63.5){\psellipse*[linewidth=0.75](0,0)(2.53,2.47)}
 \rput{0}(161.43,63.5){\psellipse[fillstyle=crosshatch,linewidth=0.5,linestyle=dashed,dash=1 1](0,0)(2.53,2.47)}
 %\pspolygon[linewidth=0.5,linestyle=dashed,dash=1 1](118.57,91.5)(122.14,91.5)(122.14,88)(118.57,88)
 \rput{0}(120,90){\psellipse[linewidth=0.5,linestyle=dashed,dash=1 1](0,0)(2.53,2.47)}
 %\pspolygon[linewidth=0.75](138.31,91.32)(141.88,91.32)(141.88,87.82)(138.31,87.82)
 \rput{0}(140,90){\psellipse[linewidth=0.5](0,0)(2.53,2.47)}
 %\pspolygon[linewidth=0.75](157.76,91.32)(161.34,91.32)(161.34,87.82)(157.76,87.82)
 \rput{0}(159,90){\psellipse[linewidth=0.5](0,0)(2.53,2.47)}
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](115.75,63.47)(118.57,88)
 \psbezier[linewidth=0.5,linestyle=dashed,dash=1 1](118.57,88)(118.57,88)(118.57,88)(118.57,88)
 \psbezier[linewidth=0.5,linestyle=dashed,dash=1 1](118.57,88)(118.57,88)(118.57,88)(118.57,88)
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](117.44,65.68)(117.26,65.68)
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](120.36,87.97)(117.73,65.71)
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](122.05,87.54)(130.23,63.5)
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](130.23,63.5)(130.23,63.32)
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](130.41,64.7)(138.31,87.82)
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](131.73,65.62)(139.25,87.54)
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](132.86,65.98)(140.28,87.73)
 \psline[linewidth=0.75](145.45,65.25)(140.94,87.82)
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](141.97,87.45)(159.55,65.07)
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](134.36,65.34)(134.46,65.34)
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](134.36,65.34)(157.67,87.82)
 \psline[linewidth=0.75](158.89,87.63)(147.42,65.8)
 \psline[linewidth=0.75](160.39,87.63)(148.74,65.62)
 \rput{0}(178.57,63.5){\psellipse[fillstyle=crosshatch,linewidth=0.5,linestyle=dashed,dash=1 1](0,0)(2.53,2.47)}
 \rput{0}(192.86,63.5){\psellipse[fillstyle=crosshatch,linewidth=0.5,linestyle=dashed,dash=1 1](0,0)(2.53,2.47)}
 \rput{0}(207.14,63.5){\psellipse[fillstyle=crosshatch,linewidth=0.5,linestyle=dashed,dash=1 1](0,0)(2.53,2.47)}
 \rput{0}(221.43,63.5){\psellipse*[linewidth=0.75](0,0)(2.53,2.47)}
 %\pspolygon[linewidth=0.5,linestyle=dashed,dash=1 1](178.57,91.5)(182.14,91.5)(182.14,88)(178.57,88)
 \rput{0}(180,90){\psellipse[linewidth=0.5,linestyle=dashed,dash=1 1](0,0)(2.53,2.47)}
 %\pspolygon[linewidth=0.75](198.31,91.32)(201.88,91.32)(201.88,87.82)(198.31,87.82)
 \rput{0}(200,90){\psellipse[linewidth=0.5](0,0)(2.53,2.47)}
 %\pspolygon[linewidth=0.5,linestyle=dashed,dash=1 1](217.76,91.32)(221.34,91.32)(221.34,87.82)(217.76,87.82)
 \rput{0}(219,90){\psellipse[linewidth=0.5,linestyle=dashed,dash=1 1](0,0)(2.53,2.47)}
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](175.75,63.47)(178.57,88)
 \psbezier[linewidth=0.5,linestyle=dashed,dash=1 1](178.57,88)(178.57,88)(178.57,88)(178.57,88)
 \psbezier[linewidth=0.5,linestyle=dashed,dash=1 1](178.57,88)(178.57,88)(178.57,88)(178.57,88)
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](177.44,65.68)(177.26,65.68)
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](180.36,87.97)(177.73,65.71)
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](182.05,87.54)(190.23,63.5)
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](190.23,63.5)(190.23,63.32)
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](190.41,64.7)(198.31,87.82)
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](191.73,65.62)(199.25,87.54)
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](192.86,65.98)(200.28,87.73)
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](205.45,65.25)(200.94,87.82)
 \psline[linewidth=0.75](201.97,87.45)(219.55,65.07)
 \psline[linewidth=0.5,linestyle=dashed,dash=1 1](194.36,65.34)(194.46,65.34)
 \psline[linewidth=0.5,linestyle=dashed,dash=1
1](194.36,65.34)(217.67,87.82)
 \psline[linewidth=0.5,linestyle=dashed,dash=1
1](218.89,87.63)(207.42,65.8)
 \psline[linewidth=0.5,linestyle=dashed,dash=1
1](220.39,87.63)(208.74,65.62)
 \rput{0}(-1.43,63.5){\psellipse*[linewidth=0.75](0,0)(2.53,2.47)}
 \rput{0}(12.86,63.5){\psellipse[fillstyle=crosshatch,linewidth=0.5,linestyle=dashed,dash=1
1](0,0)(2.53,2.47)}
 \rput{0}(27.14,63.5){\psellipse[fillstyle=crosshatch,linewidth=0.5,linestyle=dashed,dash=1
1](0,0)(2.53,2.47)}
 \rput{0}(41.43,63.5){\psellipse[fillstyle=crosshatch,linewidth=0.5,linestyle=dashed,dash=1
1](0,0)(2.53,2.47)}
 %\pspolygon[linewidth=0.75](-1.43,91.5)(2.14,91.5)(2.14,88)(-1.43,88)
  \rput{0}(0,90){\psellipse[linewidth=0.5](0,0)(2.53,2.47)}
 %\pspolygon[linewidth=0.5,linestyle=dashed,dash=1
%1](18.31,91.32)(21.88,91.32)(21.88,87.82)(18.31,87.82)
 \rput{0}(20,90){\psellipse[linewidth=0.5,linestyle=dashed,dash=1 1](0,0)(2.53,2.47)}
 %\pspolygon[linewidth=0.5,linestyle=dashed,dash=1
%1](37.76,91.32)(41.34,91.32)(41.34,87.82)(37.76,87.82)
 \rput{0}(39,90){\psellipse[linewidth=0.5,linestyle=dashed,dash=1 1](0,0)(2.53,2.47)}
 \psline[linewidth=0.75](-4.25,63.47)(-1.43,88)
 \psbezier(-1.43,88)(-1.43,88)(-1.43,88)(-1.43,88)
 \psbezier(-1.43,88)(-1.43,88)(-1.43,88)(-1.43,88)
 \psline(-2.56,65.68)(-2.74,65.68)
 \psline[linewidth=0.75](0.36,87.97)(-2.27,65.71)
 \psline[linewidth=0.5,linestyle=dashed,dash=1
1](2.05,87.54)(10.23,63.5)
 \psline[linewidth=0.5,linestyle=dashed,dash=1
1](10.23,63.5)(10.23,63.32)
 \psline[linewidth=0.5,linestyle=dashed,dash=1
1](10.41,64.7)(18.31,87.82)
 \psline[linewidth=0.5,linestyle=dashed,dash=1
1](11.73,65.62)(19.25,87.54)
 \psline[linewidth=0.5,linestyle=dashed,dash=1
1](12.86,65.98)(20.28,87.73)
 \psline[linewidth=0.5,linestyle=dashed,dash=1
1](25.45,65.25)(20.94,87.82)
 \psline[linewidth=0.5,linestyle=dashed,dash=1
1](21.97,87.45)(39.55,65.07)
 \psline[linewidth=0.5,linestyle=dashed,dash=1
1](14.36,65.34)(14.46,65.34)
 \psline[linewidth=0.5,linestyle=dashed,dash=1
1](14.36,65.34)(37.67,87.82)
 \psline[linewidth=0.5,linestyle=dashed,dash=1
1](38.89,87.63)(27.42,65.8)
 \psline[linewidth=0.5,linestyle=dashed,dash=1
1](40.39,87.63)(28.74,65.62)
 \end{pspicture}

%\vspace{-1cm} {\small\it {\bf Fig 2}\pointir Coding a diagram with a
%word of multidegrees. The subgraphs from the blackspots correspond
%successively to the multidegrees $(2)$ (two lines to the first
�%white spot), $(1,3,1)$ (one line to the first and third and three
%lines to the second), similarly the other black spots give $(0,1,2)$
%and $(0,1)$. The code is then $W(d)=(2)(1,3,1)(0,1,2)(0,1)$.}

