%!PS-Adobe-2.0 EPSF-2.0 %%Title: /tmp/xfig-fig011530 %%Creator: fig2dev Version 2.1.8 Patchlevel 0 %%CreationDate: Fri Dec 10 14:32:33 1993 %%For: megevand@obsmp1 (MEGEVAND Denis) %%Orientation: Portrait %%BoundingBox: 1 0 71 159 %%Pages: 0 %%EndComments /$F2psDict 200 dict def $F2psDict begin $F2psDict /mtrx matrix put /l {lineto} bind def /m {moveto} bind def /s {stroke} bind def /n {newpath} bind def /gs {gsave} bind def /gr {grestore} bind def /clp {closepath} bind def /graycol {dup dup currentrgbcolor 4 -2 roll mul 4 -2 roll mul 4 -2 roll mul setrgbcolor} bind def /col-1 {} def /col0 {0 0 0 setrgbcolor} bind def /col1 {0 0 1 setrgbcolor} bind def /col2 {0 1 0 setrgbcolor} bind def /col3 {0 1 1 setrgbcolor} bind def /col4 {1 0 0 setrgbcolor} bind def /col5 {1 0 1 setrgbcolor} bind def /col6 {1 1 0 setrgbcolor} bind def /col7 {1 1 1 setrgbcolor} bind def /col8 {.68 .85 .9 setrgbcolor} bind def /col9 {.9 .9 .9 setrgbcolor} bind def /col10 {.1 .1 .1 setrgbcolor} bind def /col11 {.8 .8 .8 setrgbcolor} bind def /col12 {.63 .13 .94 setrgbcolor} bind def /col13 {1 .75 .8 setrgbcolor} bind def /col14 {.7 .13 .13 setrgbcolor} bind def /col15 {1 .84 0 setrgbcolor} bind def /DrawEllipse { /endangle exch def /startangle exch def /yrad exch def /xrad exch def /y exch def /x exch def /savematrix mtrx currentmatrix def x y translate xrad yrad scale 0 0 1 startangle endangle arc savematrix setmatrix } def end /$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def /$F2psEnd {$F2psEnteredState restore end} def %%EndProlog $F2psBegin 0 setlinecap 0 setlinejoin -213.0 399.0 translate 0.900 -0.900 scale 0.500 setlinewidth % Polyline n 314 409 m 314 409 l 314 371 l 292 333 l 240 409 l gs col10 fill gr gs col0 s gr 0.000 setlinewidth % Polyline n 240 409 m 240 378 l 245 371 l 250 378 l 261 362 l 268 372 l 273 365 l 298 409 l 240 409 l gs col11 fill gr % Polyline n 245 372 m 250 379 l 261 363 l 268 373 l 273 366 l 262 347 l 245 371 l 250 379 l gs col7 fill gr 0.500 setlinewidth % Polyline n 298 409 m 262 346 l 240 378 l gs col0 s gr % Polyline n 314 409 m 240 409 l 240 269 l 314 269 l clp gs col0 s gr 0.000 setlinewidth % Ellipse n 300 352 11 10 0 360 DrawEllipse gs col9 fill gr % /Helvetica findfont 13.00 scalefont setfont 277 422 m gs 1 -1 scale (A M I S) dup stringwidth pop 2 div neg 0 rmoveto col0 show gr % /Helvetica findfont 10.00 scalefont setfont 277 433 m gs 1 -1 scale (MONTAGNARDS) dup stringwidth pop 2 div neg 0 rmoveto col0 show gr % /Helvetica findfont 9.00 scalefont setfont 277 443 m gs 1 -1 scale (G E N E V E) dup stringwidth pop 2 div neg 0 rmoveto col0 show gr $F2psEnd