; $eU SUN-POSITIONSUBR-,|+ ?c(` TRUEANOM` `ECCENANOM3@` B``.% @" No} *o} Ad7 7F " ,8COSD` # No~F "o~ gSIND .Qsd7` .p.Bj 0-, SEMID 0 ` "hASIND ` ``` "h" No~ "o~` a!.4` B`FRACTION` .4hC ` "hRANGE(a#NCONS` 3XCONS $(``0-,CONSa /,xA Sne1T S,uG!78QvE !yf3]0SKY-ANGLES,8,8,:,:0 *,8@ g ` g~`````h@ "h g|0 g `sd,:` ` `,Z,: "hQ@ACOSD` g| !.4`c B` `-,` g~A: ,xpSUN,8,8@JULIAN`HHMMSS  ` "h`DDMMSS` `!.4ds @Bs[  &h $[ANGLED 0@[ @Z[  ` ,X,X/@ ,x,<,<[Z[ZZ [ ./&.X ...` Np *p /. $0/o&. (&02&0/ $(&0  / .-,0@`0 -, //,xh`0%DATED-,|,<,<5 IFIX ˁ À (˂: Nw| *w| :$(ˀ&. ; ˀ$.P&E Nw} (w} $ &. ; .($ˀ Nw~ &w~ $&.( ; ; ˀ Nw "w .$/. ; (1$.2. . Np  (p "-,,8` $ " -,a $ " -,a 0 P/,xJDWK (7INVERT1[+0D `Z-a ` A%`Z " a `ERROR-IN-ANGLE-FORMAT "*PRINT `,x8[FLOAT0Z`[Z`Z[.ph.p#. @-, t/,xTIMED,:,:0,:!. @ No "o B`FIX sd0p7 sd0p Ph "h!. "h` 3A@`X3/,xhYA3a[+r``"-, +{ Z[Z`Z[Z``-, .ph.p#-,0 /,x,:0 ,:-,~ X3 "h ``% g~d0p7 B` Bg `d0p Ph "h!. B`@`0 "h` g3 $  /,x |1 Ӄ "hTAND`  0 F $ "hATANDa!!.-, /,x C,8A X`-, ,x  90a K.4 "h+*0a3n+`S.4 "h+*@ -,,x"6@P!_F.4 "hSIN,xH~X@ 0W 4.4 "hCOS`#0`,xH~(0"",: $h 0 "hATAN;..4-, /0`0,xH~ i*`` ` -, ,xxw #!0d,: "hSQRT% $hAA0a!/,x@@ !0d,: "h%,X "ha!`3/,xxG `d P -, ,xHNUPDATE[  8.-, ` Z`[; $-,i 0 SUN-NOW-HERELONGITUDE,8LATITUDE)DATEz85 STATUSg+R SQ6 $DAYTIME-ziE|5g+GMT-OFFSET ;P (,X(8ZDAY-OF-WEEK `]..ˀ -,,xxbLAST-SUNDAY f:,8CONSTRUCTa1``/PREMUTE ` /-,,x  i+n3`-,@ ,xk*-,,8` Z`[G:[`$ DAY-SAVE-CROCKZ [8 81.+0n+0N`ZHZ8[8 8 53.+Z`[8 80N`Z`Z8[8) 8 $ `3n@`K`7 7,x3 U*UjUSETQQUOTEG 9;xw<)9 =?x +;x;