%! % Henry Field Notes with topo % ============================================================== % Copyright c 2018 by Don Lancaster & Synergetics, Box 809, Thatcher, AZ, 85552 % (928) 428-4073 Email: don@tinaja.com Website: http://www.tinaja.com % Consulting services available http://www.tinaja.com/info01.html % Linking welcome. Reposting expressly forbidden. % All commercial rights and all electronic media rights ~fully~ reserved. % Linking usually welcome. Reposting expressly forbidden. Version 1.1 % This is an improved and updated version of the Golf Course Canal field notes % that includes expanded topo maps. Be sure embedded Stone fonts are % available properly set! You will also need related image copies as noted below. % nav buttons are built in via pdfmark See source code below. %%%%%%%%% % This comment is a reminder that Distiller needs an //acrodist.exe /F to use disk files %%%%%%%%% % Define and alter your full gonzo.ps path reminder here It might be % (C:/Users/Don/Desktop/Ghost/gonzo.psl) run % Then run distiller ONLY from //acrodist.exe /F % Then drag and drop this file into Distiller. %%%%%%%%% % Set Directory Headers %%%%%%%% % /gonzodirectory (C:/Users/Don/Desktop/Ghost/gonzo.psl) run % use internal ) store % dbl rvse slashes for ps /imagelocaldirectory (C:/Users/don/Desktop/canal/images/) store % sin fwd slashes for win /imageremotedirectory (http://www.tinaja.com/canal/images/) store % sin fwd slashes for chrome % mergestr merges the two top stack strings into one top stack string /mergestr {2 copy length exch length add string dup dup 4 3 roll 4 index length exch putinterval 3 1 roll exch 0 exch putinterval} def %%%%%%%%% % This code activates gonzo utilities for this document %%%%%%%%% % Required preload of gonzo.ps and adjusted for your machine per above. % gonzodirectory (gonzo.ps) mergestr run % double reverse slashes in PS! (C:/Users/Don/Desktop/Ghost/gonzo.psl) run /guru { gonzo begin ps.util.1 begin printerror nuisance begin} def guru % activate gonzo utilities %%%%%%%%%% % This code locks pdfmark commands out of a PostScript printer. %%%%%%%%%% /pdfmark where {pop}{userdict /pdfmark /cleartomark load put} ifelse %%%%%%%%%% % This code changes the page size to smaller %%%%%%%%%% [/CropBox [0 0 520 620] % set the weird size in points X Y. /PAGES pdfmark %%%%%%%%%% % This code is needed for the automatic url placer %%%%%%%%%% % Requires a defined name for the url below % Activate with text text |/surl urlname |/eurl text text % /surl "start url" marks the beginning of a text sequence to be urled. % It also paints the text blue... /surl {mark /blue cvx 0.33 /setgray cvx % change text to blue /currentpoint cvx % remember box start /urly /exch cvx /store cvx /urlx /exch cvx /store cvx ] cvx % complete deferred command printlist exch 3 index exch put % stuff into gonzo printlist exch 1 add exch % increment gonzo list count } def % /eurl "end url" unmarks the end of a text sequence and sets up % the pdfmark needed to define the Acrobat web link. /eurl {mark % start deferred proc exch % position url string % /black cvx 0 /setgray cvx % turn blue marker off % maintextcolor /setrgbcolor cvx % reset to main text color??? /aqua cvx /black cvx /makeurl cvx % defer call of url builder ] cvx % complete deferred proc printlist exch 3 index exch % stuff into gonzo printlist put exch 1 add exch % increment gonzo list count } def % /makeurl generates the pdfmark, receiving a {(urlstring) makeurl}. % Note that it is not called until formatted printlist time... /urlover 0.2 def % fraction of hot area over bounds /makeurl { /cururlname exch store % save the url string mark % start pdfmark currentfont /ScaleMatrix get 3 get /fsize exch store % guess height /Rect [ urlx fsize urlover mul sub % set box left x urly fsize urlover mul sub % set box left y currentpoint exch fsize urlover mul add exch fsize add ] /Border [ 0 0 0] % [0 0 0 ] = none; [0 0 2] = debug /Color [ .7 0 0 ] /Action <> /Subtype /Link /ANN % annotation type pdfmark % call pdf operators } def % /makeurlx generates the box specific pdfmark, receiving % a {(urlstring) makeurl}. % Note that it is not called until formatted printlist time... /makeurlx { /cururlnamex exch store % save the url string mark % start pdfmark /Rect [ xpos % set box left x ypos 0.9 sub % set box left y xpos 2.8 add % box right x ypos 0.9 sub 2.8 add % box right y ] /Border [ 0 0 0] % [0 0 0 ] = none; [0 0 2] = debug /Color [ .7 0 0 ] /Action <> /Subtype /Link /ANN % annotation type pdfmark % call pdf operators } def %%%%%%%%%%% % This code inserts color effects mid line %%%%%%%%%% %%%%%%%%%%%%%% COMPACT VERSION OF COLORIZER II %%%%%%%%%%%%%%%%%%%%%% /settint {dup /currenttint exch store 5.999 mul dup floor cvi /&cbar exch store dup floor sub /&cwt exch store [ {/setgray [ /dup cvx 0.3 &cwt 0.59 mul add /ge cvx [1 /exch cvx &cwt 0.59 mul 0.30 add /sub cvx 1 &cwt sub 0.59 mul 0.11 add /div cvx /dup cvx 1 &cwt sub /mul cvx &cwt /add cvx /exch cvx ] cvx [ &cwt 0.59 mul 0.3 add /div cvx /dup cvx &cwt /mul cvx 0] cvx /ifelse cvx /setrgbcolor cvx] cvx /def cvx} {/setgray [/dup cvx 0.59 1 &cwt sub 0.3 mul add /ge cvx [1 &cwt sub 0.3 mul 0.59 add /sub cvx &cwt 0.3 mul 0.11 add /div cvx /dup cvx &cwt /mul cvx 1 &cwt sub /add cvx /exch cvx 1 /exch cvx] cvx [1 &cwt sub 0.3 mul 0.59 add /div cvx /dup cvx 1 &cwt sub /mul cvx /exch cvx 0] cvx /ifelse cvx /setrgbcolor cvx] cvx /def cvx} {/setgray [/dup cvx 0.59 &cwt 0.11 mul add /ge cvx [&cwt 0.11 mul 0.59 add /sub cvx 1 &cwt sub 0.11 mul 0.30 add /div cvx /dup cvx 1 &cwt sub /mul cvx &cwt /add cvx 1 /exch cvx] cvx [0 /exch cvx &cwt 0.11 mul 0.59 add /div cvx /dup cvx &cwt /mul cvx] cvx /ifelse cvx /setrgbcolor cvx] cvx /def cvx} {/setgray [/dup cvx 0.59 1 &cwt sub mul 0.11 add /ge cvx [1 &cwt sub 0.59 mul 0.11 add /sub cvx &cwt 0.59 mul 0.30 add /div cvx /dup cvx &cwt /mul cvx 1 &cwt sub /add cvx 1] cvx [0 /exch cvx 1 &cwt sub 0.59 mul 0.11 add /div cvx /dup cvx 1 &cwt sub /mul cvx /exch cvx] cvx /ifelse cvx /setrgbcolor cvx] cvx /def cvx} {/setgray [/dup cvx 0.11 &cwt 0.30 mul add /ge cvx[&cwt 0.30 mul 0.11 add /sub cvx 1 &cwt sub 0.30 mul 0.59 add /div cvx /dup cvx 1 &cwt sub /mul cvx &cwt /add cvx /exch cvx 1] cvx [ &cwt 0.30 mul 0.11 add /div cvx /dup cvx &cwt /mul cvx /exch cvx 0 /exch cvx ] cvx /ifelse cvx /setrgbcolor cvx ] cvx /def cvx} {/setgray [ /dup cvx 0.30 1 &cwt sub 0.11 mul add /ge cvx[ 1 /exch cvx 1 &cwt sub 0.11 mul 0.30 add /sub cvx &cwt 0.11 mul 0.59 add /div cvx /dup cvx &cwt /mul cvx 1 &cwt sub /add cvx ] cvx [ 1 &cwt sub 0.11 mul 0.30 add /div cvx /dup cvx 1 &cwt sub /mul cvx 0 /exch cvx] cvx /ifelse cvx /setrgbcolor cvx ] cvx /def cvx} ] &cbar get exec exec} bind def /beige {0.11 settint} def % examples of convenience operators /aqua {0.52 settint} def /blue {0.67 settint} def /lime {0.44 settint} def %%%%%%%%%%% % This code converts a .JPG image into a PS image %%%%%%%%%%% /jpegimageprocwithlink { % hoffset voffset hres vres urlfrom urlto save /snap2 exch def /inurllink exch store % grab link filename /infilename exch store % grab passed pix file /photoscale exch store /vpixels exch store /hpixels exch store % (\nvpixels = )print vpixels == % (\nhpixels = )print hpixels == % (\photoscale = ) print photoscale == % (\ninurllink = ) print inurllink == % (\ninfilemane = ) print infilename == translate % adjust position for final figure ??? inurllink setareaurl % autolink sizing /DeviceRGB setcolorspace % pick color model 0 0 translate % set page position hpixels vpixels scale % magnify unit square photoscale dup scale /infile infilename (r) file def % establish input read file /Data {infile /DCTDecode filter} def % define a data source << % start image dicationary /ImageType 1 % always one /Width hpixels % JPEG width in pixels /Height vpixels % JPEG height in pixels /ImageMatrix [hpixels 0 0 vpixels neg 0 vpixels ] /DataSource Data % proc to get filtered JPEG /BitsPerComponent 8 % color resolution /Decode [0 1 0 1 0 1] % per red book 4.10 >> image % call the image operator ypos snap2 restore /ypos exch def } def /setareaurl { % for auto include routine /cururlname exch store mark % start pdfmark /Rect [ 0 0 hpixels photoscale mul vpixels photoscale mul ] /Border [ 0 0 0] % [0 0 0 ] = none; [0 0 2] = debug /Color [ .7 0 0 ] /Action <> /Subtype /Link /ANN % annotation type pdfmark % call pdf operators } def %%%%%%%%%%% % This code inserts a PS figure proc into a fixed location %%%%%%%%%%% %%%%%%%%%%% % This code autopositions a PS figure proc %%%%%%%%%%% %%%%%%%%%%% % This image code for sequential pages %%%%%%%%%%% /startnewpage { black beige 0.35 setgray 21 -2.5 (|3\320|j|j) ggnum 40 string cvs mergestr (|j |j) mergestr pagenum 10 string cvs mergestr (|j|j\320) mergestr cc aqua showpage %% start next page /pagenum pagenum 1 add store 50 50 10 setgrid % create grid setpagefonts font1 textleft texttop } def %%%%%%%%%%% % These code snippets do various things %%%%%%%%%%% /tinton1 {mark 0.33 /setgray cvx] cvx printlist exch 3 index exch put exch 1 add exch} def /tintoff {mark 0 /setgray cvx] cvx printlist exch 3 index exch put exch 1 add exch} def /to {tinton1 aqua font6} store /tx {tintoff black font1} store /su {surl} store /webtintmat [ 0 1 5 {/a exch store 0 1 5 % webtint color array {/b exch store 0 1 5 {5 div b 5 div a 5 div} for }for } for ] def /setwebtint { abs cvi 216 cvi mod webtintmat % set 215 colors exch 3 mul 3 getinterval aload pop setrgbcolor} def /makered { mark 5 /setwebtint cvx ] cvx printlist exch 3 index exch put exch 1 add exch } store /makeblack { mark 0 /setwebtint cvx ] cvx printlist exch 3 index exch put exch 1 add exch } store %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%% document specific resources start here %%%%%%%%%%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %%%%%%%%%% % define url's to be generated ... ---> zzzzz <---- search marker %%%%%%%%% << % some of these are no longer used, particularly fn1 vs 1fn /canallist (http://www.tinaja.com/canal/field_notes/canal_list2e.pdf) /canallistps (http://www.tinaja.com/canal/field_notes/canal_list2e.psl) /gilariver (https://en.wikipedia.org/wiki/Gila_River) /discoveryfn1 (http://www.tinaja.com/canal/field_notes/discoveryfn1.pdf) /ownership (http://gis.azland.gov/webapps/parcel/?loc=-109.7461,32.8033,12&layers=2,1,0) /goatfn1 (http://www.tinaja.com/canal/field_notes/goatfn1.pdf) /ledfordfn1 (http://www.tinaja.com/canal/field_notes/ledfordfn1.pdf) /marijildafn1 (http://www.tinaja.com/canal/field_notes/marijildafn1.pdf) /roperfn1 (http://www.tinaja.com/canal/field_notes/roperfn1.pdf) /kmlx (http://www.tinaja.com/canal/mapimage2.kml) /tbwestfn1 (http://www.tinaja.com/canal/field_notes/tbwestn1.pdf) /lowerfryeconstructfn1 (http://www.tinaja.com/canal/field_notes/slowerfryeconstructfn1.pdf) /deadman1fn (http://www.tinaja.com/canal/field_notes/deadman1fn.pdf) /deadman1fnps (http://www.tinaja.com/canal/field_notes/deadman1fn.psl) /sandcanalfn1 (http://www.tinaja.com/canal/field_notes/sandcanalfn1.pdf) /fryecomplexfn1 (http://www.tinaja.com/canal/field_notes/fryecomplexfn1.pdf) /bluepondsfn1 (http://www.tinaja.com/canal/field_notes/bluepondsfn1.pdf) /hsfn1 (http://www.tinaja.com/canal/field_notes/hsfn1.pdf) /robinsonfn1 (http://www.tinaja.com/canal/field_notes/robinsonfn1.pdf) /allenfn1 (http://www.tinaja.com/canal/field_notes/allenfn1.pdf) /riggsmesafn1 (http://www.tinaja.com/canal/field_notes/riggsmesafn1.pdf) /golfcoursefn1 (http://www.tinaja.com/canal/field_notes/golf_coursefn1.pdf) /longviewfn1 (http://www.tinaja.com/canal/field_notes/longviewfn1.pdf) /freemanfn1 (http://www.tinaja.com/canal/field_notes/freemanfn1.pdf) /tranquilityfn1 (http://www.tinaja.com/canal/field_notes/tranquilityn1.pdf) /marijildafn1 (http://www.tinaja.com/canal/field_notes/marijildafn1.pdf) /allendamfail (http://www.tinaja.com/glib/allendam.pdf) /acme (http://www.mapper.acme.com/) /googleearth (https://www.google.com/earth/) /tranquility (http://www.azhotmineralspring.com/) /cottonclouds (http://www.cottonclouds.com/index.asp) /tbeastfn1 (http://www.tinaja.com/canal/field_notes/tbeastfn1.pdf) /mudspringsfn1 (http://www.tinaja.com/canal/field_notes/mudspringsfn1.pdf) /ockham (https://en.wikipedia.org/wiki/Occam%27s_razor) /blm (https://www.blm.gov/office/safford-field-office) /azstateland (https://land.az.gov) /anasazai (https://en.wikipedia.org/wiki/Ancient_Pueblo_peoples) /aqueduct (https://en.wikipedia.org/wiki/Aqueduct_(water_supply)) /AZrepublic (http://www.azcentral.com/news/articles/20130223arizona-hanging-canal-mystery.html) /bajada (https://en.wikipedia.org/wiki/Bajada_(geography)) /cnf (http://www.fs.usda.gov/coronado/) /association (https://en.wikipedia.org/wiki/Archaeological_association) /ccc (https://en.wikipedia.org/wiki/Civilian_Conservation_Corps) /glyphspair (http://www.tinaja.com/canal/cansum1.pdf) /grids (http://www.uapress.arizona.edu/Books/bid1582.htm) /gurgrm01 (http://www.tinaja.com/gurgrm01.shtml) /hohokam (https://en.wikipedia.org/wiki/Hohokam) /hunt (http://www.jstor.org/discover/10.2307/40035308?uid=3739552&uid=2&uid=4&uid=3739256&sid=21103435122901) /joanna (www.azcentral.com/opinions/articles/20130226editorial-admiring-our-forebears.html) /lefthand (http://www.tinaja.com/glib/lefthand.pdf) /maildon (mailto:don@tinaja.com) /mailneely (mailto:neelyja@utexas.edu) /mimbres (https://en.wikipedia.org/wiki/Mimbres_culture#Mimbres_culture) /mongollon (https://en.wikipedia.org/wiki/Mogollon_culture) /murphy (http://www.tinaja.com/glib/neely1.pdf) /newhang3 (http://www.tinaja.com/canal/newhang3.pdf) /tinsamp1 (http://www.tinaja.com/tinsamp1.shtml) /newhangshow3 (http://www.tinaja.com/canal/newhangshow3.pdf) /pinalino (https://en.wikipedia.org/wiki/Pinale%C3%B1o_Mountains) /prebajada (http://www.tinaja.com/glib/prebajada.pdf) /safford (https://en.wikipedia.org/wiki/Safford,_Arizona) /salado (https://en.wikipedia.org/wiki/Salado_culture) /scs (https://en.wikipedia.org/wiki/Natural_Resources_Conservation_Service) /stratigraphy (https://en.wikipedia.org/wiki/Stratigraphy) /tinaja (http://www.tinaja.com) /usatoday (http://www.usatoday.com/story/news/nation/2013/02/24/hanging-canals-whet-appetite-for-ancient-history/1941797) /waterlevel (http://en.wikipedia.org/wiki/Water_level) /whtnu15 (http://www.tinaja.com/whtnu15.shtml) /whtnu17 (http://www.tinaja.com/whtnu17.shtml) >> {mark exch /eurl cvx ] cvx def} forall %%%%%%%%%% % define fonts and main document gonzo params %%%%%%%%%% /setpagefonts { /cstretch 0.015 def /sstretch 0.015 def /font0 /StoneSans-Bold 1.6 gonzofont /font1 /StoneSans 0.95 gonzofont /font2 /StoneSans [0.95 0 0.25 0.95 0 0 ] gonzofont /font4 /StoneSans 0.85 gonzofont /font3 /StoneSans-Bold 0.85 gonzofont /font6 /StoneSans-Bold 0.85 gonzofont /font7 /StoneSans-Bold 1.05 gonzofont % subheaders /font8 /StoneSans-Bold [0.65 0 0 0.65 0 0.4] gonzofont /font9 /StoneSans-Bold 1.05 gonzofont /txtwide 36 store /yinc 1.2 store /kern 0.1 store /texttop 51 store /textleft 3 store /amacro {(zy0) stringmacro /ypos ypos ypara add def} def % start drop cap /bmacro {(iFy1) stringmacro /ypos ypos ypara add def} def % finish drop cap } store /nogrid {true} store /ggnum (Henry's Canal Field Notes) store % header for pagenumber /pagenum 1 def % initial pagenumber %%%%%%%%%%%%%% % Image common code for sequential pages %%%%%%%%%%%%%% /imagecommoncode { /font6 /StoneSans [2.4 0 0 2.8 0 0 ] gonzofont /font7 /StoneSans 1.2 gonzofont /green { 0 0.4 0 setrgbcolor} store /black { 0 0 0 setrgbcolor } store % text image link [ /Rect [2.0 42.2 39 44.2] /Action << /Subtype /URI /URI imageurl >> /Border [0 0 0] /Color [1 1 1] /Subtype /Link /ANN pdfmark % gps image link [ /Rect [2.0 40.1 39 42.1] /Action << /Subtype /URI /URI acmegpsurl >> /Border [0 0 0] /Color [1 1 1] /Subtype /Link /ANN pdfmark % image image link [ /Rect [2 13.7 39 38.6] /Action << /Subtype /URI /URI imageurl >> /Border [0 0 0] /Color [1 1 1] /Subtype /Link /ANN pdfmark /blue {0 0 1 setrgbcolor} store % not sure why these are needed here /setblue {mark 0 0 1 /setrgbcolor cvx ] cvx printlist exch 3 index exch put exch 1 add exch} store /setblack {mark 0 0 0 /setrgbcolor cvx ] cvx printlist exch 3 index exch put exch 1 add exch} store 0 47.5 (|6|/green ) imagename mergestr cl 0 45 (|7|/green ) imagetitle mergestr cl blue 3 42.8 (|7|/setblue ) imageurl mergestr cl 3 40.6 (|7|/setblue ) imagegps mergestr cl black } store %%% Page Navigation Utilities %%%% % requires gonzo utilities from http://www.tinaja.com/gonzo.psl /kern 0.1 store /navpagenum 1 store /prevpage 1 store /lastpage false store /baux { save /ssnap exch store /sym exch store translate 0 0 mt 2 pu 2 pr 2 pd closepath gsave 0.94 0.94 0.98 setrgbcolor fill grestore 0.8 dup dup setrgbcolor line2 stroke 0.5 dup dup setrgbcolor /font1 /Helvetica 1.5 gonzofont font1 1 0.5 sym cc ssnap restore} store black /glyphnext { 53 (>) baux } store /glyphprev {53 (<) baux } store /glyphone { 53 (1) baux} store /glyphback {53 (<|k|k|k<) baux} store /aaaa { [ /Rect [0 53 2 55] /Page/Next /View [/XYZ null null null] /Border [0 0 0 ] /Subtype /Link /ANN pdfmark [ /Rect [2.5 53 4.5 55] /Page prevpage /View [/XYZ null null null] /Border [0 0 0 ] /Subtype /Link /ANN pdfmark } store /bbbb { [ /Rect [0 53 2 55] /Page /Prev /View [/XYZ null null null] /Border [0 0 0 ] /Subtype /Link /ANN pdfmark [ /Rect [2.5 53 4.5 55] /Page 1 /View [/XYZ null null null] /Border [0 0 0 ] /Subtype /Link /ANN pdfmark [ /Rect [5 53 7 55] /Page/Next /View [/XYZ null null null] /Border [0 0 0 ] /Subtype /Link /ANN pdfmark [ /Rect [7.5 53 9.5 55] /Page prevpage /View [/XYZ null null null] /Border [0 0 0 ] /Subtype /Link /ANN pdfmark } store /cccc { [ /Rect [0 53 2 55] /Page /Prev /View [/XYZ null null null] /Border [0 0 0 ] /Subtype /Link /ANN pdfmark [ /Rect [2.5 53 4.5 55] /Page 1 /View [/XYZ null null null] /Border [0 0 0 ] /Subtype /Link /ANN pdfmark [ /Rect [5 53 7 55] /Page prevpage /View [/XYZ null null null] /Border [0 0 0 ] /Subtype /Link /ANN pdfmark } store /addpagenav { navpagenum 1 eq { 0 glyphnext 2.5 glyphback aaaa} if navpagenum 1 ne lastpage not and {0 glyphprev 2.5 glyphone 5 glyphnext 7.5 glyphback bbbb} if lastpage {0 glyphprev 2.5 glyphone 5 glyphback cccc} if /prevpage pagenum store /navpagenum navpagenum 1 add store} store % ///////// (A) WEB FRIENDLY COLOR UTILITIES ///////////// % tintmat is a self-generating list of 216 triple color values /webtintmat [ 0 1 5 { /a exch store 0 1 5 { /b exch store 0 1 5 { 5 div b 5 div a 5 div }for } for } for ] def % setwebtint accepts a color number 0 to 215 and then % sets the PostScript color generator for later use... /setwebtint { abs cvi 216 cvi mod % restrict range webtintmat exch 3 mul 3 getinterval % get values from table aload pop setrgbcolor} def % and set them %%%%%%%%%%%%%%%% begin kml experiment %%%%%%%%%%%%%%%%%%%%%%%%%%% % this still needs a way for Chrome to go directly to Google Earth. % presently opens kml textfile instead. Chrome extensions not helping. % presently usable with this manual workaround: Do a save as from the % clicked kml text. Then click on the saved kml file. /clickforkml { true { save /ksnap exch store 34 53 translate 0 0 mt 2 pu 7.2 pr 2 pd closepath gsave 0.94 0.94 0.98 setrgbcolor fill grestore 0.8 0.8 0.8 setrgbcolor line2 stroke 0.6 0.6 (|6|/surl Click for KML |/kmlx ) cl ksnap restore } if } store % end kml link %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%% actual page content starts here %%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %%%%%%%%%%%%%% % notebox uses modified roundpath %%%%%%%%%%%%% /notebox { % hpos vpos hsize vsize corrad titsize title body save /boxsnap exch store /yinc 1.1 store /body exch store /title exch store /titsize exch store /corrad exch store /hsize exch store /vsize exch store translate hsize 2 div 0 moveto 0 0 0 vsize corrad arct 0 vsize hsize vsize corrad arct hsize vsize hsize 0 corrad arct hsize 0 0 0 corrad arct closepath gsave 141 setwebtint fill grestore 54 pop 48 setwebtint line3 stroke hsize 2 div vsize titsize sub moveto 0 vsize titsize sub lineto 0 vsize hsize vsize corrad arct hsize vsize hsize vsize titsize sub corrad arct hsize vsize titsize sub lineto closepath 54 pop 48 setwebtint fill white font3 hsize 2 div vsize 1.4 sub title cc 1 2 3 4 black font3 hsize 2 div vsize titsize sub 1.2 sub body cc boxsnap restore } store % some upper urls may no longer be current << /whtnu15 (http://www.tinaja.com/whtnu15.shtml) /whtnu16 (http://www.tinaja.com/whtnu16.shtml) /whtnu17 (http://www.tinaja.com/whtnu17.shtml) /azland (https://land.az.gov/) /blueponds1fn (https://www.tinaja.com/canal/field_notes/blueponds1fn.pdf) /freeman1fn (https://www.tinaja.com/canal/field_notes/freeman1fn.pdf) /riggs1fn (https://www.tinaja.com/canal/field_notes/riggs1fn.pdf) /golfcourse1fn (https://www.tinaja.com/canal/field_notes/golf_course1fn.pdf) /aquaduct1fn (https://www.tinaja.com/canal/field_notes/aquaduct1fn.pdf) /robtext (http://mapper.acme.com/?ll=32.80883,-109.78255&z=17&t=H&marker0=32.80832%2C-109.78545%2Cunnamed&marker1=32.80947%2C-109.78082%2C3.0%20mi%20SxSW%20of%20Thatcher%20AZ) /dead1fn (https://www.tinaja.com/canal/field_notes/deadman1fn.pdf) /sand1fn (https://www.tinaja.com/canal/field_notes/sand1fn.pdf) /mudspringsfn (https://www.tinaja.com/canal/field_notes/mudsprings1fn.pdf) /hsfn (https://www.tinaja.com/canal/field_notes/hs1fn.pdf) /allenfn (https://www.tinaja.com/canal/field_notes/allen1fn.pdf) /canallist (https://www.tinaja.com/canal/field_notes/canal_list2e.pdf) /canallistps (https://www.tinaja.com/canal/field_notes/canal_list2e.psl) /culebra1 (https://www.tinaja.com/canal/images/culebra1.jpg) /deadman1fn (https://www.tinaja.com/canal/field_notes/deadman1fn.pdf) /deadman1fnps (https://www.tinaja.com/canal/field_notes/deadman1fn.psl) /fryecomplex1fn (https://www.tinaja.com/canal/field_notes//fryecomplex1fn.pdf) /fryecomplex1fnps (https://www.tinaja.com/canal/field_notes//fryecomplex1fn.psl) /golfcourse1fn (https://www.tinaja.com/canal/field_notes/golf_course1fn.pdf) /golfcourse1fnps (https://www.tinaja.com/canal/field_notes/golf_course1fn.psl) /henry1fn (https://www.tinaja.com/canal/field_notes/henry1fn.pdf) /henry1fnps (https://www.tinaja.com/canal/field_notes/henry1fn.psl) /goat1fn (https://www.tinaja.com/canal/field_notes/goat1fn.pdf) /marijilda1fn (https://www.tinaja.com/canal/field_notes/marijilda1fn.pdf) /roper1fn (https://www.tinaja.com/canal/field_notes/roper1fn.pdf) /robinson1fn (https://www.tinaja.com/canal/field_notes/robinson1fn.pdf) /ledford1fn (https://www.tinaja.com/canal/field_notes/ledford1fn.pdf) /lower_frye_construct1fn (https://www.tinaja.com/canal/field_notes/lower_frye_construct1fn.pdf) /lower_frye_construct1fnps (https://www.tinaja.com/canal/field_notes/lower_frye_construct1fn.psl) /reaycan1fn (https://www.tinaja.com/canal/field_notes/reaycan1fn.pdf) /reacan1fnps (https://www.tinaja.com/canal/field_notes/reaycan1fn.psl) /arta1fn (https://www.tinaja.com/canal/field_notes/artesia1fn.pdf) /artb1fn (https://www.tinaja.com/canal/field_notes/artesib1fn.pdf) /glotzb (https://www.tinaja.com/canal/field_notes/roper1fn.pdf) /glotzb (https://www.tinaja.com/canal/field_notes/roper1fn.pdf) >> {mark exch /eurl cvx ] cvx def} forall %%%%%%%%%%%%%% % title page %%%%%%%%%%%%% /tabs [1.5 3.2] store 50 50 10 setgrid false {40 160 showgrid} if setpagefonts { 12.5 21.7 0.2 add 11 17 0.5 2.3 (STILL |kFLOWING |kBAJADA |kCANALS) %|/surl |6Artesiaa|/artesiaa1fn %|/surl |6Artesiab|/artesiab1fn (|/surl |6Artesia#1 |/surl |6Artesia#2 |/surl |6Deadman|/deadman1fn |/surl |6Goat|/goat1fn |/surl |6Ledford|/ledford1fn |/surl |6Marijilda|/marijilda1fn |/surl |6Roper Lake|/roper1fn ) notebox } pop % hold for future use beige % really a colorizer green? 20 48.3 0.7 add 0.5 add % 1 sub (|/to |0Some |jHenry's |jCanal)cc 20 46.3 0.7 add 0.5 add % 1 sub (|/to |0Preliminary |jField |jNotes) cc black font1 textleft 44.3 0.5 add (|/to |6Don Lancaster|/tx |1and |/to |6James A. Neely|1|/tx Synergetics, Box 809, Thatcher, AZ 85552 copyright c2018 rev 1/18 All rights reserved |/surl |6http://www.tinaja.com|/tinaja |/surl don@tinaja.com|1|/maildon and |6|/surl neelyja@utexas.edu|1|/mailneely |/to (928) 428-4073|/tx |1and |/to (575) 686-0098 |/to |0O|/tx nly a six kilometer fraction of Henry's |/surl |6prehistoric Canal|/tinsamp1 |1is presently verified, ranging from a wash crossing or takein at |/to 32.71810 -109.76715|/tx to a well defined end use field area and possible ponding channel found at |/to 32.74558 -109.72845|/tx . |h The canal is characterized by being of "flatland" architecture without any major hanging portions. At a meter width, it is wider and shallower than is typical. The elevations of this portion range from 3340 to 3220 feet with a typical slope in the two percent range. Much of this canal portion is readily traced on |/surl |6Acme Mapper|/acme |1. |h The water source remains unknown, but it is likely a branch of the |/surl |6Marijilda Canal|/marijildafn1 |1 at |/to 32.71810 -109.76715 |/tx or a natural stream channel near |/to 32.71244 -109.76455|/tx . A full combined length in the ten kilometer range might be anticipated. |h Here is a map of the known portion of Henry's Canal\274 ) cl /imageurlx (http://mapper.acme.com/?ll=32.74108,-109.73509&z=16&t=H&marker0=32.71810%2C-109.76715%2C3.2%20mi%20WxSW%20of%20Swift%20Trail%20Junction%20AZ&marker1=32.71542%2C-109.76326%2C3.1%20mi%20WxSW%20of%20Swift%20Trail%20Junction%20AZ&marker2=32.73802%2C-109.73988%2C1.6%20mi%20WxNW%20of%20Swift%20Trail%20Junction%20AZ&marker3=32.74073%2C-109.73433%2C1.4%20mi%20WxNW%20of%20Swift%20Trail%20Junction%20AZ&marker4=32.74237%2C-109.73116%2C1.4%20mi%20NW%20of%20Swift%20Trail%20Junction%20AZ&marker5=32.73589%2C-109.74455%2C1.9%20mi%20WxNW%20of%20Swift%20Trail%20Junction%20AZ&marker6=32.74558%2C-109.72845%2C1.2%20mi%20SW%20of%20Cactus%20Flat%20AZ&marker7=32.73936%2C-109.73666%2C1.5%20mi%20WxNW%20of%20Swift%20Trail%20Junction%20AZ&marker8=32.74459%2C-109.72796%2C1.2%20mi%20SW%20of%20Cactus%20Flat%20AZ&marker9=32.73701%2C-109.74344%2C1.8%20mi%20WxNW%20of%20Swift%20Trail%20Junction%20AZ&marker10=32.73711%2C-109.74237%2C1.8%20mi%20WxNW%20of%20Swift%20Trail%20Junction%20AZ&marker11=32.74317%2C-109.72835%2C1.3%20mi%20NW%20of%20Swift%20Trail%20Junction%20AZ) store % goto remote image /imagelocalsource imagelocaldirectory (henry_map1.jpg) mergestr store % comes from local file gsave 6.5 -0.9 % page translate ( data for jpegimageprocwithlink ) 931 758 % hpixels and vpixels 0.1 0.30 mul % photoscale imagelocalsource % local jpg source imageurlx % image url on clickthru jpegimageprocwithlink addpagenav clickforkml startnewpage { /imageurlx (http://mapper.acme.com/?ll=32.75049,-109.78961&z=14&t=H&marker0=32.73837%2C-109.81178%2C4.3%20mi%20NE%20of%20Mount%20Graham%20AZ&marker1=32.74287%2C-109.80896%2C4.6%20mi%20NE%20of%20Mount%20Graham%20AZ&marker2=32.74448%2C-109.80736%2C4.7%20mi%20NE%20of%20Mount%20Graham%20AZ&marker3=32.74496%2C-109.80659%2C4.8%20mi%20NE%20of%20Mount%20Graham%20AZ&marker4=32.74639%2C-109.80380%2C5.0%20mi%20NE%20of%20Mount%20Graham%20AZ&marker5=32.75042%2C-109.79597%2C4.7%20mi%20W%20of%20Cactus%20Flat%20AZ&marker6=32.75315%2C-109.79037%2C4.4%20mi%20W%20of%20Cactus%20Flat%20AZ&marker7=32.75856%2C-109.78350%2C4.0%20mi%20W%20of%20Cactus%20Flat%20AZ&marker8=32.76075%2C-109.78135%2C3.9%20mi%20W%20of%20Cactus%20Flat%20AZ&marker9=32.76475%2C-109.76831%2C3.1%20mi%20W%20of%20Cactus%20Flat%20AZ&marker10=32.76752%2C-109.76370%2C2.9%20mi%20WxNW%20of%20Cactus%20Flat%20AZ&marker11=32.76280%2C-109.77511%2C3.5%20mi%20W%20of%20Cactus%20Flat%20AZ) store % goto remote image /imagelocalsource imagelocaldirectory (deadman_map1.jpg) mergestr store % comes from local file gsave 6.5 23.3 % page translate ( data for jpegimageprocwithlink ) 843 624 % hpixels and vpixels 0.1 0.32 mul % photoscale imagelocalsource % local jpg source imageurlx % image url on clickthru jpegimageprocwithlink grestore } pop 3 51.5 (|1 Although the canal was ultimately obviously sourced from Marijilda Creek, just how the water got to |/to 32.73711 -109.74237|/tx from |/to 32.70633 -109.77709|/tx is not yet at all clear. Possible would be a branching of the |/surl |6Marijilda Canal|/marijildafn1 |1, perhaps around |/to 32.71810 -109.76715|/tx . Braided natural channels of Marijilda Creek might also have delivered water further downstream during wetter times. |h Limited field and satellite checking has revealed nothing obvious. There are some smaller and isolated canal branches in the |/to 32.73701 -109.74344|/tx area, but these presently seem to be unreleated shorter delivery channels and appear to be rather small. Terms like "primitive" or "awkward" come to mind. |h The Henry Canal seems to split into two parallel channels, with its western or main one continuing northward in its usual deep vee construct. The second channel is much more shallow and seems to be acting as a ponding channel for selective delivery to a fairly major destination area to the east. A wide variety of rock alignments are found in this area. A similar ponding area can be found where the TB East and TB West canals merge into a single destination. |h Thunderbird Canal is nearby canal to the north, otherwise known as CC:5:51. Associated with it is a historic concrete headgate whose water source seems enigmatic and possibly Henry Canal derived. |h Another mystery is that |/to Henry's Canal would seem to duplicate the routing of |/to the high Lebanon Canal|/tx , placing a wide, flat, and easily engineered canal largely "in parallel" with a difficult to design and construct lower flow hanging one. There appears to be no obvious historic reuse of the Henry's route, while a "bypassed for storage" high Lebanon route remains in use today as the |/surl |6Roper Canal|/roperfn1 |1. |h But there is fairly strong evidence that the Roper Canal is late modern without prehistoric precedence. First, because it orthogonally crosses the route of Henry's Canal. Second, because Roper Lake did not exist untill the 1960's. Third, because orientations are largely cardinal. Fourth because the concrete aggregrate appears modern. And, finally, because portions seem too steep for a mud original. |h |/surl |6Ownership|/ownership |1of the Henry Canal appears to be predominately |/surl |6Arizona State lands|/azstateland |1. |h This prehistoric |/surl |6bajada canal|/bajada |1is located in Arizona's |/surl |6Safford Basin|/safford |1in the |/surl |6Upper|/gilariver |/surl Gila Valley|/gilariver |1and is believed to date through the 1350's. Access involves mostly reasonable hiking, either from the Lower Marijilda and Lower Lebanon Road junction or via rough 4WD tracks from the Thunderbird Estates area. ) cl addpagenav clickforkml startnewpage /tabs [2 13.5] store 3 52.5 (|1 Here are some noteworthy |/surl |6Henry's Canal|/henry1fn |1 features and locations\274 |h |t |/to 32.70629 -109.77724|/tx |tUsual perennial limit of Marijilda Creek. |h |t |/to 32.71542 -109.76326|/tx |tPossible braided channel of Marijilda Creek. |h |t |/to 32.73589 -109.74455|/tx |tHints of an unexplored possible canal route. |h |t |/to 32.73684 -109.74340|/tx |tSecondary and largely unexplored smaller canal. |h |t |/to 32.73711 -109.74233|/tx |tLimit and possible takein of Henry's study area. |h |t |/to 32.73802 -109.73988|/tx |tCanal route well defined on |/surl |6Acme Mapper|/acme |1. |h |t |/to 32.73911 -109.73896|/tx |tChannel wider and shallower than others. |h |t |/to 32.73911 -109.73896|/tx |tPower line crossing. |h |t |/to 32.74317 -109.72835|/tx |tHenry's Canal swings northerly. |h |t |/to 32.74319 -109.72832|/tx |tPonding channel and destination fields. |h |t |/to 32.74515 -109.72854|/tx |tPossible destination field underlying modern tank. |h |t |/to 32.74629 -109.72837|/tx |tOrthogonal crossing of modern |/surl |6Roper Canal|/roperfn1 |1. ) cl addpagenav clickforkml startnewpage 3 50 ( |1Further Henry's Canal work might include\274 |t|/to 1 \320|/tx Determine the water source. |h |t|/to 2 \320|/tx Resolve "missing" four kilometer segment near |/to 32.72507 -109.75218|/tx . |h |t|/to 3 \320|/tx Seek proof of |/surl |6Marijilda Canal|/marijilda1fn |1 involvement. |h |t|/to 4 \320|/tx Determine why dual parallel high hanging and low flat routings. |h |t|/to 5 \320|/tx Map short southerly canal hints near |/to 32.73705 -109.74356|/tx . |h |t|/to 6 \320|/tx Find more destination fields and/or |/surl |6Roper Canal|/roperfn1 |1 involvement. |h |t|/to 7 \320|/tx Significantly improve photography and annotation of canal complex. |h |t|/to 8 \320|/tx Do fly over drone and videotape survey. |h |t|/to 9 \320|/tx Carefully map main destination area. |h |t|/to 10 \320|/tx Seek relation with Thunderbird Canal and its historic reuse. |h |t|/to 11 \320|/tx Resolve use of ponding channel. |h |t|/to 12 \320|/tx Mentor students and create field camps. Many thanks to Henry Schneiker for his field work assistance. ) cl % |k|k|k|/to |6More Hanging Canal Resources: |/surl |6http://www.tinaja.com/tinsamp1.shtml % |k|k|k|/to |6New Hanging Canal Discoveries: |/surl |6http://www.tinaja.com/whtnu17.shtml , |/tx |1|ketc\274 addpagenav clickforkml startnewpage %%%%%%%%%%%%%%% HENRY1 HENRY9 Photos%%%%%%%%%%% % top image /imageurl1 imageremotedirectory (henry1.jpg) mergestr store % goto remote image /imagelocalsource1 imagelocaldirectory (henry1.jpg) mergestr store % comes from local file 5.0 28(|/to |9HENRY1 -|/tx |1Henry's canal is atypically wider, flatter, and shallower than most and has no yet known hanging portions. Half of the canal remains unexplored, but is believed to source from the historically adapted and still flowing |/surl |6Marijilda Canal|/marijilda1fn |1. The view is to the east at |/to 32.73889 -109.73768|/tx .) cl 8 30.2 % page translate ( data for jpegimageprocwithlink ) 1000 800 % hpixels and vpixels 0.1 0.27 mul % photoscale imagelocalsource1 % local jpg source imageurl1 % image url on clickthru jpegimageprocwithlink % bot image /imageurl9 imageremotedirectory (henry9.jpg) mergestr store % mag image /imagelocalsource9 imagelocaldirectory (henry9.jpg) mergestr store % comes from local file 5.0 3(|/to |9HENRY9 -|/tx |1Portions of the canal routing are quite apparent from |/surl |6Acme Mapper|/acme |1. Curiously, there seem to be a pair of "high hanging" and "low flat" canals largely along the same parallel route. View is to the southeast at |/to 32.73711 -109.74237|/tx .) cl 8 5 % page translate ( data for jpegimageprocwithlink ) 1072 717 % hpixels and vpixels 0.1 0.25 mul % photoscale imagelocalsource9 % local jpg source imageurl9 % image url on clickthru jpegimageprocwithlink addpagenav clickforkml startnewpage %%%%%%%%%%%%%%% HENRY34 HENRY35 Photos%%%%%%%%%%% % top image /imageurl3 imageremotedirectory (henry34.jpg) mergestr store % goto remote image /imagelocalsource3 imagelocaldirectory (henry34.jpg) mergestr store % comes from local file 5.0 29 (|/to |9HENRY34 -|/tx |1A parallel channel may serve as a ponding area for destination fields along the canal route. This seems similar to one that combines the TB East and TB West Canals. View is to the south at |/to 32.74297 -109.72824|/tx .) cl 11 31.2 % page translate ( data for jpegimageprocwithlink ) 1000 1026 % hpixels and vpixels 0.1 0.21 mul % photoscale imagelocalsource3 % local jpg source imageurl3 % image url on clickthru jpegimageprocwithlink % bot image /imageurl4 imageremotedirectory (henry35.jpg) mergestr store % mag image /imagelocalsource4 imagelocaldirectory (henry35.jpg) mergestr store % comes from local file 5.0 0.5 (|/to |9HENRY35 -|/tx |1Even while adjacent to its ponding channel, the main Henry Canal retains its usual deep vee shape. View is southwest at |/to 32.74305 -109.72847|/tx .) cl 11 2.5 % page translate ( data for jpegimageprocwithlink ) 1000 1123 % hpixels and vpixels 0.1 0.21 mul % photoscale imagelocalsource4 % local jpg source imageurl4 % image url on clickthru jpegimageprocwithlink addpagenav clickforkml startnewpage %%%%%%%%%%%%%%% HENRY30 HENRY33 Photos%%%%%%%%%%% % top image /imageurl5 imageremotedirectory (henry30.jpg) mergestr store % goto remote image /imagelocalsource5 imagelocaldirectory (henry30.jpg) mergestr store % comes from local file 5.0 30.3 (|/to |9HENRY30 -|/tx |1A wide variety of options can be seen in the fields area. Long linear alignments are shown here. View is southeast at t|/to 32.737109 -109.7423708|/tx .) cl 8 33 % page translate ( data for jpegimageprocwithlink ) 999 674 % hpixels and vpixels 0.1 0.28 mul % photoscale imagelocalsource5 % local jpg source imageurl5 % image url on clickthru jpegimageprocwithlink % bot image /imageurl6 imageremotedirectory (henry33.jpg) mergestr store % mag image /imagelocalsource6 imagelocaldirectory (henry33.jpg) mergestr store % comes from local file 5.0 1 (|/to |9HENRY33 -|/tx |1The end use area appears to be a hybrid of dry farmed grids and irrigated distribution channels. View is southeast at |/to 32.73711 -109.74237|/tx .) cl 8 2.5 % page translate ( data for jpegimageprocwithlink ) 1000 903 % hpixels and vpixels 0.1 0.28 mul % photoscale imagelocalsource6 % local jpg source imageurl6 % image url on clickthru jpegimageprocwithlink addpagenav clickforkml startnewpage %%%%%%%%%%%%%%% HENRY10 HENRY11 Photos%%%%%%%%%%% % top image /imageurl7 imageremotedirectory (henry10.jpg) mergestr store % goto remote image /imagelocalsource7 imagelocaldirectory (henry10.jpg) mergestr store % comes from local file 5.0 29.5 (|/to |9HENRY10 -|/tx |1The Henry Canal appears to continue northward well beyond its serviced fields and ponding area, possibly terminating in a modern tank. View here is to the north at |/to 32.74406 -109.72830|/tx .) cl 8 31.4 % page translate ( data for jpegimageprocwithlink ) 1000 788 % hpixels and vpixels 0.1 0.26 mul % photoscale imagelocalsource7 % local jpg source imageurl7 % image url on clickthru jpegimageprocwithlink % bot image 5.0 2 (|/to |9HENRY11 -|/tx |1Looking towards the fields and ponding area from a kilometer or so west of US 191. View is to the South near |/to 32.74406 -109.72830|/tx .) cl /imageurl8 imageremotedirectory (henry11.jpg) mergestr store % mag image /imagelocalsource8 imagelocaldirectory (henry11.jpg) mergestr store % comes from local file 8 3.8 % page translate ( data for jpegimageprocwithlink ) 1000 851 % hpixels and vpixels 0.1 0.26 mul % photoscale imagelocalsource8 % local jpg source imageurl8 % image url on clickthru jpegimageprocwithlink addpagenav clickforkml startnewpage 3 51 (And here is a topographic map of the partial Henry's Canal... ) cl /imagelocalsource imagelocaldirectory (henry_topo1.jpg) mergestr store % comes from local file /imageurly (http://mapper.acme.com/?ll=32.74108,-109.73509&z=15&t=T&marker0=32.71542%2C-109.76326%2C3.1%20mi%20WxSW%20of%20Swift%20Trail%20Junction%20AZ&marker1=32.74073%2C-109.73433%2C1.4%20mi%20WxNW%20of%20Swift%20Trail%20Junction%20AZ&marker2=32.73589%2C-109.74455%2C1.9%20mi%20WxNW%20of%20Swift%20Trail%20Junction%20AZ&marker3=32.73936%2C-109.73666%2C1.5%20mi%20WxNW%20of%20Swift%20Trail%20Junction%20AZ&marker4=32.73701%2C-109.74344%2C1.8%20mi%20WxNW%20of%20Swift%20Trail%20Junction%20AZ&marker5=32.74317%2C-109.72835%2C1.3%20mi%20NW%20of%20Swift%20Trail%20Junction%20AZ&marker6=32.73802%2C-109.73988%2C1.6%20mi%20WxNW%20of%20Swift%20Trail%20Junction%20AZ&marker7=32.74558%2C-109.72845%2C1.2%20mi%20SW%20of%20Cactus%20Flat%20AZ&marker8=32.73711%2C-109.74237%2C1.8%20mi%20WxNW%20of%20Swift%20Trail%20Junction%20AZ&marker9=32.74237%2C-109.73116%2C1.4%20mi%20NW%20of%20Swift%20Trail%20Junction%20AZ&marker10=32.71810%2C-109.76715%2C3.2%20mi%20WxSW%20of%20Swift%20Trail%20Junction%20AZ&marker11=32.74459%2C-109.72796%2C1.2%20mi%20SW%20of%20Cactus%20Flat%20AZ2) store % go to remote image. gsave 7 31.4 % page translate ( data for jpegimageprocwithlink ) 600 422 % hpixels and vpixels 0.1 0.44 mul % photoscale imagelocalsource % local jpg source imageurly % image url on clickthru jpegimageprocwithlink 3 31 ( You can click through on the above images to directly reach |/surl |6Acme Mapper|/acme |1at a higher resolution. |h A hanging canal directory can be found|/surl |6 here|/canallist |1and its sourcecode |/surl |6here|/canallistps |1. |h This field note is associated with directory |/to 11. HNC1 |k-|k Henry’ Canal|/to and |/to 84. HFD1 |k- |/to Henry Fields|/tx and |/to 8. MAQ1 - Marijilda Aqueduct|/tx and |/to 6. MAR1 - Main Marijilda |/to Canal|/tx and |/to 81. TBD1 - Thunderbird Canal|/tx . |h This document can be found |/surl |6here|/henry1fn |1 and its sourcecode |/surl |6here|/henry1fnps |1. ) cl 4.5 15 (|/to More Hanging Canal Resources: |/surl |6http://www.tinaja.com/tinsamp1.shtml|1|/tinsamp1 ) cl 4 13.5 (|/to New Hanging Canal Developments: |/surl |6http://www.tinaja.com/whtnu17.shtml|1|/whtnu17 ) cl addpagenav clickforkml startnewpage %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% /lastpage true store % do not omit! addpagenav clickforkml startnewpage % EOF