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 rotation_01.jps
Retour
%% PhS + gh %% rotation %% Èchelle et Ètendue de l'image 60 setxunit -5 5 setxrange -3 2.5 setyrange %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %%%% en vrai %%%%%%%%%%%% /ScreenDist 0.1 def /ZoomFactor_x 100 def /ZoomFactor_y 100 def 8 3 3 SetCamPos GetCamPos -1 mulv3d SetCamVec 0 0 1 SetCamUp ComputeCamera rouge /tabprov [] def %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %% dÈfinitions des couleurs %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% /coul1 {120 255 div 70 255 div 9 255 div setrgbcolor} def /coul2 {255 255 div 240 255 div 240 255 div setrgbcolor} def %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %% tracés %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %% tracé du quadrillage 1.5 setlinewidth 17 setfontsize noir continu qplanxy /arrowscale {currentlinewidth dup} def %% Tracé de F^\perp [0 0 0 0 0 3] (-) ligne3d pointilles [0 0 0 0 0 3 neg] (-) ligne3d #latex# $D$ 0 0 2 [2.5 dup] crtexlabel3d %% Tracé de F continu 3 setlinewidth [-3 -3 0 -3 3 0 3 3 0 3 -3 0 -3 -3 0] (-) ligne3d #latex# $P$ 2.5 2.5 neg 0 [2.5 dup] cctexlabel3d % Définition de l'antécédent /x {2} def /y {0} def /z {2} def /alpha {120} def /cosa {alpha cos} def /sina {alpha sin} def % /x' {x cosa mul y sina sub} def % ça ne marche pas comme ça!!! % /y' {x sina mul y cosa add} def % j'impose à y d'être nul % /z' {z} def /x' {x cosa mul} def /y' {x sina mul} def /z' {z} def /origine {0 0 0} def /u {x y z} def /u' {x' y' z'} def /u1 {x y 0} def /u1' {x' y' 0} def rouge continu 3 setlinewidth [origine u] (->) ligne3d 1.5 setlinewidth pointilles [origine u1] (->) ligne3d [u u1] (-) ligne3d 3 setlinewidth continu [origine u'] (->) ligne3d 1.5 setlinewidth pointilles [origine u1'] (->) ligne3d [u' u1'] (-) ligne3d #latex# $x$ u [2.5 dup] dltexlabel #latex# $r(x)$ u' [2.5 dup] cltexlabel %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %% Pour représenter l'angle %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% on donne ici x(t) /xdet { 1 dict begin /t exch def t cos end } def %% on donne ici y(t) /ydet { 1 dict begin /t exch def t sin end } def noir continu /ahcoeff 0 def 0 alpha settrange {dup xdet exch ydet 0 CamView pop} {dup xdet exch ydet 0 CamView exch pop} (->) courbeparam #latex# $\alpha$ alpha 2 div dup cos sin 0 [2.5 dup] drtexlabel
Tapez les 3 lettres : AWE