%! % Lower Frye Construct Field Notes with topo lowerfryeconstruct1fn.psl % ============================================================== % 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) /allen1fn (http://www.tinaja.com/canal/field_notes/allen1fn.pdf) /allen1fnps (http://www.tinaja.com/canal/field_notes/allen1fn.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 (Lower Frye Construct 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.4 store /tabs [5.5] 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 4 vsize titsize sub 1.6 sub body cl 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) /octavestorm (https://en.wikipedia.org/wiki/Tropical_Storm_Octave_(1983)) /allencanal1fn (https://www.tinaja.com/canal/field_notes/allen1fn.pdf) /allencanal1fnps (https://www.tinaja.com/canal/field_notes/allen1fn.psl) /artesia1fn (https://www.tinaja.com/canal/field_notes/artesia1fn.pdf) /artesia1fnps (https://www.tinaja.com/canal/field_notes/artesia1fn.psl) /artesia2fn (https://www.tinaja.com/canal/field_notes/artesia1fn.pdf) /artesia2fnps (https://www.tinaja.com/canal/field_notes/artesia1fn.psl) /bearspcn1fn (https://www.tinaja.com/canal/field_notes/bearspcn1fn.pdf) /bearspcn1fnps (https://www.tinaja.com/canal/field_notes/bearspcn1fn.psl) /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) /goat1fnps (https://www.tinaja.com/canal/field_notes/goat1fn.psl) /jernigan1fn (https://www.tinaja.com/canal/field_notes/jernigan1fn.pdf) /jernigan1fnps (https://www.tinaja.com/canal/field_notes/jernigan1fn.psl) /lowerfryecon1fn (https://www.tinaja.com/canal/field_notes/lowerfryeconstruct1fn.pdf) /lowerfryecon1fnps (https://www.tinaja.com/canal/field_notes/lowerfryeconstruct1fn.psl) /marijilda1fn (https://www.tinaja.com/canal/field_notes/marijilda1fn.pdf) /marijilda1fnps (https://www.tinaja.com/canal/field_notes/marijilda1fn.psl) /mudsprings1fn (https://www.tinaja.com/canal/field_notes/mudsprings1fn.pdf) /mudsprings1fnps (https://www.tinaja.com/canal/field_notes/mudsprings1fn.psl) /sandcan1fn (https://www.tinaja.com/canal/field_notes/sandcan1fn.pdf) /sandcan1fnps (https://www.tinaja.com/canal/field_notes/sandcan1fn.psl) /tugood1fn (https://www.tinaja.com/canal/field_notes/tugood1fn.pdf) /tugood1fnps (https://www.tinaja.com/canal/field_notes/tugood1fn.psl) /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) % for debug /glotzb (https://www.tinaja.com/canal/field_notes/roper1fn.pdf) % for debug /artesian (https://en.wikipedia.org/wiki/Artesian) /oldmap (http://nationalmap.gov/historical/) /gradeall (http://www.gradall.com/) /mceniry (https://www.tinaja.com/glib/mtso.pdf) /scs (https://en.wikipedia.org/wiki/Natural_Resources_Conservation_Service) >> {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 |6Artesia#1|/artesia1fn |t|/surl |6Artesia#2|/artesia1fn |/surl |6Bear Flat?|/bearspcn1fn |t|/surl |6Bigler|/bearspcn1fn |/surl |6Deadman|/deadman1fn |t|/surl |6Goat|/goat1fn |/surl |6Ledford|/ledford1fn |t|/surl |6Marijilda|/marijilda1fn |/surl |6Roper Lake?|/roper1fn ) notebox } pop % hold for future use beige % really a colorizer green? 20 48.3 0.7 add % 1 sub (|/to |0Lower |jFrye |jConstruct)cc 20 46.3 0.7 add % 1 sub (|/to |0Preliminary |jField Notes) 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 |0S|/tx ome recent investigations have started to reveal a highly unusual rock walled and earthworks structural sequence of obvious significance. One that seems to have uniquely outstanding engineering combined with other unusual features. |h To date, the study clearly raises many more questions than it resolves. |h The present 0.5 km long |/to 32.76610 -109.79401|/tx to |/to 32.76836 -109.79172 |/tx study area at an average elevation of |/to 3714|/tx to |/to 3655|/tx feet can be reached via a difficult 4WD route to |/to 32.76869 -109.79471|/tx , followed by an even more difficult one mile class trackless hike over extremely brushy and gruesome conglomerate. |h Not surprisingly, this marginal |/surl |6AZ state rangeland|/azstateland |1area would appear to be seldom visited. |h The huge structure(s) presently seem to be prehistoric and appear to be |/surl |6hanging|/tinsamp1 |/surl |6canal|/tinsamp1 |1related. They are likely fourth or fifth in local rank of required construction energy. Perhaps just behind the |/surl |6HS Canal|/hsfn1 |1, the |/surl |6Marijilda Aqueduct|/marijildafn1 |1, and the huge |/surl |6Culebra Cut|/allenfn1 |1. And possibly energy needs comparable to the |/surl |6Lebanon High Canal|/marijildafn1 |1. |h Because of the Lower Frye Construct's elevation and location, it would appear to be tempting to call it a portion of a wildly unproven and 13 kilometer (!) long |/to supercanal|/tx . One that starts at a yet unproven Upper Frye diversion and Spring Canyon routed source at |/to 32.74400 -109.83943|/tx , down over the only partially verified upper Frye Mesa past |/to 32.75759 -109.82387|/tx , and down the HS Canal at |/to 32.75867 -109.81431|/tx to become a |/to Lower Frye Construct|/tx source. |h From there, delivered to a short historical (|jbut rather likely "steal the plans" prehistoric|j) |/to |/surl |6Blue Ponds Canal|/bluepondsfn1 |1 at |/to 32.78071 -109.77908|/tx . And in turn delivered to the well defined |/surl |6Freeman Canal|/freemanfn1 |1via |/to 32.79170 -109.76042|/tx to its end use field areas around |/to 32.80024 -109.74953|/tx . |h Sadly, only fifteen to twenty percent of this route has been clearly field verified, and the precept of this ending up the longest known |/surl |6bajada|/bajada |1 canal would still appear to be highly speculative. ) cl addpagenav clickforkml startnewpage /tabs [2 13.5] store /imageurlx (https://mapper.acme.com/?ll=32.76812,-109.79300&z=18&t=H&marker0=32.76681%2C-109.79347%2C4.6%20mi%20W%20of%20Cactus%20Flat%20AZ&marker1=32.76835%2C-109.79174%2C4.5%20mi%20W%20of%20Cactus%20Flat%20AZ&marker2=32.76905%2C-109.79454%2C4.7%20mi%20W%20of%20Cactus%20Flat%20AZ) store % goto remote image /imagelocalsource imagelocaldirectory (lowerfrye_map1.jpg) mergestr store % comes from local file gsave 6.0 27.3 % page translate ( data for jpegimageprocwithlink ) 923 740 % hpixels and vpixels 0.1 0.30 mul % photoscale imagelocalsource % local jpg source imageurlx % image url on clickthru jpegimageprocwithlink grestore gsave /imageurly (http://mapper.acme.com/?ll=32.77763,-109.79853&z=13&t=H&marker0=32.74358%2C-109.83963%2C3.4%20mi%20NxNE%20of%20Mount%20Graham%20AZ&marker1=32.75365%2C-109.83697%2C4.1%20mi%20NxNE%20of%20Mount%20Graham%20AZ&marker2=32.75534%2C-109.83459%2C4.3%20mi%20NxNE%20of%20Mount%20Graham%20AZ&marker3=32.75740%2C-109.83058%2Cunnamed&marker4=32.75761%2C-109.82432%2C4.7%20mi%20NE%20of%20Mount%20Graham%20AZ&marker5=32.75838%2C-109.81467%2Cunnamed&marker6=32.76475%2C-109.79452%2C4.6%20mi%20W%20of%20Cactus%20Flat%20AZ&marker7=32.76778%2C-109.79212%2C4.5%20mi%20W%20of%20Cactus%20Flat%20AZ&marker8=32.78083%2C-109.77883%2C4.0%20mi%20WxNW%20of%20Cactus%20Flat%20AZ&marker9=32.78746%2C-109.76587%2C3.6%20mi%20NW%20of%20Cactus%20Flat%20AZ&marker10=32.79149%2C-109.76065%2C3.5%20mi%20NW%20of%20Cactus%20Flat%20AZ&marker11=32.79936%2C-109.75400%2Cunnamed&marker12=32.80035%2C-109.75021%2Cunnamed) store % go to remote image. /imagelocalsource imagelocaldirectory (lowerfrye_map2.jpg) mergestr store % comes from local file gsave 6.0 0.3 % page translate ( data for jpegimageprocwithlink ) 713 531 % hpixels and vpixels 0.1 0.39 mul % photoscale imagelocalsource % local jpg source imageurly % image url on clickthru jpegimageprocwithlink grestore 3 52 (|1 Here is the presently studied fragment of the Lower Frye Construct\274 The northward path left of center is a historic pipeline. Several distinct |/surl |6CCC|/ccc |1 era water spreader projects are also in the area. |h Here is the hypothetical projected route of the Frye supercanal\274 ) cl addpagenav clickforkml startnewpage 3 52.5 (|1 Adding to the study area mystique, a mid-canal diversional source to the Golf Course Canal might also be somehow required. There is, however, a possible diversionary branch halfway down the mesa in the study area. |h The projected route of such a supercanal would appear geographically and topographically possible. Given the proven superb world class engineering of the rest of the |/surl |6bajada|1|/bajada |1canal system, such a supercanal might not demand an entirely outrageously improbable leap of faith. |h Alternately, in absence of such a supercanal, please attrmpt to explain: (1) Where are the water sources for the |/surl |6Freeman|/freemanfn1 |1and |/surl |6Golf Course|/golfcoursefn1 |1 canals? (2) Why was so much energy and effort spent on the |/surl |6HS Canal|/fryecomplexfn1 |1returning water to Frye Creek? and (3) In absence of a watershed crossing, why was the upper Frye Creek water completely ignored? Here are some noteworthy Lower Frye Construct Area features and locations\274 |t |/to 32.78071 -109.77908|/tx |tHistoric |/surl |6Blue Ponds Canal|/bluepondsfn1 |1(|jlikely |/surl |6Freeman Canal|/freemanfn1 |1|j). |h |t |/to 32.78071 -109.77901|/tx |tIntermediate area requires further study. |t |/to 32.76836 -109.79172|/tx |h |t |/to 32.76836 -109.79172|/tx |tNorthern limit of study area to date. |h |t |/to 32.76905 -109.79454|/tx |tPresent difficult access route. |t |/to 32.76835 -109.79174|/tx |h |t |/to 32.76836 -109.79172|/tx |tApparent classic hanging canal reach.. |t |/to 32.76749 -109.79283|/tx |h |t |/to 32.76777 -109.79217|/tx |tUnusually high walls and spoil piles. |h |t |/to 32.76756 -109.79260|/tx |tPossible diversionary channel. |t |/to 32.76784 -109.79219|/tx |h |t |/to 32.76752 -109.79273|/tx |tExceptionally high wall of distinct construction. |h |t |/to 32.76496 -109.79440|/tx |tMesa route resembles wagon road or 4WD track. |h |t |/to 32.76509 -109.79434|/tx |tSouthern limit of present study area. |h |t |/to 32.75789 -109.81445|/tx |tIntermediate area requires further study. |t |/to 32.76509 -109.79434|/tx |h |t |/to 32.75789 -109.81445|/tx |tLower limit of |/surl |6HS Canal|/hsfn1 |1. ) cl addpagenav clickforkml startnewpage 3 50 ( |1Further Lower Frye Construct Area work might include\274 |t|/to 1 \320|/tx Improve or flag foot access to the study area. |h |t|/to 2 \320|/tx Carefully explore area from construct to blue ponds canal. |h |t|/to 3 \320|/tx Seek additional evidence of mesa top area. |h |t|/to 4 \320|/tx Carefully explore from |/surl |6HS Canal|/hsfn1 |1 termination to mesa top area. |h |t|/to 5 \320|/tx Attempt to verify the supercanal concept. |h |t|/to 6 \320|/tx Find a credible source and route for the |/surl |6Golf Course Canal|/golfcoursefn1 |1. |h |t|/to 7 \320|/tx Attempt to verify the upper Frye watershed crossing. |h |t|/to 8 \320|/tx Significantly improve photography of entire canal complex. |h |t|/to 9 \320|/tx Do fly over drone and videotape survey. |h |t|/to 10 \320|/tx Mentor students and create field camps. |t Thanks to Henry Schneiker for his photography and other assistance. |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 ) cl addpagenav clickforkml startnewpage %%%%%%%%%%%%%%% FRYE100 FRYE101 Photos%%%%%%%%%%% % top image /imageurl imageremotedirectory (frye100.jpg) mergestr store % goto remote image /imagelocalsource imagelocaldirectory (frye100.jpg) mergestr store % comes from local file 5.0 29(|/to |9FRYE100 \261|1|/tx On approach, this portion of the Lower Frye Construct appears very similar to other hanging canals in the system. Especially |/to 32.79950 -109.96378|/tx on the |/surl |6Sand Canal|/sandcanalfn1 |1. View is to the east from |/to 32.76816 -109.79196|tx .) cl 5 31 % page translate ( data for jpegimageprocwithlink ) 1000 577 % hpixels and vpixels 0.1 0.35 mul % photoscale imagelocalsource % local jpg source imageurl % image url on clickthru jpegimageprocwithlink % bot image /imageurl imageremotedirectory (frye101.jpg) mergestr store % goto remote image /imagelocalsource imagelocaldirectory (frye101.jpg) mergestr store 5.0 2(|/to |9FRYE101 \261|1|/tx The cross section and slope here are typical of the other hanging canals. This is clearly too narrow for a wagon road or 4WD track. The high side wall seems atypically high. View is to the north near |/to 32.76794 -109.79193|/tx .) cl 9 4.0 % page translate ( data for jpegimageprocwithlink ) 1000 847 % hpixels and vpixels 0.1 0.25 mul % photoscale imagelocalsource % local jpg source imageurl % image url on clickthru jpegimageprocwithlink addpagenav clickforkml startnewpage %%%%%%%%%%%%%%% FRYE102 FRYE103 Photos%%%%%%%%%%% % top image /imageurl imageremotedirectory (frye102.jpg) mergestr store % comes from local file /imagelocalsource imagelocaldirectory (frye102.jpg) mergestr store % comes from local fil 5 28.7 (|/to |9FRYE102 \261|1|/tx The terrain would appear to be exceptionally hostile towards canal construction. "They" must have wanted to do this in the worst sort of way. The view is to the south near |/to 32.77730 -109.79597|/tx ) cl 8 30.7 % page translate ( data for jpegimageprocwithlink ) 1000 836 % hpixels and vpixels 0.1 0.25 mul % photoscale imagelocalsource % local jpg source imageurl % image url on clickthru jpegimageprocwithlink % bot image /imageurl imageremotedirectory (frye103.jpg) mergestr store % goto remote image /imagelocalsource imagelocaldirectory (frye103.jpg) mergestr store 5 2.3 (|/to |9FRYE103 \261|1|/tx In some areas, the upper and lower spoil piles are carefully aligned. In others, they are simply jumbled. Here the larger rocks appear to be on top. The view is to the west near |/to 32.76761 -109.79252|/tx .) cl 8.3 4 % page translate ( data for jpegimageprocwithlink ) 992 842 % hpixls and vpixels 0.1 0.25 mul % photoscale imagelocalsource % local jpg source imageurl % image url on clickthru jpegimageprocwithlink addpagenav clickforkml startnewpage %%%%%%%%%%%%%%% FRYE104 FRYE106 Photos%%%%%%%%%%% % top image /imageurl imageremotedirectory (frye104.jpg) mergestr store % goto remote image /imagelocalsource imagelocaldirectory (frye104.jpg) mergestr store % comes from local file 5.0 27(|/to |9FRYE104 \261|1|/tx This reach seems to be single walled, again with the larger rocks on top. Carefully controlled slope appears consistent with canal use. View is to the north from |/to 32.76816 -109.79196|/tx .) cl 7 28.5 % page translate ( data for jpegimageprocwithlink ) 999 808 % hpixels and vpixels 0.1 0.29 mul % photoscale imagelocalsource % local jpg source imageurl % image url on clickthru jpegimageprocwithlink % bot image /imageurl imageremotedirectory (frye106.jpg) mergestr store % goto remote image /imagelocalsource imagelocaldirectory (frye106.jpg) mergestr store 5.0 2(|/to |9FRYE106 \261|1|/tx This seems to be the highest wall in the entire canal system and remains quite enigmatic. The rocks appear to be carefully size sorted. View is to the east near |/to 32.76752 -109.79273|/tx .) cl 6.5 3.7 % page translate ( data for jpegimageprocwithlink ) 756 510 % hpixels and vpixels 0.1 0.39 mul % photoscale imagelocalsource % local jpg source imageurl % image url on clickthru jpegimageprocwithlink addpagenav clickforkml startnewpage %%%%%%%%%%%%%%% FRYE108 FRYE109 Photos%%%%%%%%%%% % top image /imageurl imageremotedirectory (frye108.jpg) mergestr store % goto remote image /imagelocalsource imagelocaldirectory (frye108.jpg) mergestr store % comes from local file 5.0 30(|/to |9FRYE108 \261|1|/tx On reaching the mesa top, the project seems to be indistinguishable from a wagon road or 4WD track. A possible |/surl |6Ockham's Razor|/ockham |1 explanation is that the ratio of soil to rock dramatically changes, easing constuction but making any survivability more tenuous. View is to the south from |/to 32.76681 -109.79347 |/tx .) cl 7 31.5 % page translate ( data for jpegimageprocwithlink ) 989 709 % hpixels and vpixels 0.1 0.28 mul % photoscale imagelocalsource % local jpg source imageurl % image url on clickthru jpegimageprocwithlink % bot image /imageurl imageremotedirectory (frye109.jpg) mergestr store % goto remote image /imagelocalsource imagelocaldirectory (frye109.jpg) mergestr store 5.0 2(|/to |9FRYE109 \261|1|/tx Another view from the mesa top. There seems to be no credible reason for wagon roads or 4WD tracks. There are no obvious signs of mechanical or pack animal construction assistance. View is North near |/to 32.76392 -109.79517|/tx .) cl 6.5 3.7 % page translate ( data for jpegimageprocwithlink ) 1000 757 % hpixels and vpixels 0.1 0.28 mul % photoscale imagelocalsource % local jpg source imageurl % image url on clickthru jpegimageprocwithlink addpagenav clickforkml startnewpage % topo 1 -- /imageurly (https://mapper.acme.com/?ll=32.76837,-109.79249&z=15&t=T&marker0=32.76681%2C-109.79347%2C4.6%20mi%20W%20of%20Cactus%20Flat%20AZ&marker1=32.76835%2C-109.79174%2C4.5%20mi%20W%20of%20Cactus%20Flat%20AZ ) store % go to remote image. /imagelocalsource imagelocaldirectory (lowerfryecon_topo1.jpg) mergestr store % comes from local file gsave 7.5 25.2 % page translate ( data for jpegimageprocwithlink ) 583 507 % hpixels and vpixels 0.1 0.486 mul % photoscale imagelocalsource % local jpg source imageurly % image url on clickthru jpegimageprocwithlink grestore % topo 2 -- /imagelocalsource imagelocaldirectory (projfrye_topo1.jpg) mergestr store % comes from local file BAD!!!! /imageurly (http://mapper.acme.com/?ll=32.77085,-109.81295&z=13&t=T&marker0=32.75365%2C-109.83697%2C4.1%20mi%20NxNE%20of%20Mount%20Graham%20AZ&marker1=32.75740%2C-109.83058%2Cunnamed&marker2=32.75838%2C-109.81467%2Cunnamed&marker3=32.76778%2C-109.79212%2C4.5%20mi%20W%20of%20Cactus%20Flat%20AZ&marker4=32.78746%2C-109.76587%2C3.6%20mi%20NW%20of%20Cactus%20Flat%20AZ&marker5=32.79936%2C-109.75400%2Cunnamed&marker6=32.74358%2C-109.83963%2C3.4%20mi%20NxNE%20of%20Mount%20Graham%20AZ&marker7=32.75761%2C-109.82432%2C4.7%20mi%20NE%20of%20Mount%20Graham%20AZ&marker8=32.78083%2C-109.77883%2C4.0%20mi%20WxNW%20of%20Cactus%20Flat%20AZ&marker9=32.80035%2C-109.75021%2Cunnamed&marker10=32.76475%2C-109.79452%2C4.6%20mi%20W%20of%20Cactus%20Flat%20AZ&marker11=32.75534%2C-109.83459%2C4.3%20mi%20NxNE%20of%20Mount%20Graham%20AZ&marker12=32.79149%2C-109.76065%2C3.5%20mi%20NW%20of%20Cactus%20Flat%20AZ) store % go to remote image. gsave 7.5 -1.0 % page translate ( data for jpegimageprocwithlink ) 657 534 % hpixels and vpixels 0.1 0.43 mul % photoscale imagelocalsource % local jpg source imageurly % image url on clickthru jpegimageprocwithlink grestore 3 51 (Here is a topographic map of the Lower Frye Construct\274 ) cl 3 23.3 (Here is a topographic map of the projected Frye Supercanal\274 ) cl addpagenav clickforkml startnewpage 3 42 ( 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 23 FREM1 Freeman Canal|/tx and |/to 20 FMC1 |/to Frey Mesa Complex|/tx and |/to 70 LFC1 Lower Frye Construct|/tx and |/to 75 LFEX1 Lower |/to Frye Extension|/tx and |/to 33 BPC1 Blue Ponds Canal|/tx and |/to 32 LFC1 Earlier Freeman |/to Canal Search|/tx and |/to 31 HSC1 HS Canal|/tx and |/to 30 FPA1 Lower Frye Mesa Ponding Area|/tx and |/to 28 FWD1 Upper Frye Watershed Diversion|/tx . |h This document can be found |/surl |6here|/lowerfryecon1fn |1 and its sourcecode |/surl |6here|/lowerfryecon1fnps |1. ) cl 4.5 3 (|/to More Hanging Canal Resources: |/surl |6http://www.tinaja.com/tinsamp1.shtml|1|/tinsamp1 ) cl 4 1.5 (|/to New Hanging Canal Developments: |/surl |6http://www.tinaja.com/whtnu17.shtml|1|/whtnu17 ) cl addpagenav clickforkml startnewpage %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% { % start of code not used in this instance. %%%%%%%%%%%%%%% CLUFFNW1 CLUFFNW2 Photos %%%%%%%%%%% % top image /imageurl imageremotedirectory (/cluffnw1.jpg) mergestr store % goto remote image /imagelocalsource imagelocaldirectory (cluffnw1.jpg) mergestr store % comes from local file 5.0 29.1(|/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 30.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 addpagenav clickforkml startnewpage } pop % be sure to move above trailer to end! /lastpage true store % do not omit! addpagenav clickforkml startnewpage % EOF