Changeset 43
- Timestamp:
- 06/12/08 13:37:59 (7 months ago)
- Files:
-
- trunk/pst-solides3d.tex (modified) (2 diffs)
- trunk/solides.pro (modified) (6 diffs)
- trunk/tests/test_10.tex (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/pst-solides3d.tex
r42 r43 11 11 \ifx\MultidoLoaded\endinput\else\input multido.tex \fi 12 12 % JPV & ML & AS 13 \def\fileversion{3.2 0}14 \def\filedate{2008/06/1 0}13 \def\fileversion{3.21} 14 \def\filedate{2008/06/12} 15 15 \message{`PSTSOLIDESIIID' v\fileversion, \filedate} 16 16 % … … 278 278 grille,prisme,anneau,parallelepiped,prismecreux,ruban,calottesphere,face,% 279 279 surface,calottespherecreuse,polygoneregulier,fusion,new,chemin,courbeR2,courbe,% 280 surfaceparametree,texte,trigospherique,vecteur,li gne,objfile,datfile,surface*,%280 surfaceparametree,texte,trigospherique,vecteur,line,objfile,datfile,surface*,% 281 281 plan,offfile,geode,load,plantype,point} 282 282 %% Reservation de macros correspondants aux objects trunk/solides.pro
r42 r43 1 1 %! 2 2 % PostScript prologue for pst-solides3d.tex. 3 % Version 3.2 8, 2008/06/103 % Version 3.29, 2008/06/12 4 4 % 5 5 %% COPYRIGHT 2008 by Jean-Paul Vignault, Manuel Luque … … 6280 6280 result2 [facecoupe lesfaces2 aload pop] solidputfaces 6281 6281 result2 [couleurfacecoupe lescouleurs2 aload pop] solidputfcolors 6282 result2 IO2 dup 1 get 1 add 1 exch put solidputinouttable6282 result2 IO2 dup dup 1 get 1 add 1 exch put solidputinouttable 6283 6283 result1 [facecoupe reverse lesfaces1 aload pop] solidputfaces 6284 6284 result1 [couleurfacecoupe lescouleurs1 aload pop] solidputfcolors 6285 result1 dup solidgetinouttable dup 1 get 1 add 1 exch put solidputinouttable6285 result1 dup solidgetinouttable dup dup 1 get 1 add 1 exch put solidputinouttable 6286 6286 } { 6287 6287 %% l'orientation est ok … … 8635 8635 /i exch def 8636 8636 plansection i get solidplansection 8637 dup 0 solidrmface 8637 8638 } for 8638 8639 } if … … 9102 9103 linecolor 9103 9104 linestyle 9105 tx@Dict /solidname known { 9106 texte args definition cvx exec 9107 solidname cvlit exch defpoint3d 9108 tx@Dict /solidname undef 9109 } if 9104 9110 args definition cvx exec newvecteur 9105 9111 dup … … 9113 9119 %/pst-vect- {} def 9114 9120 %/pst-vect-2points {vecteur3d} def 9115 /pst-ligne { 9116 newpath 9117 base 0 get 9118 base 1 get 9119 base 2 get 9120 3dto2d smoveto 9121 base ligne3d_ 9121 /pst-line { 9122 gsave 9123 linestyle 9124 linecolor 9125 base ligne3d 9126 grestore 9122 9127 } def 9123 9128 … … 9218 9223 linecolor 9219 9224 args definition cvx exec point3d 9220 texte args pos (text3d) append cvx exec 9225 texte args definition cvx exec pos (text3d) append cvx exec 9226 tx@Dict /solidname known { 9227 texte args definition cvx exec 9228 solidname cvlit exch defpoint3d 9229 tx@Dict /solidname undef 9230 } if 9231 9221 9232 grestore 9222 9233 } def trunk/tests/test_10.tex
r30 r43 32 32 [0 0 1 -2] 33 33 [0 0 1 -3] 34 [1 0 -1 2]34 % [1 0 -1 2] 35 35 }, 36 36 action=draw,
