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 1181.jps
Retour
usecolor -2 2 setxrange -2 3 setyrange %% echelle 100 setxunit %% position de la camera 8 8 8 SetCamPos 0 0 0 SetCamView 2 setlinejoin %% dessin de la sphere /aretescachees false def usecolor -2 2 setxrange -2 3 setyrange %% echelle 100 setxunit %% position de la camera 8 8 8 SetCamPos 0 0 0 SetCamView 2 setlinejoin %% dessin de la sphere /aretescachees false def .5 setlinewidth %% epaisseur du trait .6 setgray %% niveau de gris 2 [18 36] newsphere %% rayon + nb d'horizontales et verticales drawsolid %% les axes %0 2 2 axesRVB %% r, theta, phi /O {0 0 0} def /N {2 0 0} def /A {2 70 48} def /M {2 0 48} def /X {2 32 47.5} def /Y {2 72 20} def /Z {2 -20 40} def %% les essais 1.5 setlinewidth blue N A arcspherique N M arcspherique M A arcspherique noir .5 setlinewidth pointilles A M geodesique_sphere %% on marque les points bleu A rtp2xyz point3d M rtp2xyz point3d N rtp2xyz point3d %% et on inscrit leurs noms noir 18 setfontsize setTimesItalic (N) N rtp2xyz uctext3d blue (Ankara) A rtp2xyz crtext3d (Madrid) M rtp2xyz cltext3d noir
$\varphi$
X rtp2xyz [2 2] crtexlabel3d blue
$90^\circ\!-\!\beta_A$
Y rtp2xyz [2 2] crtexlabel3d
$90^\circ\!-\!\beta_M$
Z rtp2xyz [2 2] crtexlabel3d
Tapez les 3 lettres : AWE