%! % Frye Mesa Complex with topo % ============================================================== % Copyright c 2017 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 a shortened demo of http://www.tinaja.com/canal/newhang3.pdf and % http://www.tinaja.com/canal/newhang3.psl rewritten from the ground up with % better documentation. By using a /F trailer on Acrobat XI Distiller as % noted below, reads and writes can be restored. This allows expanded click-thru % images to be auto executed from within a .psl file internal to Distiller. % Other benefits include auto positioning and tracking of the and slightly % improved image resolution % Be sure embedded fonts are properly set! You will also need an image copy of % http://www.tinaja.com/canal/images/robinson_map1.jpg moved to an % appropriate directory on your pc as noted below. % This pre Distills both automatic urls AND jpeg image clickthru conversion! % 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/Dist-FR/gonzo.ps % Preplace gonzo.ps from http://www.tinaja.com/post01.shtml#gonzo to above directory % Make sure there are no previously active instances of distiller. % Then run distiller ONLY from % //acrodist.exe /F run % 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/golfcoursefn1.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 (Frye Mesa Complexl Log) 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/golfcourse1fn.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) /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) /arta1fn (https://www.tinaja.com/canal/field_notes/artesia1fn.pdf) /artb1fn (https://www.tinaja.com/canal/field_notes/artesib1fn.pdf) /glotz (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 |0Frye |jComplex |jBajada |jHanging)cc 20 46.3 0.7 add 0.5 add % 1 sub (|/to |0Canal |jPreliminary |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 c2017 rev 12/17 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 |0E|/tx vidence is accumulating (|jbut by no means yet proven|j) that an incredibly sophisticated prehistoric canal water |/to pre-distribution system|/tx existed in the lower Frye Mesa area of Frye Creek. At present, water is thought to be diverted from Frye Creek above the falls near |/to N 32.74352 W 109.83988|/tx and then be |/to watershed |/to crossed|/tx to merge with a then presumably large spring in Spring Canyon that is near |/to N 32.74565 W 109.84043|/tx \274 ) cl /imageurl % special image clicks thru to Acme Mapper (http://mapper.acme.com/?ll=32.75515,-109.82602&z=15&t=H&marker0=32.75776%2C-109.82855%2C7.4%20km%20NxNE%20of%20Mount%20Graham%20AZ&marker1=32.76165%2C-109.80173%2C8.1%20km%20W%20of%20Cactus%20Flat%20AZ&marker2=32.75837%2C-109.82054%2C7.9%20km%20NE%20of%20Mount%20Graham%20AZ&marker3=32.75927%2C-109.81309%2C8.4%20km%20NE%20of%20Mount%20Graham%20AZ&marker4=32.75985%2C-109.80973%2C8.6%20km%20NE%20of%20Mount%20Graham%20AZ&marker5=32.74541%2C-109.83946%2C5.7%20km%20NxNE%20of%20Mount%20Graham%20AZ&marker6=32.74359%2C-109.83987%2C5.5%20km%20NxNE%20of%20Mount%20Graham%20AZ&marker7=32.75034%2C-109.83899%2C6.2%20km%20NxNE%20of%20Mount%20Graham%20AZ&marker8=32.75954%2C-109.81626%2C8.2%20km%20NE%20of%20Mount%20Graham%20AZ&marker9=32.75355%2C-109.83709%2C6.6%20km%20NxNE%20of%20Mount%20Graham%20AZ&marker10=32.74563%2C-109.84045%2C5.7%20km%20NxNE%20of%20Mount%20Graham%20AZ&marker11=32.75998%2C-109.81156%2C8.5%20km%20NE%20of%20Mount%20Graham%20AZ&marker12=32.75694%2C-109.83482%2C7.0%20km%20NxNE%20of%20Mount%20Graham%20AZ&marker13=32.75783%2C-109.81510%2C8.1%20km%20NE%20of%20Mount%20Graham%20AZ) store % goto remote image /imagelocalsource imagelocaldirectory (fryemesa_map.jpg) mergestr store % comes from local file gsave 7 11.6 % page translate ( data for jpegimageprocwithlink ) 868 545 % hpixels and vpixels 0.1 0.31 mul % photoscale imagelocalsource % local jpg source imageurl % image url on clickthru jpegimageprocwithlink grestore 3 9.7 (|y The Frye Complex portion of the canal delivery system is approximately 3 miles or 5 kilometers long with elevations ranging from 5800 down to 4200 feet, but not counting the selectable routing continuances of the |/su |6Robinson Canal|1|/robinson1fn , or of the |/surl |6Allen Canal|1|/allenfn , and the |/su |6HS Canal|1|/hsfn . These required slopes are far in excess of typical individual single canals lower in the hanging |/su |6bajada|1|/bajada canals system. |h We note in passing that one spectacular and highly sophisticated watershed crossing elsewhere in the |/su |6hanging canal|1|/tinsamp1 system is credibly proven on the |/su |6Mud|/mudspringsfn |/su Springs Canal|1|/mudspringsfn at |/to N 32.79167 W 109.85378|/tx , and another yet unproven one might exist at |/to N 32.77770 W 109.95548|/tx . |h ) cl { % this was the original acme sourced click through /imageurl (http://mapper.acme.com/?ll=32.85902,-109.95959&z=18&t=H&marker0=32.85990%2C-109.95842%2C7.4%20km%20SxSW%20of%20Graham%20County%20AZ&marker1=32.85791%2C-109.96117%2C7.8%20km%20SxSW%20of%20Graham%20County%20AZ&marker2=32.85889%2C-109.96016%2C7.6%20km%20SxSW%20of%20Graham%20County%20AZ) store % goto remote image /imagelocalsource imagelocaldirectory (bearflat_map.jpg) mergestr store % comes from local file gsave 10 6.7 % page translate ( data for jpegimageprocwithlink ) 662 666 % hpixels and vpixels 0.1 0.31 mul % photoscale imagelocalsource % local jpg source imageurl % image url on clickthru jpegimageprocwithlink grestore } pop addpagenav clickforkml startnewpage /tabs [2 14.5 9.5] store 3 51.8 ( Combining water with the spring in Spring Canyon could possibly have been intentionally diverted down the unimproved Spring Canyon channel to the |/su |6Allen|/allenfn |/su Canal|1|/allenfn tekein at |/to N 32.78239 W 109.83549|/tx . No other reasonable Allen Canal potential reliable perennial water resource is presently known. |h Alternately, the water could be selectively routed along upper Frye Mesa mostly east of the Frye Falls Road at |/to N 32.74653 W 109.83909|/tx to just south of the Frye Reservoir turnoff at |/to N 32.75529 W 109.83532|/tx . At present, there is an active CNF |/su |6Coronodo National|/cnf |/su |6Forest|1|/cnf pipeline following this route and delivering to a tank found at |/to N 32.75694 W 109.83482|/tx . This pipeline is felt to be one of many historic |/to "steal the plans"|/tx or |/to "borrow the blueprints"|/tx adaptions of prehistoric canal routes in the area. |h The prehistoric Frey Mesa canal route is then believed to make an easterly turn, following a route along the extreme edge of the mesa to a pond or ponding area believed to be at |/to N 32.75998 W 109.81156|/tx . There typically are numerous braided channels, such as at |/to N 32.75954 W 109.81626|/tx . |h Also typically, there appears to be significant |/su |6CCC rework|1|/ccc in the area. An example is found at |/to N 32.75855 W 109.81970|/tx . Often, the prehistoric portions are believed to be |/to along channel|/tx , while the CCC projects are short |/to cross channel|/tx barriers. There are also apparently unrelated CCC water spreader projects in the area. |h Another characteristic of this routing might be called |/to knife edging|/tx . Where the canal is placed as near to the edge of a sloping mesa as possible in an attempt to preserve the absolutely required |/to unvaringly constant slope|/tx . Other examples of knife edging appear on the |/su |6Deadman|1|/dead1fn and |/su |6Deadman East|1|/dead1fn canals. |h Water from the ponding or diversion area can be routed east to the |/su |6Robinson|/robinson1fn |/su Canal|1|/robinson1fn or south to the spectacular |/to HS Canal|/tx . While this beginning portion of the Robinson Canal has not yet been verified, it is rather clear on |/su |6Acme Mapper|1|/robtext , complete with |/surl |6text callouts|/robtext |1. |h The |/to HS Canal|/tx is perhaps the most impressive in the system and quite possibly involves the most construction energy and the most rock rearrangement. Its significance is considered a "lifetime find" by one of the researchers. The HS Canal along with its companion |/su |6Aquaduct|1|/aquaduct1fn and the |/surl |6Culebra Cut|/culebra1 |1 on the |/su |6Allen Canal|1|/allenfn , represent by far the three most energy- and time-intense portions of the known canal system. |h The HS Canal begins at |/to N 32.75998 W 109.81156|/tx and ends around |/to N 32.75783 |/to W 109.81510W|/tx , with 130 feet of steeply dropping elevations from 4304 feet to 4174 feet. It is quite large, being two meters wide and two meters deep. It is also exceptionally steep. |/to Its obvious purpose seems to be to very carefully and very |/to precisely return any remaining water unused by the |/su |6Allen Canal|1|/allenfn |/to and by the |/su |6Robinson Canal|1|/robinson1fn |/to to the Frye Creek drainage|/tx . There is no reasonable doubt that an exceptional amount time and energy has gone into this superb construct. |h ) cl addpagenav clickforkml startnewpage 3 52.5 ( While the ultimate destinations for the HS canal remain unproven, candidates include local fields, the |/su |6Golf Course Canal|1|/golfcourse1fn , the |/su |6Riggs Mesa|1|/riggs1fn braids, the |/su |6Freeman|/freeman1fn |/su |6Canal|1|/freeman1fn , the |/surl |6Lower Frye Construct|/lowerfryeconstructfn1 |1and some |/su |6Blue Pond|1|/blueponds1fn routings still under study. |h The HS Canal is the strongest known example of |/to counterflowing|/tx . In which the downslope aspect of the canal is intentionally routed |/to into|/tx rising topography. On other canals in the system, minor counterflowing is occasionally used to ease the crossing of a wash. The intent and purpose here still remains unproven. Although counterflowing might ease the required slope or make additional bottomland fields available. |h The Frye Mesa complex is located on |/su |6Coronado National Forest|1|/cnf and on |/su |6Arizona|/azland |/su |6State Lands|1|/azland . |h |/to One credible reason for returning the Frye Creek water might be that this |/to Frye Mesa Complex seems to have diverted Frye Creek water|/tx from |/to N 32.74359 |/to W 109.83987|/tx as previously noted. The Frye Creek bottom lands seem very much topographically unfavorable for other routings between |/to N 32.74359 W 109.83987|/tx and |/to N 32.75724 W 109.81521|/tx . Also, should the spring in Spring Canyon be the only Frye Complex perennial source, it would appear to require an exceptional amount of reliable water flow. |h At of this writing, the watershed crossing and Spring Canyon diversion still remain unproven, as does the precise routing near the Frye Falls Road. Owing primarily to difficult access and time spent on other system priorities. But |/to the compelling |/to and undeniable presence of the HS Canal seems to demand an identical or |/to else an unresolved and comparably sophisticated initial water source|/tx . |h The apparent complexity of the Lower Frye Mesa construcs strongly suggest a management scheduling infrastructure orders of magnitude beyond the simple building and use of independent highly engineered bajada hanging canals. And thus appears to at least one the researchers to be truly unique and world class. |h Some observed features of the Frye Mesa Complex include\274 |h |t |/to N 32.74359 W 109.83987|/tx |tPossible Frye Creek diversion. |h |t |/to N 32.74541 W 109.83946|/tx |tMid route on possible watershed crossing. |h |t |/to N 32.74563 W 109.84045|/tx |tSpring in Spring Canyon. |h |t |/to N 32.74563 W 109.84045|/tx |tStart of raw diversion for |/su |6Allen Canal|1|/allenfn water. |h |t |/to N 32.75034 W 109.83899|/tx |tPossible route down Frye Falls Road. |h |t |/to N 32.75355 W 109.83709|/tx |tUnchecked possible canal route. |h |t |/to N 32.75694 W 109.83482|/tx |tForest service tank believed historic adaption. ) cl startnewpage 3 50.5 ( Continuing observed Frye Mesa Complex features\274 |h |t |/to N 32.75954 W 109.81626|/tx |tTypical braided channels. |h |t |/to N 32.75776 W 109.82855|/tx |tExamples of apparent |/su |6CCC|1|/ccc rework. |h |t |/to N 32.75793 W 109.82246|/tx |tA possible "knife edging" example. |h |t |/to N 32.75998 W 109.81156|/tx |tPond or ponding area for diversion. |h |t |/to N 32.75985 W 109.80973|/tx |tStart of |/su |6Robinson Canal|1|/robinson1fn . |h |t |/to N 32.76165 W 109.80173|/tx |tWell marked Robinson Canal continuance. |h |t |/to N 32.75998 W 109.81156|/tx |tStart of HS Canal. |h |t |/to N 32.75927 W 109.81309|/tx |tMid reach of HS Canal. |h |t |/to N 32.75783 W 109.81510|/tx |tDelivery end of HS Canal. Further Frye Mesa Complex work might include\274 |t|/to 1 \320|/tx Verify possibility and actuality of above falls watershed diversion. |h |t|/to 2 \320|/tx Droning, videotaping, and more photos of the known portions. |h |t|/to 3 \320|/tx Secure additional evidence of sub Frye Mesa Falls road routing. |h |t|/to 4 \320|/tx Tie in with CNF historians over pipeline route and history. |h |t|/to 5 \320|/tx Seek out distribution of potsherds and other cultural evidence. |h |t|/to 6 \320|/tx Evaluate prehistoric water flow rate issues. |h |t|/to 7 \320|/tx Determine HS Canal destinations, especially the |/su |6Golf Course|1|/golfcourse1fn . |h |t|/to 8 \320|/tx Seek stronger proof of HS Canal water source. |h |t|/to 9 \320|/tx Find additional evidence for more speculative observations. ) cl addpagenav clickforkml startnewpage %%%%%%%%%%%%%%% FRYW1 Photos %%%%%%%%%%% /imageurl % special image clicks thru to Acme Mapper (http://mapper.acme.com/?ll=32.75926,-109.81307&z=18&t=H&marker0=32.75927%2C-109.81309%2C8.4%20km%20NE%20of%20Mount%20Graham%20AZ&marker1=32.75998%2C-109.81156%2C8.5%20km%20NE%20of%20Mount%20Graham%20AZ&marker2=32.75783%2C-109.81510%2Cunnamed) store % goto remote image /imagelocalsource imagelocaldirectory (hscan1_map.jpg) mergestr store % comes from local file gsave 10.5 31.6 % page translate ( data for jpegimageprocwithlink ) 772 632 % hpixels and vpixels 0.1 0.31 mul % photoscale imagelocalsource % local jpg source imageurl % image url on clickthru jpegimageprocwithlink grestore 5.0 29.1(|/to |9HSCAN1_MAP \261|1|/tx This close up image of the HS Canal reveals its extreme construction effort and exceptionally superb engineering. Apparently every effort was made to return unused water to the original Frye Creek channel to service several additional canals downstream. Centered on |/to N 32.75927 W 109.81309|/tx .) cl ( % top and bot image not yet used % top image /imageurl imageremotedirectory (/cluffnw1.jpg) mergestr store % goto remote image /imagelocalsource imagelocaldirectory (cluffnw1.jpg) mergestr store % comes from local file 5.0 39.5(|/to |9CLLUFFNW1 \261|1|/tx One of several |/su |6Y-Weir|1|/weir concrete structures from the second historical rebuild of the Cluff NW canals. This one was apparently part of a wash crossing inverted siphon. Viewed northwest from |/to N 32.82647 W 109.84590|/tx .) cl 13.3 40.7 % page translate ( data for jpegimageprocwithlink ) 1000 1084 % hpixels and vpixels 0.1 0.187 mul % photoscale imagelocalsource % local jpg source imageurl % image url on clickthru jpegimageprocwithlink % bot image /imageurl imageremotedirectory (/cluffnw2.jpg) mergestr store % goto remote image /imagelocalsource imagelocaldirectory (cluffnw2.jpg) mergestr store % comes from local file 5.0 2.4 (|/to |9CLUFFNW2 \261|1|/tx The second historic rebuild created a huge water channel whose size suggests |/su |6Gradall|1|/gradeall class machinery and high construction energy inefficiency. Portions are unusually single walled. View is south at |/to N 32.82625 W 109.84596|/tx .) cl 13.3 4.3 % page translate ( data for jpegimageprocwithlink ) 1000 1097 % hpixels and vpixels 0.1 0.19 mul % photoscale imagelocalsource % local jpg source imageurl % image url on clickthru jpegimageprocwithlink ) pop % bot image not used. 5 5 (|/to More Hanging Canal Resources: |/surl |6http://www.tinaja.com/tinsamp1.shtml|1|/tinsamp1 ) cl 4 3.7 (|/to New Hanging Canal Developments: |/surl |6http://www.tinaja.com/whtnu16.shtml|1|/whtnu16 ) cl addpagenav clickforkml startnewpage % topo -- /imageurly (http://mapper.acme.com/?ll=32.75302,-109.82546&z=15&t=T&marker0=32.76165%2C-109.80173%2C8.1%20km%20W%20of%20Cactus%20Flat%20AZ&marker1=32.75927%2C-109.81309%2C8.4%20km%20NE%20of%20Mount%20Graham%20AZ&marker2=32.74541%2C-109.83946%2C5.7%20km%20NxNE%20of%20Mount%20Graham%20AZ&marker3=32.75034%2C-109.83899%2C6.2%20km%20NxNE%20of%20Mount%20Graham%20AZ&marker4=32.75355%2C-109.83709%2C6.6%20km%20NxNE%20of%20Mount%20Graham%20AZ&marker5=32.75998%2C-109.81156%2C8.5%20km%20NE%20of%20Mount%20Graham%20AZ&marker6=32.75783%2C-109.81510%2Cunnamed&marker7=32.75837%2C-109.82054%2C7.9%20km%20NE%20of%20Mount%20Graham%20AZ&marker8=32.74359%2C-109.83987%2C5.5%20km%20NxNE%20of%20Mount%20Graham%20AZ&marker9=32.74563%2C-109.84045%2C5.7%20km%20NxNE%20of%20Mount%20Graham%20AZ&marker10=32.75776%2C-109.82855%2C7.4%20km%20NxNE%20of%20Mount%20Graham%20AZ&marker11=32.75954%2C-109.81626%2C8.2%20km%20NE%20of%20Mount%20Graham%20AZ&marker12=32.75985%2C-109.80973%2C8.6%20km%20NE%20of%20Mount%20Graham%20AZ&marker13=32.75694%2C-109.83482%2C7.0%20km%20NxNE%20of%20Mount%20Graham%20AZ) store % go to remote image. /imagelocalsource imagelocaldirectory (fryecomplex1_topo.jpg) mergestr store % comes from local file gsave 5.5 30.8 9 sub % page translate ( data for jpegimageprocwithlink ) 908 614 % hpixels and vpixels 0.1 0.30 mul % photoscale imagelocalsource % local jpg source imageurly % image url on clickthru jpegimageprocwithlink grestore { % second map not used in this file /imageurlz (http://mapper.acme.com/?ll=32.75323,-109.78233&z=15&t=T&marker0=32.75215%2C-109.79025%2Cunnamed&marker1=32.75291%2C-109.78613%2C4.2%20mi%20W%20of%20Cactus%20Flat%20AZ&marker2=32.75434%2C-109.78194%2C3.9%20mi%20W%20of%20Cactus%20Flat%20AZ&marker3=32.75657%2C-109.77679%2C3.6%20mi%20W%20of%20Cactus%20Flat%20AZ&marker4=32.75010%2C-109.79672%2C4.8%20mi%20W%20of%20Cactus%20Flat%20AZ&marker5=32.75283%2C-109.78848%2C4.3%20mi%20W%20of%20Cactus%20Flat%20AZ) store % go to remote image. /imagelocalsource imagelocaldirectory (deadman2_topo.jpg) mergestr store % comes from local file gsave 5.5 11.3 % page translate ( data for jpegimageprocwithlink ) 908 507 % hpixels and vpixels 0.1 0.322 mul % photoscale imagelocalsource % local jpg source imageurlz % image url on clickthru jpegimageprocwithlink grestore } pop 3 41.3 (Here is a topographic map of the Frye Complex Canals\274 ) cl % 3 28.8 (Here is a topographic map of the Deadman East Canal\274 ) cl 3 21 ( 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 #20 FMC1 Frye Mesa Complex|/tx |1. |h This document can be found |/surl |6here|/fryecomplex1fn |1 and its sourcecode |/surl |6here|/fryecomplex1fnps |1.. ) cl addpagenav clickforkml startnewpage addpagenav clickforkml startnewpage % EOF