summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/generic/pst-vue3d/examples
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/generic/pst-vue3d/examples')
-rw-r--r--Master/texmf-dist/doc/generic/pst-vue3d/examples/ChaiseDemo.pdfbin0 -> 4667 bytes
-rw-r--r--Master/texmf-dist/doc/generic/pst-vue3d/examples/ChaiseDemo.tex36
-rw-r--r--Master/texmf-dist/doc/generic/pst-vue3d/examples/CoorDemo.pdfbin0 -> 3737 bytes
-rw-r--r--Master/texmf-dist/doc/generic/pst-vue3d/examples/CoorDemo.tex25
-rw-r--r--Master/texmf-dist/doc/generic/pst-vue3d/examples/FrameDemo.pdfbin0 -> 6799 bytes
-rw-r--r--Master/texmf-dist/doc/generic/pst-vue3d/examples/FrameDemo.tex58
-rw-r--r--Master/texmf-dist/doc/generic/pst-vue3d/examples/Line3d.pdfbin0 -> 152459 bytes
-rw-r--r--Master/texmf-dist/doc/generic/pst-vue3d/examples/Line3d.tex66
-rw-r--r--Master/texmf-dist/doc/generic/pst-vue3d/examples/PontDemo.pdfbin0 -> 37426 bytes
-rw-r--r--Master/texmf-dist/doc/generic/pst-vue3d/examples/PontDemo.tex69
-rw-r--r--Master/texmf-dist/doc/generic/pst-vue3d/examples/PontDemo2.pdfbin0 -> 251664 bytes
-rw-r--r--Master/texmf-dist/doc/generic/pst-vue3d/examples/PontDemo2.tex173
-rw-r--r--Master/texmf-dist/doc/generic/pst-vue3d/examples/PontDemo3.pdfbin0 -> 119962 bytes
-rw-r--r--Master/texmf-dist/doc/generic/pst-vue3d/examples/PontDemo3.tex170
-rw-r--r--Master/texmf-dist/doc/generic/pst-vue3d/examples/PyramidDemo.pdfbin0 -> 2148 bytes
-rw-r--r--Master/texmf-dist/doc/generic/pst-vue3d/examples/PyramidDemo.tex17
-rw-r--r--Master/texmf-dist/doc/generic/pst-vue3d/examples/SphereDemo0.pdfbin0 -> 196799 bytes
-rw-r--r--Master/texmf-dist/doc/generic/pst-vue3d/examples/SphereDemo0.tex57
18 files changed, 671 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/generic/pst-vue3d/examples/ChaiseDemo.pdf b/Master/texmf-dist/doc/generic/pst-vue3d/examples/ChaiseDemo.pdf
new file mode 100644
index 00000000000..426b0741a34
--- /dev/null
+++ b/Master/texmf-dist/doc/generic/pst-vue3d/examples/ChaiseDemo.pdf
Binary files differ
diff --git a/Master/texmf-dist/doc/generic/pst-vue3d/examples/ChaiseDemo.tex b/Master/texmf-dist/doc/generic/pst-vue3d/examples/ChaiseDemo.tex
new file mode 100644
index 00000000000..8cca398d509
--- /dev/null
+++ b/Master/texmf-dist/doc/generic/pst-vue3d/examples/ChaiseDemo.tex
@@ -0,0 +1,36 @@
+\documentclass[a4paper]{article}
+\usepackage{geometry}
+\parindent=0pt
+\usepackage{pstricks,pst-vue3d}
+%
+\definecolor{marron}{rgb}{1,0.55,0}
+\def\Sol{%
+ \psset{normaleLongitude=90,normaleLatitude=90}
+ \FrameThreeD[fillcolor=lightgray,fillstyle=solid](0,0,-2)(2,-2)(-2,2)
+ \QuadrillageThreeD[grille=.5,linecolor=red](0,0,-2)(-2,-2)(2,2)%
+ \QuadrillageThreeD[grille=0.75,linecolor=cyan](0,0,-2)(-2,-2)(2,2)%
+}
+\def\chaise{%
+ \FrameThreeD[normaleLatitude=0,normaleLongitude=0,%
+ fillcolor=marron,fillstyle=solid](-0.8,1,2)(0.2,0)(1.8,1)
+ \CubeThreeD[A=.1,B=0.1,C=0.9](0.9,-0.9,-1.1)
+ \CubeThreeD[A=.1,B=0.1,C=0.9](0.9,0.9,-1.1)
+ \CubeThreeD[A=.1,B=0.1,C=2](-0.9,0.9,0)
+ \CubeThreeD[A=.1,B=0.1,C=2](-0.9,-0.9,0)
+ \CubeThreeD[A=0.9,B=1,C=0.1](0.1,0,-0.1)
+}
+\begin{document}
+
+\begin{center}
+ \begin{pspicture}(-5.5,-7)(5,4.5)
+ \psset{THETA=30,PHI=20,Dobs=10,Decran=20}
+ \Sol\chaise
+ \pNodeThreeD(-0.5,-0.3,0){littleChair}
+ \rput[lC](littleChair){%
+ \psset{THETA=30,PHI=20,Dobs=100,Decran=20}
+ \Sol\chaise%
+ }
+ \end{pspicture}
+\end{center}
+
+\end{document}
diff --git a/Master/texmf-dist/doc/generic/pst-vue3d/examples/CoorDemo.pdf b/Master/texmf-dist/doc/generic/pst-vue3d/examples/CoorDemo.pdf
new file mode 100644
index 00000000000..aef6fe88b44
--- /dev/null
+++ b/Master/texmf-dist/doc/generic/pst-vue3d/examples/CoorDemo.pdf
Binary files differ
diff --git a/Master/texmf-dist/doc/generic/pst-vue3d/examples/CoorDemo.tex b/Master/texmf-dist/doc/generic/pst-vue3d/examples/CoorDemo.tex
new file mode 100644
index 00000000000..11a009fb95d
--- /dev/null
+++ b/Master/texmf-dist/doc/generic/pst-vue3d/examples/CoorDemo.tex
@@ -0,0 +1,25 @@
+\documentclass[12pt]{article}
+\usepackage{pstricks}
+\usepackage{pst-vue3d}
+\SpecialCoor
+\makeatletter
+%
+\makeatother
+\begin{document}
+
+\psset{unit=3}
+\begin{pspicture}(-1.5,-0.75)(2.5,2.25)
+ \AxesThreeD(20)
+ \pNodeThreeD(15,18,15){P}% cartesian
+ \uput[0](P){P}
+ \psset{linecolor=red}
+ \qdisk(P){3pt}
+ \showCoorThreeD[linecolor=red](15,18,15)
+ \psset{linecolor=blue}
+ \pNodeThreeD(20;60;40){Q}% spherical
+ \uput[0](Q){Q}
+ \qdisk(Q){3pt}
+ \showCoorThreeD[linecolor=blue](20;60;40)
+\end{pspicture}
+
+\end{document}
diff --git a/Master/texmf-dist/doc/generic/pst-vue3d/examples/FrameDemo.pdf b/Master/texmf-dist/doc/generic/pst-vue3d/examples/FrameDemo.pdf
new file mode 100644
index 00000000000..3c64334088c
--- /dev/null
+++ b/Master/texmf-dist/doc/generic/pst-vue3d/examples/FrameDemo.pdf
Binary files differ
diff --git a/Master/texmf-dist/doc/generic/pst-vue3d/examples/FrameDemo.tex b/Master/texmf-dist/doc/generic/pst-vue3d/examples/FrameDemo.tex
new file mode 100644
index 00000000000..b21e6794ccf
--- /dev/null
+++ b/Master/texmf-dist/doc/generic/pst-vue3d/examples/FrameDemo.tex
@@ -0,0 +1,58 @@
+\documentclass[12pt]{article} % Herbert Voss 2003-12-20
+\usepackage{pst-vue3d,multido}
+\begin{document}
+
+\fbox{\begin{pspicture}(-1.3,-0.75)(2,1.1)
+\FrameThreeD[%
+ normaleLatitude=0,%
+ normaleLongitude=0,%
+ fillcolor=green,fillstyle=solid](0,0,0)(-10,-5)(10,5)%
+\AxesThreeD[linecolor=red](20,15,10)
+\end{pspicture}%
+}
+\hfill
+\fbox{\begin{pspicture}(-1.3,-0.75)(2,1.1)
+\FrameThreeD[%
+ normaleLatitude=90,%
+ normaleLongitude=0,%
+ fillcolor=green,fillstyle=solid](0,0,0)(-10,-5)(10,5)%
+\AxesThreeD[linecolor=red](20,15,10)
+\end{pspicture}%
+}%
+\hfill
+\fbox{\begin{pspicture}(-1.3,-0.75)(2,1.1)
+\FrameThreeD[%
+ normaleLatitude=0,%
+ normaleLongitude=90,%
+ fillcolor=green,fillstyle=solid](0,0,0)(-10,-5)(10,5)%
+\AxesThreeD[linecolor=red](20,15,10)
+\end{pspicture}
+}
+
+
+
+\fbox{\begin{pspicture}(-1.3,-0.75)(2,1.1)
+\psset{normaleLatitude=0,normaleLongitude=0,linewidth=0.5pt}
+\FrameThreeD[fillcolor=cyan,fillstyle=solid](0,0,0)(-10,-5)(10,5)%
+\QuadrillageThreeD[grille=2.5,linecolor=black,pas=5](0,0,0)(-10,-5)(10,5)%
+\AxesThreeD[linecolor=red](20,15,10)
+\end{pspicture}%
+}
+\hfill
+\fbox{\begin{pspicture}(-1.3,-0.75)(2,1.1)
+\psset{normaleLatitude=90,normaleLongitude=0,linewidth=0.5pt}
+\FrameThreeD[fillcolor=cyan,fillstyle=solid](0,0,0)(-10,-5)(10,5)%
+\QuadrillageThreeD[grille=2.5,linecolor=black](0,0,0)(-10,-5)(10,5)%
+\AxesThreeD[linecolor=red](20,15,10)
+\end{pspicture}%
+}%
+\hfill
+\fbox{\begin{pspicture}(-1.3,-0.75)(2,1.1)
+\psset{normaleLatitude=0,normaleLongitude=90,linewidth=0.5pt}
+\FrameThreeD[fillcolor=cyan,fillstyle=solid](0,0,0)(-10,-5)(10,5)%
+\QuadrillageThreeD[grille=2.5,linecolor=black](0,0,0)(-10,-5)(10,5)%
+\AxesThreeD[linecolor=red](20,15,10)
+\end{pspicture}
+}
+
+\end{document}
diff --git a/Master/texmf-dist/doc/generic/pst-vue3d/examples/Line3d.pdf b/Master/texmf-dist/doc/generic/pst-vue3d/examples/Line3d.pdf
new file mode 100644
index 00000000000..ae2b3652466
--- /dev/null
+++ b/Master/texmf-dist/doc/generic/pst-vue3d/examples/Line3d.pdf
Binary files differ
diff --git a/Master/texmf-dist/doc/generic/pst-vue3d/examples/Line3d.tex b/Master/texmf-dist/doc/generic/pst-vue3d/examples/Line3d.tex
new file mode 100644
index 00000000000..1796dd659f8
--- /dev/null
+++ b/Master/texmf-dist/doc/generic/pst-vue3d/examples/Line3d.tex
@@ -0,0 +1,66 @@
+\documentclass[12pt,a4paper]{article}
+\usepackage{pstricks}
+\usepackage{pst-vue3d}
+\usepackage{multido}
+\usepackage{geometry}
+%
+\begin{document}
+
+ \psset{unit=1cm}
+ \begin{pspicture}(-3,-3)(3,4)
+ \psset{THETA=70,PHI=30,Dobs=150,Decran=10}
+ \AxesThreeD[linecolor=red,linestyle=dashed](50,60,50)
+ \pNodeThreeD(25,-25,25){A}
+ \pNodeThreeD(25,25,25){B}
+ \pNodeThreeD(25,25,-25){C}
+ \pNodeThreeD(25,-25,-25){D}
+ \pNodeThreeD(-25,-25,25){E}
+ \pNodeThreeD(-25,25,25){F}
+ \pNodeThreeD(-25,25,-25){G}
+ \pNodeThreeD(-25,-25,-25){H}
+ \pspolygon(A)(B)(C)(D)
+ \pspolygon(E)(F)(G)(H)
+ \psline(A)(E)
+ \psline(B)(F)
+ \psline(C)(G)
+ \psline(D)(H)
+ \psset{linestyle=dashed}
+ \psline(A)(G)
+ \psline(B)(H)
+ \psline(C)(E)
+ \psline(D)(F)
+% routine page 49 in "présentation de PSTricks"
+% D.Girou "cahier 16 Gutengerg"
+ \newcounter{lettre}
+ \multido{\i=1+1}{8}{%
+ \setcounter{lettre}{\i}
+ \psdot[linecolor=red](\Alph{lettre})
+ \uput[90](\Alph{lettre}){\Alph{lettre}}
+ }
+\end{pspicture}
+
+
+
+ \begin{pspicture}(-2.5,-3.5)(3.5,1.5)
+ \psset{THETA=50,PHI=50,Dobs=250,Decran=10}
+ \multido{\iX=-70+10}{15}{%
+ \pNodeThreeD(\iX,0,0){X1}
+ \pNodeThreeD(\iX,50,0){X2}
+ \psline(X1)(X2)
+ }
+ \multido{\iY=0+10}{6}{%
+ \pNodeThreeD(-70,\iY,0){Y1}
+ \pNodeThreeD(70,\iY,0){Y2}
+ \psline(Y1)(Y2)%
+ }
+ \psset{normaleLongitude=0,normaleLatitude=90}
+ \multido{\iXorigine=-65+10}{14}{%
+ \multido{\iYorigine=5+10}{5}{%
+ \CircleThreeD[linecolor=red](\iXorigine,\iYorigine,0){5}%
+ }%
+ }
+ \end{pspicture}%
+
+
+
+\end{document}
diff --git a/Master/texmf-dist/doc/generic/pst-vue3d/examples/PontDemo.pdf b/Master/texmf-dist/doc/generic/pst-vue3d/examples/PontDemo.pdf
new file mode 100644
index 00000000000..e82f795d86e
--- /dev/null
+++ b/Master/texmf-dist/doc/generic/pst-vue3d/examples/PontDemo.pdf
Binary files differ
diff --git a/Master/texmf-dist/doc/generic/pst-vue3d/examples/PontDemo.tex b/Master/texmf-dist/doc/generic/pst-vue3d/examples/PontDemo.tex
new file mode 100644
index 00000000000..1e0608c2b11
--- /dev/null
+++ b/Master/texmf-dist/doc/generic/pst-vue3d/examples/PontDemo.tex
@@ -0,0 +1,69 @@
+\documentclass[a4paper]{article}
+\usepackage{geometry}
+\parindent=0pt
+\usepackage{pstricks,pst-grad,multido,pst-plot,pst-vue3d}
+%
+\input realcalc
+%
+\psset{dimen=middle}
+\newcommand{\cables}{%
+ \multido{\iY=-2+4}{2}{%
+ \parametricplot[linewidth=3\pslinewidth]{-5}{5}{%
+ \variablesTroisD
+ /Xabscisse t def
+ /Yordonnee \iY\space def
+ /Zcote 0.1 Xabscisse dup mul mul def
+ tx@3DDict begin
+ formulesTroisD
+ Xi Yi
+ end
+ }
+ \multido{\nCable=-4.5+0.5}{20}{%
+ \Rmul\cote\nCable\nCable
+ \Rmul\cote\cote{0.1}
+ \LineThreeD(\nCable,\iY,\cote)(\nCable,\iY,0)
+ }%
+ }%
+ \LineThreeD[linewidth=3\pslinewidth](-9,-2,0)(-5,-2,2.5)
+ \LineThreeD[linewidth=3\pslinewidth](9,-2,0)(5,-2,2.5)
+ \LineThreeD[linewidth=3\pslinewidth](-9,2,0)(-5,2,2.5)
+ \LineThreeD[linewidth=3\pslinewidth](9,2,0)(5,2,2.5)
+}
+\def\bridge(#1)(#2){{%
+\begin{pspicture}(#1)(#2)
+ \FrameThreeD[normaleLongitude=90,normaleLatitude=90,% the river
+ linestyle=none,fillstyle=gradient,gradbegin=white,%
+ gradend=blue,gradangle=45](0,0,-2)(-4,-9)(4,9)
+ {\psset{fracHeight=0.62, fillstyle=solid, %
+ ColorFaceA=lightgray,ColorFaceB=gray}
+ \PyramideThreeD[A=.4,B=.4,C=.4](-5,-2,-2){7}% Bridge
+ \PyramideThreeD[A=.5,B=.5,C=.5](5,-2,-2){7}}
+ \CubeThreeD[normaleLongitude=90,% the street
+ normaleLatitude=90,fillstyle=solid,A=9,B=2,C=0.05](0,0,0)
+ \multido{\nL=-8.8+0.2}{89}{%
+ \LineThreeD[linecolor=lightgray](\nL,-2,0)(\nL,2,0)
+ }
+ \AxesThreeD[linestyle=dashed,arrowsize=0.2,linecolor=red](6)
+ \cables
+ \psset{fracHeight=0.62, fillstyle=solid, %
+ ColorFaceA=lightgray,ColorFaceB=gray}
+ \PyramideThreeD[A=.4,B=.4,C=.4](-5,2,-2){7}% Bridge
+ \PyramideThreeD[A=.5,B=.5,C=.5](5,2,-2){7}
+\end{pspicture}
+}}
+
+\begin{document}
+\begin{center}
+\psset{PHI=30,THETA=45,Dobs=15,Decran=10}
+\bridge(-7.5,-8.5)(7.5,4.5)
+
+\clearpage
+\makebox[\linewidth]{
+\psset{PHI=0,THETA=0,Dobs=15}
+\bridge(-8,-2.5)(8,4.25)
+}
+
+\psset{PHI=90,THETA=0,Dobs=15}
+\bridge(-5,-6)(5,6)
+\end{center}
+\end{document}
diff --git a/Master/texmf-dist/doc/generic/pst-vue3d/examples/PontDemo2.pdf b/Master/texmf-dist/doc/generic/pst-vue3d/examples/PontDemo2.pdf
new file mode 100644
index 00000000000..51d99979148
--- /dev/null
+++ b/Master/texmf-dist/doc/generic/pst-vue3d/examples/PontDemo2.pdf
Binary files differ
diff --git a/Master/texmf-dist/doc/generic/pst-vue3d/examples/PontDemo2.tex b/Master/texmf-dist/doc/generic/pst-vue3d/examples/PontDemo2.tex
new file mode 100644
index 00000000000..8e59c4abcb2
--- /dev/null
+++ b/Master/texmf-dist/doc/generic/pst-vue3d/examples/PontDemo2.tex
@@ -0,0 +1,173 @@
+\documentclass[a4paper]{article}
+% Manuel Luque <MLuque@aol.com>
+% Herbert Voss <voss@perce.de> - 2003/12/20
+\usepackage{pstricks}
+\usepackage{pst-node}
+\usepackage{pst-plot}
+\usepackage{pst-grad}
+\usepackage{pst-vue3d}
+
+\input random
+
+\definecolor{pelouse}{cmyk}{0.14,0.42,0.56,0}
+\definecolor{base}{rgb}{1,0.8,0}
+\newpsstyle{surface}{fillstyle=vlines,hatchcolor=marron,%
+ hatchwidth=0.2\pslinewidth,hatchsep=1\pslinewidth}
+\newpsstyle{sol}{fillstyle=vlines,hatchcolor=lightgray,%
+ hatchwidth=0.2\pslinewidth,hatchsep=1\pslinewidth}
+\SpecialCoor
+
+\def\fleuve{%
+ \FrameThreeD[normaleLatitude=90,normaleLongitude=90,%
+ linestyle=none,fillstyle=gradient,%
+ gradbegin=blue,gradend=white](0,0,-2.5)(-12,-14)(12,14)
+}
+\newcommand{\tablier}{%
+ \FrameThreeD[normaleLatitude=90,normaleLongitude=90,%
+ linestyle=none,fillstyle=gradient,%
+ gradbegin=blue,gradend=white](0,0,0)(-\Xcinf,-2)(\Xcinf,2)%
+ \multido{\nL=-\Xcinf+0.2}{196}{%
+ \LineThreeD[linecolor=lightgray](\nL,-2,0)(\nL,2,0)%
+ }%
+}
+\newcommand\rembardes{%
+ \multido{\iY=-2+4}{2}{%
+ \LineThreeD[linecolor=red](-\Xcinf,\iY,0.5)(\Xcinf,\iY,0.5)
+ \multido{\rX=-\Xcinf+0.4}{98}{%
+ \LineThreeD[linecolor=red](\rX,\iY,0)(\rX,\iY,0.5)%
+ }%
+ }%
+}
+\newcommand\bases{%
+ \multido{\iYpos=-2+4}{2}{%
+ \multido{\rXpos=-\Xc+\twoXc}{2}{%
+ \parametricplot[fillstyle=solid,fillcolor=base]{0}{360}{%
+ /Xabscisse t cos 1.5 mul \rXpos\space add def
+ /Zcote -2.5 def
+ /Yordonnee t sin 1.5 mul \iYpos\space add def
+ tx@3DDict begin
+ formulesTroisD
+ Xi Yi
+ end
+ }%
+ }%
+ }%
+}
+\newcommand\Berges{%
+ \pNodeThreeD(-\Xcinf,-14,-2){B1}
+ \pNodeThreeD(-12,-14,-2.5){B2}
+ \pNodeThreeD(-\Xcinf,14,-2){B4}
+ \pNodeThreeD(-12,14,-2.5){B3}
+ \pspolygon[fillstyle=solid,fillcolor=pelouse](B1)(B2)(B3)(B4)
+ \pNodeThreeD(\Xcinf,-14,-2){B1}
+ \pNodeThreeD(12,-14,-2.5){B2}
+ \pNodeThreeD(\Xcinf,14,-2){B4}
+ \pNodeThreeD(12,14,-2.5){B3}
+ \pspolygon[fillstyle=solid,fillcolor=pelouse](B1)(B2)(B3)(B4)%
+}
+\pagestyle{empty}
+
+\def\Radius{14}
+\def\Xc{6.5}
+\newdimen\tempXc
+\tempXc=\Xc pt
+\multiply\tempXc by 3
+\def\Xcinf{\pointless\tempXc}
+\newdimen\temptwoXc
+\temptwoXc=\Xc pt
+\multiply\temptwoXc by 2
+\def\twoXc{\pointless\temptwoXc}
+
+\begin{document}
+
+\psset{PHI=40,THETA=-70,Dobs=30,Decran=8}
+
+\begin{pspicture}(-8,-10)(15,10)
+\pNodeThreeD(0,0,0){fictif}
+\fleuve%
+\Berges\bases%
+\multido{\iY=-2+4}{2}{%
+ \pnode(!
+ /Xc \Xc\space def
+ /Radius \Radius\space def
+ /radius1 Xc 2 Radius mul add Xc Radius mul Radius dup mul add
+ sqrt 2 mul sub def
+ /X1 radius1 def
+ /Hpile Radius 1 1 Xc 2 mul dup mul 4 Radius dup mul mul div
+ sub sqrt sub mul neg def
+ X1 radius1){PointInitial}
+ \LineThreeD(-\Xcinf,\iY,-2)(-\Xcinf,\iY,0)
+ \LineThreeD(\Xcinf,\iY,-2)(\Xcinf,\iY,0)
+ \LineThreeD(-19.5,\iY,0)(19.5,\iY,0)
+ \LineThreeD(-\Xc,\iY,-2.5)(-\Xc,\iY,0)
+ \LineThreeD(\Xc,\iY,0)(\Xc,\iY,-2.5)
+ \multido{\nX=-13+13}{3}{%
+ \parametricplot{62.336}{117.664}{%
+ /Xabscisse t cos Radius mul \nX\space add def
+ /Zcote t sin Radius mul Radius sub def
+ /Yordonnee \iY\space def
+ tx@3DDict begin
+ formulesTroisD
+ Xi Yi
+ end
+ }
+ \parametricplot{0}{360}{%
+ /Xabscisse t cos radius1 mul radius1 add Xc sub \nX\space add def
+ /Zcote t sin radius1 mul radius1 add neg def
+ /Yordonnee \iY\space def
+ tx@3DDict begin
+ formulesTroisD
+ Xi Yi
+ end
+ }
+ \parametricplot{0}{360}{%
+ /Xabscisse t cos radius1 mul radius1 add neg Xc 2 mul add \nX\space add Xc sub def
+ /Zcote t sin radius1 mul radius1 add neg def
+ /Yordonnee \iY\space def
+ tx@3DDict begin
+ formulesTroisD
+ Xi Yi
+ end
+ }
+ \multido{\i=0+1}{30}{%
+ \pnode(!
+ /B Radius X1 mul Xc radius1 mul sub neg def
+ /A Radius radius1 sub def
+ /C X1 X1 mul Radius mul Xc Xc mul radius1 mul sub def
+ /Discriminant B B mul A C mul sub sqrt def
+ /X2 B neg Discriminant add A div def
+ /radius2 X2 X1 sub 2 exp 4 radius1 mul div def
+ X2 radius2){fictif1}
+ \multido{\nX=-13+13}{3}{%
+ \parametricplot{0}{360}{%
+ /Xabscisse t cos radius2 mul X2 add Xc sub \nX\space add def
+ /Zcote t sin radius2 mul radius2 add neg def
+ /Yordonnee \iY\space def
+ tx@3DDict begin
+ formulesTroisD
+ Xi Yi
+ end
+ }
+ \parametricplot{0}{360}{%
+ /Xabscisse t cos radius2 mul X2 add neg Xc 2 mul add Xc sub \nX\space add def
+ /Zcote t sin radius2 mul radius2 add neg def
+ /Yordonnee \iY\space def
+ tx@3DDict begin
+ formulesTroisD
+ Xi Yi
+ end
+ }%
+ }
+ \pnode(!
+ /X1 X2 def
+ /radius1 radius2 def
+ X1 radius1){fictif2}
+ }
+ }%
+}
+\tablier
+\rembardes
+\AxesThreeD[linestyle=dashed,arrowsize=0.2](21,16,10)
+\end{pspicture}
+
+\end{document}
diff --git a/Master/texmf-dist/doc/generic/pst-vue3d/examples/PontDemo3.pdf b/Master/texmf-dist/doc/generic/pst-vue3d/examples/PontDemo3.pdf
new file mode 100644
index 00000000000..6b3116a610f
--- /dev/null
+++ b/Master/texmf-dist/doc/generic/pst-vue3d/examples/PontDemo3.pdf
Binary files differ
diff --git a/Master/texmf-dist/doc/generic/pst-vue3d/examples/PontDemo3.tex b/Master/texmf-dist/doc/generic/pst-vue3d/examples/PontDemo3.tex
new file mode 100644
index 00000000000..ececb1d3531
--- /dev/null
+++ b/Master/texmf-dist/doc/generic/pst-vue3d/examples/PontDemo3.tex
@@ -0,0 +1,170 @@
+\documentclass[a4paper]{article}
+% Manuel Luque <MLuque@aol.com>
+% Herbert Voss <voss@perce.de> - 2003/12/20
+\usepackage{pstricks}
+\usepackage{pst-node}
+\usepackage{pst-plot}
+\usepackage{pst-grad}
+\usepackage{pst-vue3d}
+\usepackage{multido}
+
+\input random
+
+\definecolor{pelouse}{cmyk}{0.14,0.42,0.56,0}
+\definecolor{base}{rgb}{1,0.8,0}
+\newpsstyle{surface}{fillstyle=vlines,hatchcolor=marron,%
+ hatchwidth=0.2\pslinewidth,hatchsep=1\pslinewidth}
+\newpsstyle{sol}{fillstyle=vlines,hatchcolor=lightgray,%
+ hatchwidth=0.2\pslinewidth,hatchsep=1\pslinewidth}
+
+\SpecialCoor
+
+\def\fleuve{%
+ \FrameThreeD[normaleLatitude=90,normaleLongitude=90,%
+ linestyle=none,fillstyle=gradient,%
+ gradbegin=blue,gradend=white](0,0,-2.5)(-12,-14)(12,14)
+}
+\newcommand{\tablier}{%
+ \FrameThreeD[normaleLatitude=90,normaleLongitude=90,%
+ linestyle=none,fillstyle=gradient,%
+ gradbegin=gray,gradend=white](0,0,0)(-\Xcinf,-2)(\Xcinf,2)%
+ \multido{\nL=-\Xcinf+0.2}{196}{%
+ \LineThreeD[linecolor=lightgray](\nL,-2,0)(\nL,2,0)%
+ }%
+}
+\newcommand\rembardes{%
+ \multido{\iY=-2+4}{2}{%
+ \LineThreeD[linecolor=red](-\Xcinf,\iY,0.5)(\Xcinf,\iY,0.5)
+ \multido{\rX=-\Xcinf+0.4}{98}{%
+ \LineThreeD[linecolor=red](\rX,\iY,0)(\rX,\iY,0.5)%
+ }%
+ }%
+}
+\newcommand\bases{%
+ \multido{\iYpos=-2+4}{2}{%
+ \multido{\rXpos=-\Xc+\twoXc}{2}{%
+ \parametricplot[fillstyle=solid,fillcolor=base]{0}{360}{%
+ /Xabscisse t cos 1.5 mul \rXpos\space add def
+ /Zcote -2.5 def
+ /Yordonnee t sin 1.5 mul \iYpos\space add def
+ tx@3DDict begin
+ formulesTroisD
+ Xi Yi
+ end
+ }%
+ }%
+ }%
+}
+\newcommand\Berges{%
+ \pNodeThreeD(-\Xcinf,-14,-2){B1}
+ \pNodeThreeD(-12,-14,-2.5){B2}
+ \pNodeThreeD(-\Xcinf,14,-2){B4}
+ \pNodeThreeD(-12,14,-2.5){B3}
+ \pspolygon[fillstyle=solid,fillcolor=pelouse](B1)(B2)(B3)(B4)
+ \pNodeThreeD(\Xcinf,-14,-2){B1}
+ \pNodeThreeD(12,-14,-2.5){B2}
+ \pNodeThreeD(\Xcinf,14,-2){B4}
+ \pNodeThreeD(12,14,-2.5){B3}
+ \pspolygon[fillstyle=solid,fillcolor=pelouse](B1)(B2)(B3)(B4)%
+}
+
+\pagestyle{empty}
+
+\def\Radius{14}
+\def\Xc{6.5}
+\newdimen\tempXc
+\tempXc=\Xc pt
+\multiply\tempXc by 3
+\def\Xcinf{\pointless\tempXc}
+\newdimen\temptwoXc
+\temptwoXc=\Xc pt
+\multiply\temptwoXc by 2
+\def\twoXc{\pointless\temptwoXc}
+
+\begin{document}
+
+\begin{pspicture}(-4,-10)(15,10)
+\psset{PHI=20,THETA=-30,Dobs=30,Decran=10}
+\pNodeThreeD(0,0,0){fictif}
+\fleuve\Berges\bases%
+\multido{\iY=-2+4}{2}{%
+ \pnode(!
+ /Xc \Xc\space def
+ /Radius \Radius\space def
+ /radius1 Xc 2 Radius mul add Xc Radius mul Radius dup mul add
+ sqrt 2 mul sub def
+ /X1 radius1 def
+ /Hpile Radius 1 1 Xc 2 mul dup mul 4 Radius dup mul mul div
+ sub sqrt sub mul neg def
+ X1 radius1){PointInitial}
+ \LineThreeD(-\Xcinf,\iY,-2)(-\Xcinf,\iY,0)
+ \LineThreeD(\Xcinf,\iY,-2)(\Xcinf,\iY,0)
+ \LineThreeD(-19.5,\iY,0)(19.5,\iY,0)
+ \LineThreeD(-\Xc,\iY,-2.5)(-\Xc,\iY,0)
+ \LineThreeD(\Xc,\iY,0)(\Xc,\iY,-2.5)
+ \multido{\nX=-13+13}{3}{%
+ \parametricplot{62.336}{117.664}{%
+ /Xabscisse t cos Radius mul \nX\space add def
+ /Zcote t sin Radius mul Radius sub def
+ /Yordonnee \iY\space def
+ tx@3DDict begin
+ formulesTroisD
+ Xi Yi
+ end
+ }
+ \parametricplot{0}{360}{%
+ /Xabscisse t cos radius1 mul radius1 add Xc sub \nX\space add def
+ /Zcote t sin radius1 mul radius1 add neg def
+ /Yordonnee \iY\space def
+ tx@3DDict begin
+ formulesTroisD
+ Xi Yi
+ end
+ }
+ \parametricplot{0}{360}{%
+ /Xabscisse t cos radius1 mul radius1 add neg Xc 2 mul add \nX\space add Xc sub def
+ /Zcote t sin radius1 mul radius1 add neg def
+ /Yordonnee \iY\space def
+ tx@3DDict begin
+ formulesTroisD
+ Xi Yi
+ end
+ }
+ }
+ \multido{\i=0+1}{30}{%
+ \pnode(!
+ /B Radius X1 mul Xc radius1 mul sub neg def
+ /A Radius radius1 sub def
+ /C X1 X1 mul Radius mul Xc Xc mul radius1 mul sub def
+ /Discriminant B B mul A C mul sub sqrt def
+ /X2 B neg Discriminant add A div def
+ /radius2 X2 X1 sub 2 exp 4 radius1 mul div def
+ X2 radius2){fictif1}
+ \multido{\nX=-13+13}{3}{%
+ \parametricplot{0}{360}{%
+ /Xabscisse t cos radius2 mul X2 add Xc sub \nX\space add def
+ /Zcote t sin radius2 mul radius2 add neg def
+ /Yordonnee \iY\space def
+ tx@3DDict begin
+ formulesTroisD
+ Xi Yi
+ end
+ }
+ \parametricplot{0}{360}{%
+ /Xabscisse t cos radius2 mul X2 add neg Xc 2 mul add Xc sub \nX\space add def
+ /Zcote t sin radius2 mul radius2 add neg def
+ /Yordonnee \iY\space def
+ tx@3DDict begin
+ formulesTroisD
+ Xi Yi
+ end
+ }%
+ }
+ \pnode(! /X1 X2 def /radius1 radius2 def X1 radius1){fictif2}
+ }%
+}
+\tablier
+\rembardes
+\AxesThreeD[linestyle=dashed,arrowsize=0.2](21,16,10)
+\end{pspicture}
+\end{document}
diff --git a/Master/texmf-dist/doc/generic/pst-vue3d/examples/PyramidDemo.pdf b/Master/texmf-dist/doc/generic/pst-vue3d/examples/PyramidDemo.pdf
new file mode 100644
index 00000000000..7dc446803ca
--- /dev/null
+++ b/Master/texmf-dist/doc/generic/pst-vue3d/examples/PyramidDemo.pdf
Binary files differ
diff --git a/Master/texmf-dist/doc/generic/pst-vue3d/examples/PyramidDemo.tex b/Master/texmf-dist/doc/generic/pst-vue3d/examples/PyramidDemo.tex
new file mode 100644
index 00000000000..b0cf19da007
--- /dev/null
+++ b/Master/texmf-dist/doc/generic/pst-vue3d/examples/PyramidDemo.tex
@@ -0,0 +1,17 @@
+\documentclass{article}
+\usepackage{pst-vue3d}
+\begin{document}
+ \psset{THETA=30,PHI=30,Dobs=400,Decran=30,fillstyle=solid}
+ \begin{pspicture}(-2.5,-2)(2.5,12)
+ \PyramideThreeD[fracHeight=0.5,A=10](0,0,0){150}%
+ \psset{A=5}
+ \PyramideThreeD(0,0,75){5}%
+ \end{pspicture}%
+ %
+ \begin{pspicture}(-2.5,-2)(2.5,12)
+ \CubeThreeD[A=15,B=15,C=15](0,0,15)%
+ \PyramideThreeD[fracHeight=0.5,A=10](0,0,30){150}%
+ \psset{A=5}
+ \PyramideThreeD(0,0,105){5}%
+ \end{pspicture}%
+\end{document}
diff --git a/Master/texmf-dist/doc/generic/pst-vue3d/examples/SphereDemo0.pdf b/Master/texmf-dist/doc/generic/pst-vue3d/examples/SphereDemo0.pdf
new file mode 100644
index 00000000000..908c16af5d2
--- /dev/null
+++ b/Master/texmf-dist/doc/generic/pst-vue3d/examples/SphereDemo0.pdf
Binary files differ
diff --git a/Master/texmf-dist/doc/generic/pst-vue3d/examples/SphereDemo0.tex b/Master/texmf-dist/doc/generic/pst-vue3d/examples/SphereDemo0.tex
new file mode 100644
index 00000000000..ec86ad42a83
--- /dev/null
+++ b/Master/texmf-dist/doc/generic/pst-vue3d/examples/SphereDemo0.tex
@@ -0,0 +1,57 @@
+\documentclass[12pt]{article}
+\usepackage{pstricks}
+\usepackage{pst-grad}
+\usepackage{pst-vue3d}
+
+\newpsstyle{GradGrayWhite}{fillstyle=gradient,%
+ gradbegin=blue,gradend=white,linewidth=0.1mm}%
+
+\begin{document}
+
+\begin{pspicture}(-3.75,-3.25)(5,5.5)
+ \AxesThreeD(45,40,50)
+ \psset{PortionSphereTHETA=60,PortionSpherePHI=45,linewidth=0.1pt}
+ \SphereThreeD[fillstyle=solid,fillcolor=cyan,linewidth=0.1pt](0,0,0){30}
+ \PortionSphereThreeD[fillstyle=solid,fillcolor=red](0,0,0){30}
+ \LineThreeD[SphericalCoor,linestyle=dashed](0,0,0)(30,70,35)
+ \LineThreeD[SphericalCoor,linestyle=dashed](0,0,0)(30,50,35)
+ \LineThreeD[SphericalCoor,linestyle=dashed](0,0,0)(30,70,55)
+ \LineThreeD[SphericalCoor,linestyle=dashed](0,0,0)(30,50,55)
+ \LineThreeD[SphericalCoor](30,70,35)(50,70,35)
+ \LineThreeD[SphericalCoor](30,50,35)(50,50,35)
+ \LineThreeD[SphericalCoor](30,70,55)(50,70,55)
+ \LineThreeD[SphericalCoor](30,50,55)(50,50,55)
+ \PortionSphereThreeD[fillstyle=solid,fillcolor=red](0,0,0){50}
+ \psset{linestyle=dashed,linecolor=red,linewidth=\pslinewidth}
+ \LineThreeD(0,0,0)(30,0,0)
+ \LineThreeD(0,0,0)(0,30,0)
+ \LineThreeD(0,0,0)(0,0,30)
+\end{pspicture}
+
+\begin{pspicture}(-3,-3.5)(3,5)%
+ \psset{THETA=30,PHI=30,Dobs=100,Decran=10}%
+ \SphereThreeD[fillstyle=solid,fillcolor=cyan,linewidth=0.1pt](0,0,0){20}
+ \AxesThreeD(25)
+ \PortionSphereThreeD[fillstyle=solid,fillcolor=gray](0,0,0){20}%
+ \pNodeThreeD(20;10;10){C1}%
+ \pNodeThreeD(40;10;10){D1}%
+ \psline(C1)(D1)%
+ \pNodeThreeD(20;10;-10){C2}%
+ \pNodeThreeD(40;10;-10){D2}%
+ \psline(C2)(D2)%
+ \pNodeThreeD(20;-10;-10){C3}%
+ \pNodeThreeD(40;-10;-10){D3}%
+ \psline(C3)(D3)%
+ \pNodeThreeD(20;-10;10){C4}%
+ \pNodeThreeD(40;-10;10){D4}%
+ \psline(C4)(D4)%
+%
+ \PortionSphereThreeD[style=GradGrayWhite](0,0,0){40}%
+ \psset{linecolor=white,PhiCercle=45}%
+ \SphereCercleThreeD(0,0,0){20}%
+ \SphereMeridienThreeD[ThetaMeridien=45](0,0,0){20}%
+ \SphereCercleThreeD[PhiCercle=0](0,0,0){20}%
+ \SphereMeridienThreeD[THETA=30,PHI=30,ThetaMeridien=0](0,0,0){20}%
+\end{pspicture}
+
+\end{document}