iframe-proxy | Sunbelt Computer Software

166 lines (159 loc) · 4.45 KB
%!PS-Adobe-2.0 EPSF-2.0
%%Title: list1.fig
%%Creator: fig2dev Version 3.2 Patchlevel 5-alpha7
%%CreationDate: Thu Jan  3 09:32:30 2008
%%For: downey@rocky (Allen Downey,,,)
%%BoundingBox: 0 0 218 42
%Magnification: 1.0000
%%EndComments
/$F2psDict 200 dict def
$F2psDict begin
$F2psDict /mtrx matrix put
/col-1 {0 setgray} bind def
/col0 {0.000 0.000 0.000 srgb} bind def
/col1 {0.000 0.000 1.000 srgb} bind def
/col2 {0.000 1.000 0.000 srgb} bind def
/col3 {0.000 1.000 1.000 srgb} bind def
/col4 {1.000 0.000 0.000 srgb} bind def
/col5 {1.000 0.000 1.000 srgb} bind def
/col6 {1.000 1.000 0.000 srgb} bind def
/col7 {1.000 1.000 1.000 srgb} bind def
/col8 {0.000 0.000 0.560 srgb} bind def
/col9 {0.000 0.000 0.690 srgb} bind def
/col10 {0.000 0.000 0.820 srgb} bind def
/col11 {0.530 0.810 1.000 srgb} bind def
/col12 {0.000 0.560 0.000 srgb} bind def
/col13 {0.000 0.690 0.000 srgb} bind def
/col14 {0.000 0.820 0.000 srgb} bind def
/col15 {0.000 0.560 0.560 srgb} bind def
/col16 {0.000 0.690 0.690 srgb} bind def
/col17 {0.000 0.820 0.820 srgb} bind def
/col18 {0.560 0.000 0.000 srgb} bind def
/col19 {0.690 0.000 0.000 srgb} bind def
/col20 {0.820 0.000 0.000 srgb} bind def
/col21 {0.560 0.000 0.560 srgb} bind def
/col22 {0.690 0.000 0.690 srgb} bind def
/col23 {0.820 0.000 0.820 srgb} bind def
/col24 {0.500 0.190 0.000 srgb} bind def
/col25 {0.630 0.250 0.000 srgb} bind def
/col26 {0.750 0.380 0.000 srgb} bind def
/col27 {1.000 0.500 0.500 srgb} bind def
/col28 {1.000 0.630 0.630 srgb} bind def
/col29 {1.000 0.750 0.750 srgb} bind def
/col30 {1.000 0.880 0.880 srgb} bind def
/col31 {1.000 0.840 0.000 srgb} bind def
newpath 0 42 moveto 0 0 lineto 218 0 lineto 218 42 lineto closepath clip newpath
-107.3 99.7 translate
/cp {closepath} bind def
/ef {eofill} bind def
/gr {grestore} bind def
/gs {gsave} bind def
/sa {save} bind def
/rs {restore} bind def
/l {lineto} bind def
/m {moveto} bind def
/rm {rmoveto} bind def
/n {newpath} bind def
/s {stroke} bind def
/sh {show} bind def
/slc {setlinecap} bind def
/slj {setlinejoin} bind def
/slw {setlinewidth} bind def
/srgb {setrgbcolor} bind def
/rot {rotate} bind def
/sc {scale} bind def
/sd {setdash} bind def
/ff {findfont} bind def
/sf {setfont} bind def
/scf {scalefont} bind def
/sw {stringwidth} bind def
/tr {translate} bind def
/tnt {dup dup currentrgbcolor
  4 -2 roll dup 1 exch sub 3 -1 roll mul add
  4 -2 roll dup 1 exch sub 3 -1 roll mul add
  4 -2 roll dup 1 exch sub 3 -1 roll mul add srgb}
/shd {dup dup currentrgbcolor 4 -2 roll mul 4 -2 roll mul
  4 -2 roll mul srgb} bind def
/$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def
/$F2psEnd {$F2psEnteredState restore end} def
10 setmiterlimit
0 slj 0 slc
 0.06000 0.06000 sc
% Fig objects follow
% here starts figure with depth 51
 cp gs col7 0.90 shd ef gr gs col0 s gr 
 cp gs col7 0.90 shd ef gr gs col0 s gr 
gs  clippath
 4500 1350 l gs col0 s gr gr
% arrowhead
gs  clippath
 4500 1275 l gs col0 s gr gr
% arrowhead
gs  clippath
 2475 1447 l gs col0 s gr gr
% arrowhead
gs  clippath
 2475 1147 l gs col0 s gr gr
% arrowhead
/Helvetica ff 183.33 scf sf
gs 1 -1 sc (a) dup sw pop neg 0 rm  col0 sh gr
/Helvetica ff 183.33 scf sf
gs 1 -1 sc (b) dup sw pop neg 0 rm  col0 sh gr
/Helvetica ff 183.33 scf sf
gs 1 -1 sc ('banana') col0 sh gr
/Helvetica ff 183.33 scf sf
gs 1 -1 sc (a) dup sw pop neg 0 rm  col0 sh gr
/Helvetica ff 183.33 scf sf
gs 1 -1 sc (b) dup sw pop neg 0 rm  col0 sh gr
/Helvetica ff 183.33 scf sf
gs 1 -1 sc ('banana') col0 sh gr
/Helvetica ff 183.33 scf sf
gs 1 -1 sc ('banana') col0 sh gr
% here ends figure;
Sunbelt Computer Software

PL/B Language Development and Support

Provide feedback

Saved searches

Use saved searches to filter your results more quickly

Uh oh!

Sunbelt Computer Software

PL/B Language Development and Support

Uh oh!

FilesExpand file tree

list1.eps

Latest commit

History

list1.eps

File metadata and controls
