<html xmlns:v="urn:schemas-microsoft-com:vml" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns:m="http://schemas.microsoft.com/office/2004/12/omml" xmlns="http://www.w3.org/TR/REC-html40">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<meta name="Generator" content="Microsoft Word 15 (filtered medium)">
<style><!--
/* Font Definitions */
@font-face
{font-family:Helvetica;
panose-1:2 11 6 4 2 2 2 2 2 4;}
@font-face
{font-family:"Cambria Math";
panose-1:2 4 5 3 5 4 6 3 2 4;}
@font-face
{font-family:Calibri;
panose-1:2 15 5 2 2 2 4 3 2 4;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{margin:0cm;
margin-bottom:.0001pt;
font-size:11.0pt;
font-family:"Calibri","sans-serif";
mso-fareast-language:EN-US;}
a:link, span.MsoHyperlink
{mso-style-priority:99;
color:#0563C1;
text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
{mso-style-priority:99;
color:#954F72;
text-decoration:underline;}
span.EmailStyle17
{mso-style-type:personal-compose;
font-family:"Calibri","sans-serif";
color:windowtext;}
.MsoChpDefault
{mso-style-type:export-only;
font-family:"Calibri","sans-serif";
mso-fareast-language:EN-US;}
@page WordSection1
{size:612.0pt 792.0pt;
margin:70.85pt 70.85pt 70.85pt 70.85pt;}
div.WordSection1
{page:WordSection1;}
--></style><!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="1" />
</o:shapelayout></xml><![endif]-->
</head>
<body lang="FR" link="#0563C1" vlink="#954F72">
<div class="WordSection1">
<p class="MsoNormal"><span lang="EN-US">Dear Herbert,<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US">I come back to the quadripole in pst-circ v2.09.<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US">The following code is used in the optocoupler (line 1359, error in line 1375), quadripole (line1393, error in line 1408) and coupleur (line 2903, error in line 2916). (There is of course the same error for my newtransformerquad)
in the version I sent you yesterday) <o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US">There is a systematic error for #4 because /X4 and /Y4 are replaced by \pst@tempc instead of \pst@tempd, so the horizontal centering never takes into account the#4 coordinates. <o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US">By the way, the mechanism to center along the x-axis differs from that to center on the y-axis.<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US">If x1,y1 is the topleft, x2,y2 the bottomleft, x3,y3 the topright and x4,y4 the bottomright, we have:<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US">Xc =( greater of (x1,x2) + lower of (x3,x4))/2<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US">Yc =( lower of (y1,y3) + lower of (y2,y4))/2<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"><o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"> \pnode(!%<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"> \pst@tempa /Y1 exch \pst@number\psyunit div def<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"> /X1 exch \pst@number\psxunit div def<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"> \pst@tempb /Y2 exch \pst@number\psyunit div def<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"> /X2 exch \pst@number\psxunit div def<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"> \pst@tempc /Y3 exch \pst@number\psyunit div def<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"> /X3 exch \pst@number\psxunit div def<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"> \pst@tempc /Y4 exch \pst@number\psyunit div def<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"> /X4 exch \pst@number\psxunit div def<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"> /XC X1 X2 lt {X2} {X1} ifelse X3 X4 lt {X3} {X4} ifelse add 2 div def<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"> /YC Y1 Y3 lt {Y1} {Y3} ifelse Y2 Y4 lt {Y2} {Y4} ifelse add 2 div def<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"> XC YC){C@}<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US">Could you correct the errors with \pst@tempd.<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US">For the centering, it is more logical to take the greater of (y2,y3) but it is a question of taste.
<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US">Best regards,<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"><o:p> </o:p></span></p>
<p class="MsoNormal"><span lang="EN-US">Patrice <o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US"><o:p> </o:p></span></p>
<p class="MsoNormal" style="margin-left:18.0pt"><u><span lang="EN-US" style="font-size:22.0pt;font-family:"Helvetica","sans-serif";color:gray;mso-fareast-language:FR"><o:p><span style="text-decoration:none"> </span></o:p></span></u></p>
<p class="MsoNormal" style="margin-left:18.0pt"><u><span lang="EN-US" style="font-size:22.0pt;font-family:"Helvetica","sans-serif";color:gray;mso-fareast-language:FR">U</span></u><span lang="EN-US" style="font-size:22.0pt;font-family:"Helvetica","sans-serif";color:#A80039;mso-fareast-language:FR">MONS</span><span lang="EN-US" style="font-size:22.0pt;color:#A80039;mso-fareast-language:FR"><br>
</span><u><span lang="EN-US" style="font-size:8.0pt;color:gray;mso-fareast-language:FR">__________________________________________________________<br>
</span></u><b><span lang="EN-US" style="font-size:10.0pt;color:#969696;mso-fareast-language:FR">Prof. Dr Ir Patrice Mégret<br>
</span></b><b><span lang="EN-US" style="font-size:10.0pt;color:gray;mso-fareast-language:FR">Université de Mons - University of Mons</span></b><b><span lang="EN-US" style="font-size:10.0pt;color:gray;mso-fareast-language:FR"><o:p></o:p></span></b></p>
<p class="MsoNormal" style="margin-left:18.0pt"><b><span lang="EN-US" style="font-size:10.0pt;color:gray;mso-fareast-language:FR">Faculté Polytechnique - Faculty of Engineering<br>
</span></b><span lang="EN-US" style="font-size:10.0pt;color:#A80039;mso-fareast-language:FR">Head of Electromagnetism and Telecommunication Department<br>
</span><span lang="EN-US" style="font-size:10.0pt;color:gray;mso-fareast-language:FR">Boulevard Dolez 31<br>
7000 Mons<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-left:18.0pt"><span lang="EN-US" style="font-size:10.0pt;color:gray;mso-fareast-language:FR">Belgium<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-left:18.0pt"><span lang="EN-US" style="font-size:10.0pt;color:gray;mso-fareast-language:FR">+32(0)65/37.41.91 (direct)<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-left:18.0pt"><span lang="EN-US" style="font-size:10.0pt;color:gray;mso-fareast-language:FR">+32(0)65/37.41.47 (secretary)<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-left:18.0pt"><span lang="EN-US" style="font-size:10.0pt;color:gray;mso-fareast-language:FR">+32(0)65/37.41.99 (fax)<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-left:18.0pt"><span style="mso-fareast-language:FR"><a href="http://www.umons.ac.be/telecom"><span lang="EN-US" style="font-size:10.0pt;color:blue">www.umons.ac.be/telecom</span></a></span><span lang="EN-US" style="font-size:10.0pt;color:gray;mso-fareast-language:FR"><o:p></o:p></span></p>
<p class="MsoNormal" style="margin-left:18.0pt"><span style="mso-fareast-language:FR"><a href="http://people.umons.ac.be/patrice.megret"><span lang="EN-US" style="font-size:10.0pt;color:blue">people.umons.ac.be/patrice.megret</span></a></span><span lang="EN-US" style="font-size:10.0pt;color:gray;mso-fareast-language:FR"><o:p></o:p></span></p>
<p class="MsoNormal" style="mso-margin-top-alt:0cm;margin-right:0cm;margin-bottom:12.0pt;margin-left:18.0pt">
<u><span lang="FR-BE" style="font-size:8.0pt;color:gray;mso-fareast-language:FR">__________________________________________________________</span></u><span lang="FR-BE" style="font-size:10.0pt;color:gray;mso-fareast-language:FR"><o:p></o:p></span></p>
<p class="MsoNormal"><o:p> </o:p></p>
</div>
</body>
</html>