docs/manual/plots/hbond-insert.eps

   1 %!PS-Adobe-2.0 EPSF
   2 %%Title: /tmp/xfig-fig007282
   3 %%Creator: fig2dev
   4 %%CreationDate: Wed Mar  8 17:55:07 1995
   5 %%For: apol@rugmd9 (Emile Apol,Room 17.6,4336)
   6 %%BoundingBox: 0 0 287 372
   7 %%Pages: 0
   8 %%EndComments
   9 /$F2psDict 200 dict def
  10 $F2psDict begin
  11 $F2psDict /mtrx matrix put
  12 /l {lineto} bind def
  13 /m {moveto} bind def
  14 /s {stroke} bind def
  15 /n {newpath} bind def
  16 /gs {gsave} bind def
  17 /gr {grestore} bind def
  18 /clp {closepath} bind def
  19 /graycol {dup dup currentrgbcolor 4 -2 roll mul 4 -2 roll mul
  20 4 -2 roll mul setrgbcolor} bind def
  21 /col-1 {} def
  22 /col0 {0 0 0 setrgbcolor} bind def
  23 /col1 {0 0 1 setrgbcolor} bind def
  24 /col2 {0 1 0 setrgbcolor} bind def
  25 /col3 {0 1 1 setrgbcolor} bind def
  26 /col4 {1 0 0 setrgbcolor} bind def
  27 /col5 {1 0 1 setrgbcolor} bind def
  28 /col6 {1 1 0 setrgbcolor} bind def
  29 /col7 {1 1 1 setrgbcolor} bind def
  30  /DrawEllipse {
  31         /endangle exch def
  32         /startangle exch def
  33         /yrad exch def
  34         /xrad exch def
  35         /y exch def
  36         /x exch def
  37         /savematrix mtrx currentmatrix def
  38         x y translate xrad yrad scale 0 0 1 startangle endangle arc
  39         savematrix setmatrix
  40         } def
  41
  42         end
  43 /$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def
  44 /$F2psEnd {$F2psEnteredState restore end} def
  45 %%EndProlog
  46
  47 $F2psBegin
  48 0 setlinecap 0 setlinejoin
  49 -18.0 -108.0 translate 90 rotate 0.900 -0.900 scale
  50 0.500 setlinewidth
  51 % Ellipse
  52 n 159 299 39 39 0 360 DrawEllipse gs 0.85 setgray fill gr
  53 gs col-1 s gr
  54 % Ellipse
  55 n 479 299 39 39 0 360 DrawEllipse gs 0.85 setgray fill gr
  56 gs col-1 s gr
  57 % Ellipse
  58 n 359 159 39 39 0 360 DrawEllipse gs 0.85 setgray fill gr
  59 gs col-1 s gr
  60 % Ellipse
  61 n 479 159 21 21 0 360 DrawEllipse gs col-1 s gr
  62 % Ellipse
  63 n 199 199 21 21 0 360 DrawEllipse gs col-1 s gr
  64 % Ellipse
  65 n 398 40 21 21 0 360 DrawEllipse gs col-1 s gr
  66 % Polyline
  67 n 159 299 m 479 299 l gs col-1 s gr
  68         [4.000000] 0 setdash
  69 % Polyline
  70 n 199 199 m 359 159 l gs col-1 s gr
  71         [] 0 setdash
  72         [4.000000] 0 setdash
  73 % Polyline
  74 n 479 159 m 479 299 l gs col-1 s gr
  75         [] 0 setdash
  76         [4.000000] 0 setdash
  77 % Polyline
  78 n 199 199 m 479 299 l gs col-1 s gr
  79         [] 0 setdash
  80 4.000 setlinewidth
  81 % Polyline
  82 n 174 264 m 189 219 l gs col-1 s gr
  83 % Polyline
  84 n 369 124 m 389 59 l gs col-1 s gr
  85 % Polyline
  86 n 399 159 m 459 159 l gs col-1 s gr
  87 0.500 setlinewidth
  88 % Polyline
  89 n 359 159 m 479 159 l gs col-1 s gr
  90 % Polyline
  91 n 199 199 m 159 299 l gs col-1 s gr
  92 % Polyline
  93 n 399 39 m 359 159 l gs col-1 s gr
  94 /Times-Roman findfont 30.00 scalefont setfont
  95 349 194 m
  96 gs 1 -1 scale (O) col-1 show gr
  97 /Times-Roman findfont 30.00 scalefont setfont
  98 149 334 m
  99 gs 1 -1 scale (D) col-1 show gr
 100 /Times-Roman findfont 30.00 scalefont setfont
 101 469 329 m
 102 gs 1 -1 scale (A) col-1 show gr
 103 /Times-Roman findfont 30.00 scalefont setfont
 104 509 169 m
 105 gs 1 -1 scale (H) col-1 show gr
 106 /Times-Roman findfont 30.00 scalefont setfont
 107 429 49 m
 108 gs 1 -1 scale (H) col-1 show gr
 109 /Times-Roman findfont 30.00 scalefont setfont
 110 189 169 m
 111 gs 1 -1 scale (H) col-1 show gr
 112 /Times-Roman findfont 30.00 scalefont setfont
 113 294 269 m
 114 gs 1 -1 scale (\(1\)) col-1 show gr
 115 /Times-Roman findfont 30.00 scalefont setfont
 116 494 234 m
 117 gs 1 -1 scale (\(2\)) col-1 show gr
 118 /Times-Roman findfont 30.00 scalefont setfont
 119 254 169 m
 120 gs 1 -1 scale (\(2\)) col-1 show gr
 121 $F2psEnd