card1.eps

%!PS-Adobe-2.0 EPSF-2.0
%%Title: card1.fig
%%Creator: fig2dev Version 3.2 Patchlevel 5
%%CreationDate: Fri Jun  6 11:05:05 2008
%%For: downey@rocky (Allen Downey,,,)
%%BoundingBox: 0 0 194 155
%Magnification: 1.0000
%%EndComments
%%BeginProlog
/$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

end

/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}
  bind def
/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

/pageheader {
save
newpath 0 155 moveto 0 0 lineto 194 0 lineto 194 155 lineto closepath clip newpath
-19.0 203.2 translate
1 -1 scale
$F2psBegin
10 setmiterlimit
0 slj 0 slc
 0.06000 0.06000 sc
} bind def
/pagefooter {
$F2psEnd
restore
} bind def
%%EndProlog
pageheader
%
% Fig objects follow
%
% 
% here starts figure with depth 51
% Polyline
0 slj
0 slc
7.500 slw
n 3150 1050 m 3525 1050 l 3525 1425 l 3150 1425 l
 cp gs col7 0.90 shd ef gr gs col0 s gr 
% Polyline
n 3150 1800 m 3525 1800 l 3525 2175 l 3150 2175 l
 cp gs col7 0.90 shd ef gr gs col0 s gr 
% Polyline
n 1200 1050 m 2850 1050 l 2850 2175 l 1200 2175 l
 cp gs col7 0.90 shd ef gr gs col0 s gr 
% Polyline
n 1275 2700 m 2625 2700 l 2625 3375 l 1275 3375 l
 cp gs col7 0.90 shd ef gr gs col0 s gr 
% Polyline
gs  clippath
1063 1230 m 1215 1230 l 1215 1170 l 1063 1170 l 1063 1170 l 1183 1200 l 1063 1230 l cp
eoclip
n 825 1200 m
 1200 1200 l gs col0 s gr gr

% arrowhead
n 1063 1230 m 1183 1200 l 1063 1170 l  col0 s
% Polyline
gs  clippath
3013 1229 m 3165 1227 l 3164 1167 l 3012 1169 l 3012 1169 l 3133 1198 l 3013 1229 l cp
eoclip
n 2625 1205 m
 3150 1198 l gs col0 s gr gr

% arrowhead
n 3013 1229 m 3133 1198 l 3012 1169 l  col0 s
% Polyline
gs  clippath
3013 1977 m 3165 1975 l 3164 1915 l 3012 1917 l 3012 1917 l 3133 1946 l 3013 1977 l cp
eoclip
n 2625 1953 m
 3150 1946 l gs col0 s gr gr

% arrowhead
n 3013 1977 m 3133 1946 l 3012 1917 l  col0 s
% Polyline
gs  clippath
2038 3202 m 2190 3202 l 2190 3142 l 2038 3142 l 2038 3142 l 2158 3172 l 2038 3202 l cp
eoclip
n 1800 3172 m
 2175 3172 l gs col0 s gr gr

% arrowhead
n 2038 3202 m 2158 3172 l 2038 3142 l  col0 s
% Polyline
gs  clippath
2038 2902 m 2190 2902 l 2190 2842 l 2038 2842 l 2038 2842 l 2158 2872 l 2038 2902 l cp
eoclip
n 1800 2872 m
 2175 2872 l gs col0 s gr gr

% arrowhead
n 2038 2902 m 2158 2872 l 2038 2842 l  col0 s
% Polyline
gs  clippath
1138 2880 m 1290 2880 l 1290 2820 l 1138 2820 l 1138 2820 l 1258 2850 l 1138 2880 l cp
eoclip
n 900 2850 m
 1275 2850 l gs col0 s gr gr

% arrowhead
n 1138 2880 m 1258 2850 l 1138 2820 l  col0 s
/Helvetica ff 183.33 scf sf
3150 975 m
gs 1 -1 sc (list) col0 sh gr
/Helvetica ff 183.33 scf sf
2550 1275 m
gs 1 -1 sc (suit_names) dup sw pop neg 0 rm  col0 sh gr
/Helvetica ff 183.33 scf sf
3150 1725 m
gs 1 -1 sc (list) col0 sh gr
/Helvetica ff 183.33 scf sf
2550 2025 m
gs 1 -1 sc (rank_names) dup sw pop neg 0 rm  col0 sh gr
/Helvetica ff 183.33 scf sf
750 1275 m
gs 1 -1 sc (Card) dup sw pop neg 0 rm  col0 sh gr
/Helvetica ff 183.33 scf sf
1200 975 m
gs 1 -1 sc (type) col0 sh gr
/Helvetica ff 183.33 scf sf
2250 2925 m
gs 1 -1 sc (1) col0 sh gr
/Helvetica ff 183.33 scf sf
2250 3225 m
gs 1 -1 sc (11) col0 sh gr
/Helvetica ff 183.33 scf sf
1725 2925 m
gs 1 -1 sc (suit) dup sw pop neg 0 rm  col0 sh gr
/Helvetica ff 183.33 scf sf
1725 3225 m
gs 1 -1 sc (rank) dup sw pop neg 0 rm  col0 sh gr
/Helvetica ff 183.33 scf sf
825 2925 m
gs 1 -1 sc (card1) dup sw pop neg 0 rm  col0 sh gr
/Helvetica ff 183.33 scf sf
1275 2625 m
gs 1 -1 sc (Card) col0 sh gr
% here ends figure;
pagefooter
showpage
%%Trailer
%EOF