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 synt_001e.jps
Retour
-1.75 1.75 setxrange -1.5 1.5 setyrange .5 .5 setquadrillagestep quadrillage .7 setlinewidth tracerepere gsave jpegmode pointilles O 1 1 droite -1 1 scale O 1 1 droite grestore 1.2 setlinewidth O 1 cercle %% le cercle trigo 1.2 setlinewidth O 1 cercle %% le cercle representant l'intervalle de resolution /r 1.1 def %% rayon /a1 pi -.985 mul def %% angle extremite inf /a2 a1 neg def %% angle extremite sup %% trace .8 setlinewidth a1 rd a2 rd O r Cercle /z1 {r a1 Polcar} def %% le point extreme inf /z2 {r a2 Polcar} def %% le point extreme sup %% la resolution .5 ymark %% pts du cercle trigo /M'1 {1 pi 6 div Polcar} def /M'2 {1 pi 6 div 5 mul Polcar} def %% pts du cercle "intervalle" M'1 M'2 O r interdroitecercle /M2 defpoint /M1 defpoint /M1 {-.9797958971 .5} def /M2 {.9797958971 .5} def [z1 z2 M1 M2 M'1 M'2] points gsave pointilles [M1 M2] ligne grestore setTimes (sin) 0 ymax (0 -10) rtext setSymbol (-p) z1 dltext (p) z2 ultext (p/6) M2 urtext (5p/6) M1 ultext 1.2 setlinewidth /fillstyle {blanc fill} def -.9 -1.5 .9 -1.2 frame* 2 setlinewidth O 1.5 142.5 170.5 (-) arcarrow /arrowscale {2 2} def .2 setlinewidth O 1.5 142.5 172.5 (<-) arcarrow 2 setlinewidth O 1.5 142.5 170.5 (-) arcarrow setTimesBold (Résolution sur ) .35 -1.35 cltext setSymbol ([-p ; p]) show 18 setfontsize setSymbolBold (+) 1.6 157.5 deg Polcar cctext
Tapez les 3 lettres : AWE