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 texlabel_01.jps
Retour
%% bon, j'avoue, c'est un peu 'tricky' ce source... -3 4 setyrange %% unite pour les longueurs de fleches /dt .75 def %% l'espace a laisser entre la boite et le cadre /dx_boxit 0 def /dy_boxit 0 def /a 3 def /b 2 def .2 setlinewidth
$\displaystyle { f (x) = \int _0^x t^2\, dt }$
%% on veut recuperer les dimensions de la boite contenant la chaine de %% caractere, elles seront stockees dans les variables llx, lly, wx, %% wy, pict_wd et pict_ht /transmet_dim true def 20 setfontsize boxit O () [4 dup] bctexlabel O /bc defpoint O pict_wd 2 div 0 ptojpoint addv /br defpoint O pict_wd -2 div 0 ptojpoint addv /bl defpoint O 0 wy ptojpoint addv /uc defpoint O pict_wd 2 div wy ptojpoint addv /ur defpoint O pict_wd -2 div wy ptojpoint addv /ul defpoint O 0 lly ptojpoint addv /dc defpoint O pict_wd 2 div lly ptojpoint addv /dr defpoint O pict_wd -2 div lly ptojpoint addv /dl defpoint O 0 lly wy add 2 div ptojpoint addv /cc defpoint O pict_wd 2 div lly wy add 2 div ptojpoint addv /cr defpoint O pict_wd -2 div lly wy add 2 div ptojpoint addv /cl defpoint [bc br bl uc ur ul dc dr dl cc cr cl] points [bl br] ligne bc /bc_ defpoint br dt 0 addv /br_ defpoint bl dt neg 0 addv /bl_ defpoint uc 0 dt addv /uc_ defpoint ur dt dup addv /ur_ defpoint ul dt neg dt addv /ul_ defpoint dc 0 dt neg addv /dc_ defpoint dr dt dt neg addv /dr_ defpoint dl dt neg dup addv /dl_ defpoint cc /cc_ defpoint cr dt 0 addv /cr_ defpoint cl dt neg 0 addv /cl_ defpoint uc uc_ (->) line ur ur_ (->) line ul ul_ (->) line br br_ (->) line bl bl_ (->) line dc dc_ (->) line dr dr_ (->) line dl dl_ (->) line cr cr_ (->) line cl cl_ (->) line setCourierBold (uc) uc_ uctext (ul) ul_ ultext (ur) ur_ urtext (bl) bl_ cltext (br) br_ crtext (cl) cl_ cltext (cr) cr_ crtext (dc) dc_ dctext (dl) dl_ dltext (dr) dr_ drtext
Tapez les 3 lettres : AWE