#!/usr/local/bin/gnuplot -persist
# set terminal pngcairo  transparent enhanced font "arial,10" fontscale 1.0 size 600, 400 
# set output 'solar_path.1.png'
set border 4096 front lt black linewidth 1.000 dashtype solid
set dummy t, y
set format r "%.0f°" 
set angles degrees
set grid polar 30.000000
set grid noxtics nomxtics noytics nomytics noztics nomztics rtics nomrtics \
 nox2tics nomx2tics noy2tics nomy2tics nocbtics nomcbtics
set grid layerdefault   lt 0 linecolor 0 linewidth 0.500,  lt 0 linecolor 0 linewidth 0.500
set raxis
set theta clockwise top
unset key
set label 1 "Solar path at\nLatitude 47.67 N" at screen 0.02, 0.95, 0 left norotate font ":Bold,10" back nopoint
set polar
set size ratio 1 1,1
set style data lines
unset xtics
unset ytics
set rtics  norangelimit 30
set ttics axis in scale 1,0.5 nomirror norotate  autojustify
set ttics  norangelimit autofreq  font ":Bold"
set ttics add  ("W" -90.0000, "N" 0.00000, "E" 90.0000, "S" 180.000)
set timestamp "Seattle - %d %b %Y" 
set timestamp  offset character 1, 1, 0 font "" textcolor lt -1 norotate
set xrange [ -90.0000 : 90.0000 ] noreverse nowriteback
set x2range [ * : * ] noreverse writeback
set yrange [ -90.0000 : 90.0000 ] noreverse nowriteback
set y2range [ * : * ] noreverse writeback
set zrange [ * : * ] noreverse writeback
set cbrange [ * : * ] noreverse writeback
set rlabel "Altitude" 
set rlabel  offset character -2, 0, 0 font ":Bold" textcolor lt -1 norotate
set rrange [ 90.0000 : 0.00000 ] noreverse nowriteback
set colorbox vertical origin screen 0.9, 0.2 size screen 0.05, 0.6 front  noinvert bdefault
h(t) = 360. * t / Day
Altitude(t) = asin( sin(Dec) * sin(Phi) + cos(Dec) * cos(Phi) * cos(h(t)) )
cosAzi(t)  = ( sin(Dec) * sin(Phi) - cos(Dec) * cos(h(t)) * sin(Phi) )            / cos(Altitude(t))
sinAzi(t)  = ( -cos(Dec) * sin(h(t)) )            / cos(Altitude(t))
Azimuth(t) = atan2( sinAzi(t), cosAzi(t) )
NO_ANIMATION = 1
save_encoding = "utf8"
Latitude = 47.67
Longitude = -122.28
Date = "11-03-2023"
Minute = 60.0
Hour = 3600.0
Day = 86400.0
TimeFormat = "%d-%m-%Y %H:%M"
Phi = 47.67
n = 8469.5
L = 348.4006543
g = 65.06974085
lambda = 350.152507076479
eps = 23.4356122
RAsc = -9.04917823254823
Dec = -3.90028544489761
daylength = 171.434936201542
corr = 5.22
rise = 19319.3923441851
set = 21824.9923441851
sunlight = "11 h 25 m"
sunrise = "6:38"
sunset = "18:03"
array dummy[150] = [-43200.0,-42600.0,-42000.0,-41400.0,-40800.0,-40200.0,-39600.0,-39000.0,-38400.0,-37800.0,-37200.0,-36600.0,-36000.0,-35400.0,-34800.0,-34200.0,-33600.0,-33000.0,-32400.0,-31800.0,-31200.0,-30600.0,-30000.0,-29400.0,-28800.0,-28200.0,-27600.0,-27000.0,-26400.0,-25800.0,-25200.0,-24600.0,-24000.0,-23400.0,-22800.0,-22200.0,-21600.0,-21000.0,-20400.0,-19800.0,-19200.0,-18600.0,-18000.0,-17400.0,-16800.0,-16200.0,-15600.0,-15000.0,-14400.0,-13800.0,-13200.0,-12600.0,-12000.0,-11400.0,-10800.0,-10200.0,-9600.0,-9000.0,-8400.0,-7800.0,-7200.0,-6600.0,-6000.0,-5400.0,-4800.0,-4200.0,-3600.0,-3000.0,-2400.0,-1800.0,-1200.0,-600.0,0.0,600.0,1200.0,1800.0,2400.0,3000.0,3600.0,4200.0,4800.0,5400.0,6000.0,6600.0,7200.0,7800.0,8400.0,9000.0,9600.0,10200.0,10800.0,11400.0,12000.0,12600.0,13200.0,13800.0,14400.0,15000.0,15600.0,16200.0,16800.0,17400.0,18000.0,18600.0,19200.0,19800.0,20400.0,21000.0,21600.0,22200.0,22800.0,23400.0,24000.0,24600.0,25200.0,25800.0,26400.0,27000.0,27600.0,28200.0,28800.0,29400.0,30000.0,30600.0,31200.0,31800.0,32400.0,33000.0,33600.0,34200.0,34800.0,35400.0,36000.0,36600.0,37200.0,37800.0,38400.0,39000.0,39600.0,40200.0,40800.0,41400.0,42000.0,42600.0,43200.0,43800.0,44400.0,45000.0,45600.0,46200.0]
array winter_alt[150] = [-65.765748681478,-65.6837943791762,-65.4396271016244,-65.0381686135367,-64.4871078384737,-63.7962434525089,-62.9767489438565,-62.0404704378976,-60.9993333541814,-59.864893469824,-58.6480344125534,-57.3587925763162,-56.0062813665154,-54.5986860240349,-53.1433041920547,-51.6466129566643,-50.1143485731071,-48.5515896849455,-46.9628383405458,-45.352095594331,-43.7229301458821,-42.0785395285917,-40.4218039927283,-38.7553335760766,-37.0815090206979,-35.402517247244,-33.7203820855871,-32.0369909125335,-30.3541177829269,-28.6734435708213,-26.996573569051,-25.3250529318099,-23.6603802872678,-22.0040197961802,-20.3574118876448,-18.7219828640655,-17.0991535333041,-15.4903469961869,-13.8969956912984,-12.3205477756754,-10.762472899048,-9.22426741016488,-7.70745901608078,-6.21361089874912,-4.74432527761764,-3.30124639201754,-1.88606286291845,-0.500509380140067,0.853632351472994,2.17453348481253,3.46031880992474,4.70906853550125,5.91882117276241,7.08757762337096,8.21330656986737,9.29395125856388,10.3274377499402,11.311684689503,12.2446146221519,13.1241668350033,13.9483116674782,14.7150661739785,15.4225109650763,16.0688079900359,16.6522189596962,17.1711240479955,17.6240404570231,18.0096403889709,18.3267679431535,18.5744544511858,18.7519317811978,18.8586431838716,18.894251318522,18.8586431838716,18.7519317811978,18.5744544511858,18.3267679431535,18.0096403889709,17.6240404570231,17.1711240479955,16.6522189596962,16.0688079900359,15.4225109650763,14.7150661739785,13.9483116674782,13.1241668350033,12.2446146221519,11.311684689503,10.3274377499402,9.29395125856388,8.21330656986737,7.08757762337096,5.91882117276241,4.70906853550125,3.46031880992474,2.17453348481253,0.853632351472994,-0.500509380140067,-1.88606286291845,-3.30124639201754,-4.74432527761764,-6.21361089874912,-7.70745901608078,-9.22426741016488,-10.762472899048,-12.3205477756754,-13.8969956912984,-15.4903469961869,-17.0991535333041,-18.7219828640655,-20.3574118876448,-22.0040197961802,-23.6603802872678,-25.3250529318099,-26.996573569051,-28.6734435708213,-30.3541177829269,-32.0369909125335,-33.7203820855871,-35.402517247244,-37.0815090206979,-38.7553335760766,-40.4218039927283,-42.0785395285917,-43.7229301458821,-45.352095594331,-46.9628383405458,-48.5515896849455,-50.1143485731071,-51.6466129566643,-53.1433041920547,-54.5986860240349,-56.0062813665154,-57.3587925763162,-58.6480344125534,-59.864893469824,-60.9993333541814,-62.0404704378976,-62.9767489438565,-63.7962434525089,-64.4871078384737,-65.0381686135367,-65.4396271016244,-65.6837943791762,-65.765748681478,-65.6837943791762,-65.4396271016244,-65.0381686135367,-64.4871078384737,-63.7962434525089]
array winter_azi[150] = [1.67536640989715e-14,5.95580651902212,11.8327432211824,17.5591132524744,23.0760184324658,28.3404784664604,33.3259247058107,38.0206314836446,42.4249501067636,46.5481601672893,50.4055122585955,54.0157650184025,57.3993080675428,60.5768343946388,63.5684673180877,66.3932336923463,69.0687849064058,71.6112860129873,74.0354130719541,76.3544159349872,78.5802171842667,80.7235279127276,82.793968100251,84.8001841828654,86.7499596371406,88.6503164910128,90.5076069843453,92.32759539472,94.1155304953073,95.8762093441664,97.6140331997618,99.3330563697425,101.037028764184,102.729432862891,104.413515733048,106.092316656961,107.76869085495,109.445329718278,111.124777902871,112.809447576887,114.501630064203,116.203505081361,117.917147727311,119.644533353239,121.387540413747,123.147951380738,124.927451787606,126.727627464081,128.549960021625,130.395820656108,132.266462348922,134.163010570272,136.086452619158,138.037625773637,140.017204471842,142.025686798018,144.06338060693,146.130389681997,148.226600384235,150.351669306352,152.505012494303,154.685796831691,156.892934194843,159.125078972539,161.380629499501,163.65773387343,165.954300510592,168.268013646219,170.596353808163,172.93662309342,175.285974868293,177.641447307537,180.0,-177.641447307537,-175.285974868293,-172.93662309342,-170.596353808163,-168.268013646219,-165.954300510592,-163.65773387343,-161.380629499501,-159.125078972539,-156.892934194843,-154.685796831691,-152.505012494303,-150.351669306352,-148.226600384235,-146.130389681997,-144.06338060693,-142.025686798018,-140.017204471842,-138.037625773637,-136.086452619158,-134.163010570272,-132.266462348922,-130.395820656108,-128.549960021625,-126.727627464081,-124.927451787606,-123.147951380738,-121.387540413747,-119.644533353239,-117.917147727311,-116.203505081361,-114.501630064203,-112.809447576887,-111.124777902871,-109.445329718278,-107.76869085495,-106.092316656961,-104.413515733048,-102.729432862891,-101.037028764184,-99.3330563697425,-97.6140331997618,-95.8762093441664,-94.1155304953073,-92.32759539472,-90.5076069843453,-88.6503164910128,-86.7499596371406,-84.8001841828654,-82.793968100251,-80.7235279127276,-78.5802171842667,-76.3544159349872,-74.0354130719541,-71.6112860129873,-69.0687849064058,-66.3932336923463,-63.5684673180877,-60.5768343946388,-57.3993080675428,-54.0157650184025,-50.4055122585955,-46.5481601672893,-42.4249501067636,-38.0206314836446,-33.3259247058107,-28.3404784664604,-23.0760184324658,-17.5591132524744,-11.8327432211824,-5.95580651902212,-1.67536640989715e-14,5.95580651902209,11.8327432211823,17.5591132524743,23.0760184324658,28.3404784664604]
time = 46800.0
array summer_alt[150] = [-18.8958928585141,-18.8602839328933,-18.7535701650568,-18.5760889187476,-18.3283969810921,-18.0112625356211,-17.6256543150355,-17.1727282955502,-16.6538123600958,-16.0703893995657,-15.424079339086,-14.716620571203,-13.94985125267,-13.1256908799968,-12.2461225055118,-11.3131758949369,-10.3289118636674,-9.29540796583712,-8.21474565084164,-7.08899894850254,-5.92022469790834,-4.71045429687128,-3.46168691901913,-2.17588412345986,-0.854965767063038,0.499192879150627,1.88476291116613,3.29996257101027,4.74305711909565,6.21235788760284,7.70622059280821,9.22304297285672,10.7612618048935,12.319349341985,13.8958091960403,15.4891716780366,17.0979885912044,18.7208274562955,20.356265130394,22.0028807616238,23.6592480011381,25.3239263704595,26.9954516560045,28.6723251728148,30.3530017054429,32.0358758948472,33.7192667953581,35.401400274712,37.0803888725772,38.7542086692977,40.4206726482483,42.0773999655999,43.7217804768698,45.3509338216893,46.9616623556171,48.5503972707987,50.1131374127493,51.6453806489609,53.14204827829,54.59740402879,56.0049708572687,57.3574512467093,58.646660194279,59.8634846770746,60.9978888618186,62.0389898891481,62.9752329747988,63.794693909076,64.4855279490631,65.0365630708538,65.4380020073902,65.6821570207464,65.7641071414859,65.6821570207464,65.4380020073902,65.0365630708538,64.4855279490631,63.794693909076,62.9752329747988,62.0389898891481,60.9978888618186,59.8634846770746,58.646660194279,57.3574512467093,56.0049708572687,54.59740402879,53.14204827829,51.6453806489609,50.1131374127493,48.5503972707987,46.9616623556171,45.3509338216893,43.7217804768698,42.0773999655999,40.4206726482483,38.7542086692977,37.0803888725772,35.401400274712,33.7192667953581,32.0358758948472,30.3530017054429,28.6723251728148,26.9954516560045,25.3239263704595,23.6592480011381,22.0028807616238,20.356265130394,18.7208274562955,17.0979885912044,15.4891716780366,13.8958091960403,12.319349341985,10.7612618048935,9.22304297285672,7.70622059280821,6.21235788760284,4.74305711909565,3.29996257101027,1.88476291116613,0.499192879150627,-0.854965767063038,-2.17588412345986,-3.46168691901913,-4.71045429687128,-5.92022469790834,-7.08899894850254,-8.21474565084164,-9.29540796583712,-10.3289118636674,-11.3131758949369,-12.2461225055118,-13.1256908799968,-13.94985125267,-14.716620571203,-15.424079339086,-16.0703893995657,-16.6538123600958,-17.1727282955502,-17.6256543150355,-18.0112625356211,-18.3283969810921,-18.5760889187476,-18.7535701650568,-18.8602839328933,-18.8958928585141,-18.8602839328933,-18.7535701650568,-18.5760889187476,-18.3283969810921,-18.0112625356211]
array summer_azi[150] = [6.62131327766097e-15,2.35860866398087,4.71413684590796,7.06354391047375,9.40386781745307,11.7322617314914,14.0460275648762,16.3426456807292,18.6198001718465,20.8753993359434,23.1075911769108,25.3147739605644,27.4956020312195,29.6489872441673,31.77409648396,33.8703458177032,35.9373918774479,37.9751210796017,39.9836372768394,41.9632484048887,43.9144526386054,45.8379245144528,47.7345014147808,49.6051707472751,51.4510580938484,53.2734165494489,55.073617424367,56.8531424445508,58.6135775536347,60.3566083978458,62.0840175604777,63.797683605812,65.499581992815,67.1917879261918,68.8764812261159,70.5559533178838,72.2326164687488,73.9090154312451,75.5878416905056,77.2719505575868,78.9643814018281,80.6683813729083,82.3874330274224,84.1252863449142,85.8859956929844,87.6739623775778,89.4939834878257,91.3513078063476,93.2516995916873,95.2015110271816,97.2077640350038,99.2782419214453,101.421590867962,103.647430490099,105.966471374116,108.390635411895,110.933171529542,113.608754562574,116.433547964563,119.425201063,122.602738093801,125.986279108219,129.596513110355,133.453825006428,137.576968083178,141.981187213833,146.675756415114,151.661022375376,156.925256857092,162.44189190643,168.167952214704,174.044549277307,-180.0,-174.044549277307,-168.167952214704,-162.44189190643,-156.925256857092,-151.661022375376,-146.675756415114,-141.981187213833,-137.576968083178,-133.453825006428,-129.596513110355,-125.986279108219,-122.602738093801,-119.425201063,-116.433547964563,-113.608754562574,-110.933171529542,-108.390635411895,-105.966471374116,-103.647430490099,-101.421590867962,-99.2782419214453,-97.2077640350038,-95.2015110271816,-93.2516995916873,-91.3513078063476,-89.4939834878257,-87.6739623775778,-85.8859956929844,-84.1252863449142,-82.3874330274224,-80.6683813729083,-78.9643814018281,-77.2719505575868,-75.5878416905056,-73.9090154312451,-72.2326164687488,-70.5559533178838,-68.8764812261159,-67.1917879261918,-65.499581992815,-63.797683605812,-62.0840175604777,-60.3566083978458,-58.6135775536347,-56.8531424445508,-55.073617424367,-53.2734165494489,-51.4510580938484,-49.6051707472751,-47.7345014147808,-45.8379245144528,-43.9144526386054,-41.9632484048887,-39.9836372768394,-37.9751210796017,-35.9373918774479,-33.8703458177032,-31.77409648396,-29.6489872441673,-27.4956020312195,-25.3147739605644,-23.1075911769108,-20.8753993359434,-18.6198001718465,-16.3426456807292,-14.0460275648762,-11.7322617314914,-9.40386781745307,-7.06354391047375,-4.71413684590796,-2.35860866398087,-6.62131327766097e-15,2.35860866398086,4.71413684590795,7.06354391047373,9.40386781745308,11.7322617314914]
array today_alt[150] = [-46.2302854448976,-46.1773485300577,-46.0189429305306,-45.756269682292,-45.3912837157977,-44.9266276868273,-44.3655467938096,-43.7117907787432,-42.9695095857902,-42.1431487392248,-41.2373495712987,-40.2568581974221,-39.2064458128033,-38.0908416422832,-36.9146788263183,-35.6824527251964,-34.3984905771216,-33.066931127947,-31.6917127180066,-30.2765683165096,-28.8250260910373,-27.340414250834,-25.8258690786188,-24.2843452459174,-22.7186276780645,-21.1313443893945,-19.5249798431939,-17.9018885040099,-16.2643083428778,-14.614374130906,-12.9541304157897,-11.2855441216602,-9.61051674747957,-7.93089616501828,-6.24848803602333,-4.56506688093388,-2.88238683955753,-1.20219216834886,0.473772480047424,2.14375195110787,3.80597061708389,5.45862250739878,7.09986151776,8.72779168743873,10.3404575499397,11.935834581835,13.5118197984486,15.0662225739859,16.5967557982557,18.101027522899,19.576533297446,21.0206494496546,22.4306276250416,23.8035909661501,25.136532380691,26.4263154156735,27.6696783166859,28.8632419002561,30.0035218931926,31.0869463843549,32.1098789782455,33.0686481224545,33.959582889985,34.7790552243278,35.5235282984544,36.1896102076883,36.7741117332104,37.2741064151602,37.6869907132667,38.0105416695554,38.2429692843552,38.3829608266782,38.4297145551024,38.3829608266782,38.2429692843552,38.0105416695554,37.6869907132667,37.2741064151602,36.7741117332104,36.1896102076883,35.5235282984544,34.7790552243278,33.959582889985,33.0686481224545,32.1098789782455,31.0869463843549,30.0035218931926,28.8632419002561,27.6696783166859,26.4263154156735,25.136532380691,23.8035909661501,22.4306276250416,21.0206494496546,19.576533297446,18.101027522899,16.5967557982557,15.0662225739859,13.5118197984486,11.935834581835,10.3404575499397,8.72779168743873,7.09986151776,5.45862250739878,3.80597061708389,2.14375195110787,0.473772480047424,-1.20219216834886,-2.88238683955753,-4.56506688093388,-6.24848803602333,-7.93089616501828,-9.61051674747957,-11.2855441216602,-12.9541304157897,-14.614374130906,-16.2643083428778,-17.9018885040099,-19.5249798431939,-21.1313443893945,-22.7186276780645,-24.2843452459174,-25.8258690786188,-27.340414250834,-28.8250260910373,-30.2765683165096,-31.6917127180066,-33.066931127947,-34.3984905771216,-35.6824527251964,-36.9146788263183,-38.0908416422832,-39.2064458128033,-40.2568581974221,-41.2373495712987,-42.1431487392248,-42.9695095857902,-43.7117907787432,-44.3655467938096,-44.9266276868273,-45.3912837157977,-45.756269682292,-46.0189429305306,-46.1773485300577,-46.2302854448976,-46.1773485300577,-46.0189429305306,-45.756269682292,-45.3912837157977,-44.9266276868273]
array today_azi[150] = [1.01857371296812e-14,3.62680663543079,7.2399351360265,10.8261242775495,14.3729165798226,17.8689889687624,21.3044083110528,24.6708017498836,27.9614408019276,31.1712459633981,34.2967242057176,37.3358548812024,40.2879403698279,43.1534367745284,45.9337777482905,48.6312017253667,51.2485899270208,53.7893198583378,56.2571367948089,58.6560440427457,60.990211530411,63.2639014839053,65.4814094799937,67.6470189621434,69.7649672797581,71.8394214011562,73.8744616098452,75.8740716858985,77.8421342755687,79.7824303470777,81.6986418095934,83.5943565309727,85.4730751261687,87.3382190023583,89.1931392400446,91.0411259633261,92.885417909093,94.7292119459254,96.5756723205789,98.4279394245544,100.289137876512,102.162383709133,104.050790432235,105.957473718095,107.885554420839,109.83815960002,111.818421170474,113.82947174769,115.874437202815,117.956425387521,120.078510441352,122.243712059692,124.45496908817,126.715106830762,129.026797528171,131.392513596576,133.814473432584,136.294579905804,138.834352090949,141.434851345179,144.096603510366,146.819519793621,149.602819709191,152.444960279416,155.343576392177,158.295437673186,161.296427318352,164.341547917614,167.424958297703,170.540043794748,173.679520208968,176.83556916777,180.0,-176.83556916777,-173.679520208968,-170.540043794748,-167.424958297703,-164.341547917614,-161.296427318352,-158.295437673186,-155.343576392177,-152.444960279416,-149.602819709191,-146.819519793621,-144.096603510366,-141.434851345179,-138.834352090949,-136.294579905804,-133.814473432584,-131.392513596576,-129.026797528171,-126.715106830762,-124.45496908817,-122.243712059692,-120.078510441352,-117.956425387521,-115.874437202815,-113.82947174769,-111.818421170474,-109.83815960002,-107.885554420839,-105.957473718095,-104.050790432235,-102.162383709133,-100.289137876512,-98.4279394245544,-96.5756723205789,-94.7292119459254,-92.885417909093,-91.0411259633261,-89.1931392400446,-87.3382190023583,-85.4730751261687,-83.5943565309727,-81.6986418095934,-79.7824303470777,-77.8421342755687,-75.8740716858985,-73.8744616098452,-71.8394214011562,-69.7649672797581,-67.6470189621434,-65.4814094799937,-63.2639014839053,-60.990211530411,-58.6560440427457,-56.2571367948089,-53.7893198583378,-51.2485899270208,-48.6312017253667,-45.9337777482905,-43.1534367745284,-40.2879403698279,-37.3358548812024,-34.2967242057176,-31.1712459633981,-27.9614408019276,-24.6708017498836,-21.3044083110528,-17.8689889687624,-14.3729165798226,-10.8261242775495,-7.2399351360265,-3.62680663543079,-1.01857371296812e-14,3.62680663543077,7.23993513602648,10.8261242775495,14.3729165798226,17.8689889687624]
today = "Today ☉  \n11 h 25 m\nof sunlight"
## Last datafile plotted: "@@"
plot dummy using (winter_azi[$1]):(winter_alt[$1]) lw 2 title "   Winter Solstice" at beg left,      dummy using (summer_azi[$1]):(summer_alt[$1]) lw 2 title "   Summer Solstice" at beg left,      dummy using (today_azi[$1]):(today_alt[$1]) lw 2 title today at end right