tests/.svn/text-base/test_19.tex.svn-base

   1 \documentclass{article}
   2 \usepackage{pst-solides3d,pst-node,pst-plot,multido,url}
   3 \usepackage[latin1]{inputenc}
   4 \usepackage[T1]{fontenc}
   5 \usepackage{colortbl}
   6 \usepackage{array}
   7 \usepackage[a4paper,bottom=2.5cm,top=2cm]{geometry}
   8 %%\usepackage[frenchle]{babel}
   9 \makeatletter
  10
  11 \title{\texttt{pst-solides3d} :\\
  12        Test}
  13 \date{\today }
  14 \begin{document}
  15 \maketitle
  16
  17 \section {Test cone}
  18
  19 \begin{pspicture*}(-3,-3)(4.5,5)
  20 \psset{lightsrc=viewpoint,viewpoint=5 -5 3,Decran=10}
  21 \defFunction{G}(t)
  22    {t}
  23    {t dup mul .25 mul}
  24    {-2}
  25 \psframe(-3,-3)(4.5,5)
  26 \psSolid[object=cone,
  27    r=1, h=1](-2,10,0)
  28 \psSolid[object=cone,
  29    function=G,
  30    range=-3 2,
  31    ngrid=3 10,
  32    origine=0 0 0,
  33 ]
  34 %% \psSolid[object=cylindre,
  35 %%    range=0 2,
  36 %%    h=3,
  37 %%    function=G,
  38 %%    axe=.2 0 1,
  39 %%    ngrid=3 8]
  40 %% \codejps{
  41 %% %-1 1 1 [2 8] newcylindre
  42 %% %-2 2 {F} {0 0 1} 3 [1 6] newcylindre
  43 %% -3 2 {F} {0 0 0} [2 10] newcone
  44 %% dup (rouge) (cyan) solidputcolors
  45 %% drawsolid**
  46 %% }
  47 \end{pspicture*}
  48
  49
  50 \end{document}