<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />
<title></title>
<style type="text/css">
<!--
body{margin-left:10px;margin-right:10px;margin-top:10px;margin-bottom:10px;}
-->
</style>
</head>
<body marginleft="10" marginright="10" margintop="10" marginbottom="10">
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#000000" style="font-family:Arial;font-size:10pt;color:#000000;">Almost perfect - except that some of the circular hole is clipped off when the radius is larger than 2.5 with the actual parameters. How does that happen and how can I avoid it?</font></div>
<br />
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#000000" style="font-family:Arial;font-size:10pt;color:#000000;">Poul Riis</font></div>
<br />
<br />
<br />
<br />
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\documentclass{article}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\usepackage[x11names]{xcolor}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\usepackage{pst-tools}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\usepackage{pst-solides3d}</font></div>
<br />
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\begin{document}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \psset{unit=5mm}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \begin{pspicture}[solidmemory](-10,-15)(10,15)</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \pstVerb{/aa 10 def /bb 10 def /cc 4 def /philid 30 def /radius 3 def </font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">/cosphi philid</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> cos def /sinphi philid</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> sin def /Mlidx cosphi 1 sub aa mul 2 div def /Mlidy 0 def /Mlidz </font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">sinphi aa mul 2</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> div cc add def /nlidx</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> sinphi neg def /nlidz cosphi def /Ax Mlidx def /Ay</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> radius def /Az Mlidz def</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> /Bx Mlidx radius cosphi mul add def /By 0 def /Bz Mlidz radius sinphi</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> mul add def /Cx Mlidx</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> def /Cy radius neg def /Cz Mlidz def /ex Ax Mlidx sub def /ey Ay Mlidy </font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">sub def /ez Az Mlidz</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> sub def /fx Bx Mlidx sub def /fy By Mlidy sub def /fz Bz Mlidz sub def}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \psset{viewpoint=100 30 20,Decran=200}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \psSolid[</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> object=parallelepiped,</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> a=aa,b=bb,c=cc,</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> hollow,</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> fillcolor=Green3,</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> affinage=0,</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> affinagecoeff=1,</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> incolor=yellow](0,0,cc 2 div)</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \psSolid[object=plan,</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> definition=normalpoint,</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> args={ Mlidx 0 Mlidz [sinphi 0 cosphi neg]},</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> fillcolor=Gold3,</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> base=aa neg 2 div aa 2 div bb neg 2 div bb 2 div,</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> name=myplane]</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \psPoint(aa 0.5 mul,0,0){Tx}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \psPoint(0,bb 0.5 mul,0){Ty}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \psPoint(aa 2 div,bb 0.5 mul neg,cc 2 div){Tz}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \psPoint(Ax,Ay,Az){Alid}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \psPoint(Bx,By,Bz){Blid}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \psPoint(Cx,Cy,Cz){Clid}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \psPoint(Mlidx,Mlidy,Mlidz){MAC} </font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \psset{plan=myplane}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \defFunction[algebraic]{Circle}(t){radius*sin(t)}{radius*cos(t)}{}%</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \psProjection[object=courbeR2,</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> linecolor=Red1,fillstyle=solid,fillcolor=white,</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> range=0 TwoPi,resolution=720,function=Circle]%</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \composeSolid</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \uput{5pt}[270]{0}(Tx){$x$}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \uput{5pt}[0]{0}(Ty){$x$}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \uput{5pt}[180]{0}(Tz){$h$}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \psline[linestyle=dashed](Alid)(Clid)</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \uput{2pt}[90]{0}(MAC){$2r$}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\end{pspicture}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\end{document}</font></div>
<br />
<br />
</body>
</html>