<?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;">The code below shows what I want (a sketch of a classical experiment with two colliding steel balls, one rolling down a track, colliding with the other ball, initially at rest).</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#000000" style="font-family:Arial;font-size:10pt;color:#000000;">I'm sorry that it's not minimal because I've embedded some raw postscript code in pst-vue3d. Of course it would be more convenient if there were some pst-vue3d commands for the semicircles and the trajectories and the track.</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;">Two other minor questions:</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#000000" style="font-family:Arial;font-size:10pt;color:#000000;">1) Is there a way to make psPrintValue align things better automatically?</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#000000" style="font-family:Arial;font-size:10pt;color:#000000;">2) The CylindreThreeD command seems to be very slow. Is it possible to adjust the number of grid lines?</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 />
<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[T1]{fontenc}</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[dvips,svgnames,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{multido}</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-grad,pst-func}</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-vue3d}</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{pstricks-add}</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[caption=false]{subfig}</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{graphicx}</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;">\parindent=0pt</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;">\pagestyle{empty}</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;">\newrgbcolor{braun}{0.6 0.1 0.2}</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=1cm, THETA=80, PHI=25, Dobs=750, Decran=25}%</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}(-5, -5)(5,5)%</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{linewidth=0.5pt,CubeColorFaceOne=0.6 0.6 0.6,CubeColorFaceTwo=0.3 0.3 0.3,CubeColorFaceThree=0.3 0.3 0.3,CubeColorFaceFour=0.3 0.3 0.3,CubeColorFaceFive=0.3 0.3 0.3,CubeColorFaceSix=0.3 0.3 0.3}%</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;">%The floor:</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;">\FrameThreeD[normaleLongitude=0,normaleLatitude=90,fillstyle=solid, fillcolor=Tan2](0,0,0)(-200,-200)(200,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;">%The legs of the table:</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;">\CubeThreeD[A=1,B=1,C=49](-145,-25,49)%</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;">\CubeThreeD[A=1,B=1,C=49](-145,25,49)%</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;">\CubeThreeD[A=1,B=1,C=49](-5,-25,49)%</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;">\CubeThreeD[A=1,B=1,C=49](-5,25,49)%</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;">%The table:</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;">\CubeThreeD[A=75,B=30,C=2](-75,0,98)%</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;">\AxesThreeD{->}(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;">%Initializing:</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{80 25 750 25 /decran exch def /dobs exch def /PHI exch def /THETA exch def /costheta THETA cos def /sintheta THETA sin def /cosphi PHI cos def /sinphi PHI sin def /projfact dobs decran div 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;">/moveto3d {/zz exch def /yy exch def /xx exch def xx costheta mul yy sintheta mul add /qq exch def qq cosphi mul zz sinphi mul add dobs div 1 sub neg projfact mul /nn exch def yy costheta mul xx sintheta mul sub nn div zz cosphi mul qq sinphi mul sub nn div moveto} 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;">/lineto3d {/zz exch def /yy exch def /xx exch def xx costheta mul yy sintheta mul add /qq exch def qq cosphi mul zz sinphi mul add dobs div 1 sub neg projfact mul /nn exch def yy costheta mul xx sintheta mul sub nn div zz cosphi mul qq sinphi mul sub nn div lineto} 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;">/hh 100 def /gg 982 def /u1 300 def /hrul 30 def /Lrul 75 def /rk1 0.04 def /rk2 0.03 def /kk hh 2 mul gg div sqrt def /x01 u1 kk mul def /m1 100 def /m2 75 def /R1 m2 m1 m2 add div x01 mul def /R2 m1 m1 m2 add div x01 mul def /rksum rk1 rk2 add 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;">\pscustom{\code{%</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;">%/Times-Roman findfont 1 scalefont setfont</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;">%/Helvetica findfont dup %finding the Helvetica font</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;">/Helvetica-ISOLatin1 findfont 0.25 scalefont setfont</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;">/cminpt 72.27 2.54 div 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;">cminpt cminpt scale</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;">/tekst 15 string 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;">0.02 setlinewidth</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;">0 0 0 moveto3d 0 200 neg 0 lineto3d stroke</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;">0.4 0.3 0.35 setrgbcolor</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;">%The track:</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;">0.05 setlinewidth</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;">0 0 hh moveto3d 0 0.1 1 {/tt exch def tt Lrul mul neg 0 tt dup mul hrul mul hh add lineto3d} for stroke</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;">0 1 hh moveto3d 0 0.1 1 {/tt exch def tt Lrul mul neg 1 tt dup mul hrul mul hh add lineto3d} for stroke</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;">0 1 neg hh moveto3d 0 0.1 1 {/tt exch def tt Lrul mul neg 1 neg tt dup mul hrul mul hh add lineto3d} for stroke</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;">0.02 setlinewidth</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;">0.9 0.2 0.75 setrgbcolor</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;">%The semicircles:</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;">R2 R1 sub 0 0 moveto3d 5 5 180 {/tt exch def tt cos R1 mul R2 sub neg tt sin R1 mul neg 0 lineto3d} for stroke </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;">R2 R2 add 0 0 moveto3d 5 5 180 {/tt exch def tt cos R2 mul R2 add tt sin R2 mul 0 lineto3d} for stroke</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;">%The trajectories:</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;">1 1 8 {/ipsi exch def ipsi 10 mul /psi exch def /VCM m1 m1 m2 add div u1 mul def /v1x VCM u1 sub psi 2 mul cos mul VCM add def /v1y VCM u1 sub psi 2 mul sin mul def /v2x psi 2 mul cos 1 add VCM mul psi cos rksum mul add def /v2y psi 2 mul sin VCM mul psi sin rksum mul add def /x1 v1x kk mul def /y1 v1y kk mul def /x20 psi cos rksum mul def /y20 psi sin rksum mul def /x2 v2x kk mul x20 add def /y2 v2y kk mul y20 add 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;">0.1 ipsi mul 0.99 1 0.1 ipsi mul sub setrgbcolor 0 0 hh moveto3d 1 1 10 {0.1 mul /tt exch def tt x1 mul tt y1 mul tt dup mul 1 sub neg hh mul lineto3d} for stroke x1 y1 5 neg moveto3d ipsi tekst cvs show </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;"> 0 0 hh moveto3d 1 1 10 {0.1 mul /tt exch def tt x2 mul tt y2 mul tt dup mul 1 sub neg hh mul lineto3d} for stroke x2 y2 5 neg moveto3d ipsi tekst cvs show</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;">%Connecting landing points with dashed lines:</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;">[.1 .1] 0 setdash 0.5 0 0 setrgbcolor x1 y1 0 moveto3d x2 y2 0 lineto3d stroke [] 0 setdash</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;">} for</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;">}}%</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}[0]{0}(5,6){$m_1=$\psPrintValue[valuewidth=4]{m1}\hspace{1.75em}g}</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}[0]{0}(5,5.5){$m_2=$\psPrintValue[valuewidth=4,xShift=4]{m2}\hspace{1.75em}g}</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}[0]{0}(5,5.0){$u_1=$\psPrintValue[valuewidth=4,xShift=4]{u1}\hspace{2em}cm/s}</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}[0]{0}(5,4.5){$h=$\psPrintValue[valuewidth=4,xShift=4]{hh}\hspace{2em}cm}</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>
</body>
</html>