Navigation alternative
Figures / Images
BBgraf
MetaPost
PSTricks
Format SVG
Asymptote
EPiX
Gnuplot
TeXGraph
Librairie GD
PostScript
SWFtools
Calculs
BC
Giac / Xcas
Maxima
Pari / GP
Scilab
Scripts p*
Documents
TeX au collège
TeX png
Lua(La)TeX
Cours etc.
Contributions
Le cours d'Ismaël
Astronomie
Bases
Base Brevet
Base Collège
Base Graphisme
Base Ipe
Base JPS (BBgraf)
Base MetaPost
Base PSTricks
Dépôt Git
Fichier JPS
Accueil
Présentation
Exemples
Papiers
Banque d'images
Albums et animations
Formulaires
Célébrités
Postscript
Chimie
Documentation
Sources et téléchargement
Édition du fichier 3D_01b.jps
Retour
350 setwidth 350 setheight -2 20 setxrange -2 20 setyrange /l 8 def /a {0 l l} def /f {l l 0} def /m {0 3 l} def /b {l l l} def /g {l 0 0} def /n {4 0 l} def /c {l 0 l} def /h {0 0 0} def /p {0 0 5} def /e {0 l 0} def /I {-15 cos -15 sin} def /J {35 cos 35 sin .8 mulv} def /K {0 1} def /cree_points { [/A /B /C /E /F /G /H /M /N /P] [a b c e f g h m n p] {xyz2xy} capply mapnp } def /dessin { [M A B C G F B] ligne [C N M P N] ligne [P H G] ligne [A E H] ligne [E F] ligne } def %% vue de dessus /xyz2xy { pop } def cree_points /mn M N distance def gsave 0 -1 stranslate 1 setlinewidth dessin 10 setfontsize setTimesItalic (A) A ultext (P) P dltext (B) B urtext (M) M bltext (C) C drtext (N) N dctext grestore %% vue de face /xyz2xy { exch pop } def gsave 0 10 stranslate cree_points /pn P N distance def 1 setlinewidth dessin 10 setfontsize setTimesItalic (C) C urtext (P) P cltext (G) G drtext (M) M ultext (H) H dltext (N) N uctext grestore %% vue de gauche /xyz2xy { 3 dict begin /z exch def /y exch def /x exch def y neg z end } def gsave 19 10 stranslate cree_points /mp M P distance def dessin 10 setfontsize setTimesItalic (A) A ultext (P) P crtext (E) E dltext (M) M uctext (H) H drtext (N) N urtext grestore gsave 11 -1 stranslate /M {3 7} def M .2 -1 mn mulv addv /N defpoint M mp N pn intercercle /P defpoint pop [M N P] polygone .5 setlinewidth M N 10 Arc M P 10 Arc N P 10 Arc setTimesItalic (M) M ultext (N) N drtext (P) P urtext grestore
Tapez les 3 lettres : AWE