%!PS-Adobe-3.0 EPSF-3.0 %%BoundingBox: 44 208 544 516 %%Title: All Descendants of David Sinclair Quarterman (1875 - 1960) %%Creator: chart version 3.3 %%For: John Quarterman %%CreationDate: Fri Dec 2 17:32:39 1994 %%Orientation: Portrait %%DocumentNeededResources: font Times-Bold %%+ font Times-Roman %%+ font Times-Italic %%EndComments %%BeginProlog gsave 100 dict begin %%IncludeResource: font Times-Bold %%IncludeResource: font Times-Roman %%IncludeResource: font Times-Italic /filename (dsq.ps) def %chartstats 16 boxes, 15 people, 9 descendants, 7 spouses, 6 families % parameters of chart coordinate spaces /points 72 def /pointsize 10 def /vertspace 11 def /titlesize 10 def /titlespace 12 def % paper page size in inches /pagexmax 8.5 def /pageymax 11 def % lines and characters to inches % x: 82.6381 - 0 = 6.9424, 1, 0.778798 y: 17.5 - -4.25 = 4.26736, 1, 6.03993 % PostScript figure size in points /psxmin 44 def /psymin 208 def /psxmax 544 def /psymax 516 def /titlefont { /Times-Bold findfont titlesize scalefont setfont } def /boldfont { /Times-Bold findfont pointsize scalefont setfont } def /romfont { /Times-Roman findfont pointsize scalefont setfont } def /textfont { romfont } def /italfont {/Times-Italic findfont pointsize scalefont setfont } def textfont /boxline { 1 setlinewidth } def /genline { 0.75 setlinewidth } def /marline { 0.75 setlinewidth } def % colors /chartcolor { setrgbcolor } def % /chartcolor { pop pop pop } def % /boxcolor { 0.5 0.1 0.2 } def % brown /Hc 0 def /Bc 0.85 def /boxcolor { blackcolor } def /box2c { boxcolor Bc Bc Bc } def /fcolor { 1 0 0 } def /f2c { fcolor 1 Bc 1 } def % red and pink /mcolor { 0 0 1 } def /m2c { mcolor Bc 1 1 } def % blue and cyan /gencolor { Hc 1 Hc } def % green /marcolor { 1 Hc 1 } def % magenta /imarcolor { 1 1 Hc } def % yellow /blackcolor { 0 0 0 } def % black % corner and box definitions /cornerc { 0 0 } def /cornerw { -1 0 } def /cornernw { -1 1 } def /cornern { 0 1 } def /cornerne { 1 1 } def /cornere { 1 0 } def /cornerse { 1 -1 } def /corners { 0 -1 } def /cornersw { -1 -1 } def % Move center of box so corner is at right place. % x y wid ht cx cy boxcent /boxcent { /CY exch def /CX exch def /Boxht exch def /Boxwid exch def /BoxY exch def /BoxX exch def /BoxX BoxX Boxwid CX 2 div mul sub def /BoxY BoxY Boxht CY 2 div mul sub def BoxX BoxY Boxwid Boxht } def % Return coordinates of corner of box; no need to keep width and height. % x y wid ht cx cy boxcor /boxcor { /CY exch def /CX exch def /Boxht exch def /Boxwid exch def /BoxY exch def /BoxX exch def /BoxX BoxX Boxwid CX 2 div mul add def /BoxY BoxY Boxht CY 2 div mul add def BoxX BoxY } def /boxpath { % x y wid ht box /Boxht exch def /Boxwid exch def /BoxY exch def /BoxX exch def /BoxR vertspace 2 div def /BoxWR { Boxwid 2 div BoxR sub mul BoxX add } def /BoxHR { Boxht 2 div BoxR sub mul BoxY add } def % draw box from its upper left corner -1 BoxWR 1 BoxHR BoxR add moveto 1 BoxWR 1 BoxHR BoxR 90 0 arcn 1 BoxWR -1 BoxHR BoxR 0 270 arcn -1 BoxWR -1 BoxHR BoxR 270 180 arcn -1 BoxWR 1 BoxHR BoxR 180 90 arcn } def /box { /Boxht exch def /Boxwid exch def /BoxY exch def /BoxX exch def BoxX BoxY Boxwid Boxht boxpath stroke } def % strings n outlinecolor insidecolor x y wid ht box /c2box { /Boxht exch def /Boxwid exch def /BoxY exch def /BoxX exch def 1 1 1 setrgbcolor chartcolor BoxX BoxY Boxwid Boxht boxpath fill 0 0 0 setrgbcolor chartcolor BoxX BoxY Boxwid Boxht boxpath stroke 0 0 0 setrgbcolor BoxX BoxY Boxwid Boxht cornerw boxcor lstrings } def % n outlinecolor insidecolor x y wid ht box /cmbox { /Boxht exch def /Boxwid exch def /BoxY exch def /BoxX exch def 1 1 1 setrgbcolor chartcolor BoxX BoxY Boxwid Boxht boxpath fill 0 0 0 setrgbcolor chartcolor BoxX BoxY Boxwid Boxht boxpath stroke 0 0 0 setrgbcolor BoxX BoxY Boxwid Boxht cornerw boxcor /StrY exch def /StrX exch def /StrN exch def % need to adjust height if more than one string /StrMax StrN 1 sub def % go up n - 1 strings over 2 /StrY StrY StrMax 2 div vertspace mul add def /StrY StrY vertspace 4 div neg add def StrX StrY moveto } def /cmnext { /StrY StrY vertspace sub def StrX StrY moveto } def /lsbox { % strings n x y wid ht box /Boxht exch def /Boxwid exch def /BoxY exch def /BoxX exch def BoxX BoxY Boxwid Boxht box % go to center of left side and print strings 0 0 0 setrgbcolor BoxX BoxY Boxwid Boxht cornerw boxcor lstrings } def % strings n X Y lstrings /lstrings { /StrY exch def /StrX exch def /StrN exch def % need to adjust height if more than one string /StrMax StrN 1 sub def % go up n - 1 strings over 2 /StrY StrY StrMax 2 div vertspace mul add def StrX StrY moveto % read the strings backwards off the stack StrN -1 roll 0 1 StrMax { pop StrX StrY moveto lstring /StrY StrY vertspace sub def /StrN StrN 1 sub def StrN -1 roll } for } def /vstring { 0 vertspace 4 div neg rmoveto } def % left adjusted string % string lstring /lstring { vstring show } def % right adjusted string % string rstring /rstring { vstring dup stringwidth pop neg 0 rmoveto show } def % centered string % string cstring /cstring { vstring dup stringwidth pop 2 div neg 0 rmoveto show } def /chartboundingbox { psxmin psymin moveto psxmin psymax lineto psxmax psymax lineto psxmax psymin lineto closepath stroke } def % functions for visible display, especially on a laptop /magchart { (magchart.ps) run } def /chartfile currentfile def /chartcolor { pop pop pop } def %%EndProlog titlefont 56.0734 481.625 titlespace vertspace 0.25 mul add add moveto (All Descendants of David Sinclair Quarterman (1875 - 1960)) show textfont % 1.27985 -2.25 boxline /B1 { 63.4431 459.625 72.9382 46.75 cornerw boxcent} def 4 m2c B1 cmbox boldfont ( David Sinclair) show cmnext ( Quarterman) show cmnext romfont ( b. 15 Jul 1875) show cmnext ( d. 12 Oct 1960) show cmnext blackcolor chartcolor % 1 @I7@M David Sinclair Quarterman @F0@* H@I0@ W@I0@ % @I7@ -> @F3@ % 1.27985 2.25 boxline /B2 { 63.4431 410.125 76.7771 46.75 cornerw boxcent} def 4 f2c B2 cmbox romfont ( m. 7 Feb 1904) show cmnext boldfont ( Alla Irene Peek) show cmnext romfont ( b. 7 Feb 1883) show cmnext ( d. 31 Mar 1964) show cmnext blackcolor chartcolor % 2 @I8@F Alla Irene Peek ->@F3@ @F3@ H@I7@ W@I8@ % @F3@ -> @I7@ marcolor chartcolor marline B1 cornerw boxcor moveto B1 cornerw boxcor exch -5.97201 add exch 0 add /Cy exch def /Cx exch def Cx Cy lineto B1 cornerw boxcor exch -11.944 add exch 0 add B2 cornerw boxcor exch -11.944 add exch 0 add B2 cornerw boxcor exch -5.97201 add exch 0 add /Cy exch def /Cx exch def Cx Cy curveto B2 cornerw boxcor lineto stroke blackcolor chartcolor % 19.7326 -2.75 boxline /B3 { 169.699 465.125 119.964 24.75 cornerw boxcent} def 2 f2c B3 cmbox boldfont ( Jane Sinclair Quarterman) show cmnext italfont ( in Moultrie, GA) show cmnext blackcolor chartcolor genline gencolor chartcolor B2 cornere boxcor moveto B2 cornere boxcor exch 7.36972 add exch -0 add lineto B3 cornerw boxcor exch -22.1092 add exch 0 add lineto B3 cornerw boxcor lineto stroke blackcolor chartcolor % 3 @I5@F Jane Sinclair Quarterman @F0@* H@I0@ W@I0@ % @I5@ -> @F2@ % 19.7326 -0.25 boxline /B4 { 169.699 437.625 102.689 24.75 cornerw boxcent} def 2 m2c B4 cmbox romfont ( m. 1 Sep 1940) show cmnext boldfont ( Walter Graves Comer) show cmnext blackcolor chartcolor % 4 @I4@M Walter Graves Comer ->@F2@ @F2@ H@I4@ W@I5@ % @F2@ -> @I5@ marcolor chartcolor marline B3 cornerw boxcor moveto B3 cornerw boxcor exch -4.9555 add exch 0 add /Cy exch def /Cx exch def Cx Cy lineto B3 cornerw boxcor exch -9.911 add exch 0 add B4 cornerw boxcor exch -9.911 add exch 0 add B4 cornerw boxcor exch -4.9555 add exch 0 add /Cy exch def /Cx exch def Cx Cy curveto B4 cornerw boxcor lineto stroke blackcolor chartcolor % 19.7326 2.25 boxline /B5 { 169.699 410.125 85.4146 24.75 cornerw boxcent} def 2 f2c B5 cmbox boldfont ( Elsie Quarterman) show cmnext italfont ( in Nashville, TN) show cmnext blackcolor chartcolor genline gencolor chartcolor B2 cornere boxcor moveto B2 cornere boxcor exch 7.36972 add exch -0 add lineto B5 cornerw boxcor exch -22.1092 add exch 0 add lineto B5 cornerw boxcor lineto stroke blackcolor chartcolor % 5 @I9@F Elsie Quarterman @F0@ H@I0@ W@I0@ % 19.7326 4.75 boxline /B6 { 169.699 382.625 139.159 24.75 cornerw boxcent} def 2 m2c B6 cmbox boldfont ( David Sinclair Quarterman Jr.) show cmnext italfont ( near Valdosta, GA) show cmnext blackcolor chartcolor genline gencolor chartcolor B2 cornere boxcor moveto B2 cornere boxcor exch 7.36972 add exch -0 add lineto B6 cornerw boxcor exch -22.1092 add exch 0 add lineto B6 cornerw boxcor lineto stroke blackcolor chartcolor % 6 @I11@M David Sinclair Quarterman Jr. @F0@* H@I0@ W@I0@ % @I11@ -> @F5@ % 19.7326 7.25 boxline /B7 { 169.699 355.125 129.561 24.75 cornerw boxcent} def 2 f2c B7 cmbox romfont ( m. 14 Jun 1945) show cmnext boldfont ( Laura Elizabeth Hargreaves) show cmnext blackcolor chartcolor % 7 @I15@F Laura Elizabeth Hargreaves ->@F5@ @F5@ H@I11@ W@I15@ % @F5@ -> @I11@ marcolor chartcolor marline B6 cornerw boxcor moveto B6 cornerw boxcor exch -4.9555 add exch 0 add /Cy exch def /Cx exch def Cx Cy lineto B6 cornerw boxcor exch -9.911 add exch 0 add B7 cornerw boxcor exch -9.911 add exch 0 add B7 cornerw boxcor exch -4.9555 add exch 0 add /Cy exch def /Cx exch def Cx Cy curveto B7 cornerw boxcor lineto stroke blackcolor chartcolor % 49.0187 -1.5 boxline /B8 { 338.337 451.375 71.0189 35.75 cornerw boxcent} def 3 m2c B8 cmbox boldfont ( David Leon) show cmnext ( Quarterman) show cmnext italfont ( in Athens, GA) show cmnext blackcolor chartcolor genline gencolor chartcolor B7 cornere boxcor moveto B7 cornere boxcor exch 16.9669 add exch -0 add lineto B8 cornerw boxcor exch -22.1092 add exch 0 add lineto B8 cornerw boxcor lineto stroke blackcolor chartcolor % 8 @I1@M David Leon Quarterman @F0@* H@I0@ W@I0@ % @I1@ -> @F1@ % 49.0187 2 boxline /B9 { 338.337 412.875 93.0923 35.75 cornerw boxcent} def 3 f2c B9 cmbox romfont ( m. 24 Nov 1977) show cmnext boldfont ( Margaret Campbell) show cmnext ( Merrill) show cmnext blackcolor chartcolor % 9 @I2@F Margaret Campbell Merrill ->@F1@ @F1@ H@I1@ W@I2@ % @F1@ -> @I1@ marcolor chartcolor marline B8 cornerw boxcor moveto B8 cornerw boxcor exch -5.46376 add exch 0 add /Cy exch def /Cx exch def Cx Cy lineto B8 cornerw boxcor exch -10.9275 add exch 0 add B9 cornerw boxcor exch -10.9275 add exch 0 add B9 cornerw boxcor exch -5.46376 add exch 0 add /Cy exch def /Cx exch def Cx Cy curveto B9 cornerw boxcor lineto stroke blackcolor chartcolor % 71.8047 2 boxline /B10 { 469.545 412.875 62.3814 24.75 cornerw boxcent} def 2 f2c B10 cmbox boldfont ( Peggy) show cmnext ( Quarterman) show cmnext blackcolor chartcolor genline gencolor chartcolor B9 cornere boxcor moveto B9 cornere boxcor exch 16.0071 add exch -0 add lineto B10 cornerw boxcor exch -22.1092 add exch 0 add lineto B10 cornerw boxcor lineto stroke blackcolor chartcolor % 10 @I3@F Peggy Quarterman @F0@ H@I0@ W@I0@ % 49.0187 5.5 boxline /B11 { 338.337 374.375 88.2937 35.75 cornerw boxcent} def 3 m2c B11 cmbox boldfont ( Stephen Patrick) show cmnext ( Quarterman) show cmnext italfont ( in Hermitage, TN) show cmnext blackcolor chartcolor genline gencolor chartcolor B7 cornere boxcor moveto B7 cornere boxcor exch 16.9669 add exch -0 add lineto B11 cornerw boxcor exch -22.1092 add exch 0 add lineto B11 cornerw boxcor lineto stroke blackcolor chartcolor % 11 @I17@M Stephen Patrick Quarterman @F0@* H@I0@ W@I0@ % @I17@ -> @F71@ % 49.0187 9 boxline /B12 { 338.337 335.875 92.1326 35.75 cornerw boxcent} def 3 f2c B12 cmbox romfont ( m. 26 Nov 1983) show cmnext boldfont ( Angela Beth) show cmnext ( ``Angie'' Henshaw) show cmnext blackcolor chartcolor % 12 @I476@F Angela Beth ``Angie'' Henshaw ->@F71@ @F71@ H@I17@ W@I476@ % @F71@ -> @I17@ marcolor chartcolor marline B11 cornerw boxcor moveto B11 cornerw boxcor exch -5.46376 add exch 0 add /Cy exch def /Cx exch def Cx Cy lineto B11 cornerw boxcor exch -10.9275 add exch 0 add B12 cornerw boxcor exch -10.9275 add exch 0 add B12 cornerw boxcor exch -5.46376 add exch 0 add /Cy exch def /Cx exch def Cx Cy curveto B12 cornerw boxcor lineto stroke blackcolor chartcolor % 71.8047 9 boxline /B13 { 469.545 335.875 62.3814 35.75 cornerw boxcent} def 3 m2c B13 cmbox boldfont ( David) show cmnext ( Nicholas) show cmnext ( Quarterman) show cmnext blackcolor chartcolor genline gencolor chartcolor B12 cornere boxcor moveto B12 cornere boxcor exch 16.9669 add exch -0 add lineto B13 cornerw boxcor exch -22.1092 add exch 0 add lineto B13 cornerw boxcor lineto stroke blackcolor chartcolor % 13 @I477@M David Nicholas Quarterman @F0@ H@I0@ W@I0@ % 49.0187 12.5 boxline /B14 { 338.337 297.375 69.0994 35.75 cornerw boxcent} def 3 m2c B14 cmbox boldfont ( John Sinclair) show cmnext ( Quarterman) show cmnext italfont ( in Austin, TX) show cmnext blackcolor chartcolor genline gencolor chartcolor B7 cornere boxcor moveto B7 cornere boxcor exch 16.9669 add exch -0 add lineto B14 cornerw boxcor exch -22.1092 add exch 0 add lineto B14 cornerw boxcor lineto stroke blackcolor chartcolor % 14 @I18@M John Sinclair Quarterman @F0@* H@I0@ W@I0@ % @I18@ -> @F101@ % 49.0187 16 boxline /B15 { 338.337 258.875 101.73 35.75 cornerw boxcent} def 3 f2c B15 cmbox romfont ( m. 31 Dec 1993) show cmnext boldfont ( Gretchen Jane Kuntz) show cmnext italfont ( in Lancaster, NY) show cmnext blackcolor chartcolor % 15 @I563@F Gretchen Jane Kuntz ->@F101@ @F101@ H@I18@ W@I563@ % @F101@ -> @I18@ marcolor chartcolor marline B14 cornerw boxcor moveto B14 cornerw boxcor exch -5.46376 add exch 0 add /Cy exch def /Cx exch def Cx Cy lineto B14 cornerw boxcor exch -10.9275 add exch 0 add B15 cornerw boxcor exch -10.9275 add exch 0 add B15 cornerw boxcor exch -5.46376 add exch 0 add /Cy exch def /Cx exch def Cx Cy curveto B15 cornerw boxcor lineto stroke blackcolor chartcolor titlefont 56.0734 242.375 vertspace 0.25 mul neg add moveto 0 titlespace neg rmoveto (dsq.ps 10 / 11; ) show (Fri Dec 2 17:32:39 1994 ) show showpage end grestore