🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.sources.hp48
Article #2

v06i009: nasir_ks - Nasir Astronomical time application v1.2, Part01/02

#2
From: K. Sinenmaa
Date: Wed, 29 Jul 1992 01:13
705 lines
39549 bytes
Checksum: 3424687542 (verify with brik -cv)
Submitted-by: K. Sinenmaa <sinenmaa@cc.helsinki.fi>
Posting-number: Volume 6, Issue 9
Archive-name: nasir_ks/part01

BEGIN_DOC nasir.doc
Hi there again,
This is rewritten versio. Please, if you are using an older
version of the Nasir then replace it as soon as possible.
They are (older) complete useless for any meaningful use.
(maybe this is too).

If you find any misinterpretation produced by this program
please let me know about it.

Happy timing,
kati
sinenmaa@cc.helsinki.fi


             &&&    &&         &&&          &&&&     &&   &&&&&
             && &   &&        && &&        &&  &&    &&   &&  &&
             && &&  &&       &&   &&        &&       &&   &&  &&
             &&  && &&      &&&&&&&&&         &&     &&   &&&&&
             &&   & &&     &&       &&     &&  &&    &&   && &&
             &&    &&&    &&         &&     &&&&     &&   &&  &&
             *****************************************************

                           v1.2 1992 by K. Sinenmaa


    INTRODUCTION

       This program does the time changes both in the Julian Calendar
       and the Gregorian Calendar dates. The date have to be  later than
       March 1st 4712 BC. or greater than Julian day 98 in the Gregorian
       calendar, Julian day 60 in the Julian calendar.The Calendars can
       be selected from the SETUP menus.
       
       Also the Sun's data is available contains the ecliptical, equa-
       torial and horizon coordinates, rising and setting times, Sun's 
       geocentric distance, semi diameter, ephemeris transit time,
       Obliquity of the Ecliptic, Nutation in Longitude and 
       Nutation in Qbliquity.
       
       Furthermore there is a simple calendar but it has almost 
       unlimited time scale to the both calendar form.
                         

    EXECUTABLE FILES

       START    a simple time application program for the settings
       ASCAL    a simple calendar
       GSTR     yields the Easter Sunday for Gregorian calendar
       JSTR     yields the Easter Sunday for Julian calendar
       JDAY     a fast way to get a Julian day number
       CADA     a fast way to convert JDAY to calendar date
       EOFT     yields the Ephemeris Transit (12-EOFT = Equation of the Time)
       GWUT     yields a mean Side real Time at Greenwich longitude
       EQSO     Equinoxes and Solstices
       CONV     Ecliptical coordinates to Equatorial coordinates
                         

     Current settings:     Note, UT is updated only when TIME
                           or JULIA are changing
                            
     48SX
     __________________________
     * Gregorian    DST= ON   *   Calendar and Daylight Saving Time
     * TZ= 2  LT= 13          *   Time Zone and Local Time
     * JD0 = 2448826.5        *   Julian Day at 0 UT
     * JD  = 2448826.91667    *   Julian day related to the Universal Time
     * UT= 10 today           *   Universal Time
     * Thu Jul 23.1992  205   *   Defined date and its year number
     * \Gl = 25 \O/ = 60      *   Geographical coordinates
      [ab][cd][ef][gh][ij][kl]

     This program doesn't contain any fancy things so I suppose one 
     is accustomed to use menu keys and other HP48's features so I 
     leave them to explain. 

          NOTE: UT = hh.mmss yesterday  =   defined date - 1 
                UT = hh.mmss today      =   defined date
                UT = hh.mmss tomorrow   =   defined date + 1

   SETUP: two pages

       DATE   form is MM DD YYYY, the preceding zeros are not essential
       TIME   must be entered in the 24-hour system
       LATIT  ude is between -90 and +90 degrees, must be as decimals
       LONG   itude range is 0 to 180, westerns are negatives, as decimals
       ZONE   is user's local time zone
       BACK   lets you to go back to the first temporary menu

       DL.ON  Dayligth Saving Time ON  not automatic, a user take care of it
       DLOFF  Dayligth Saving Time OFF
       JUL.C  the calendar selection, JULIAN is ON
       GRE.C  the calendar selection, GREGORIAN is ON


   SETUP <ZONE>

       Time Zone have to be entered in hours, as negative at western
       longitudes otherwise positive.
       Here is a few example;                   Longitudes around
                                                      
       Melbourne                       +10             +150
       Delhi                           +5              +75
       Moscow                          +3              +30
       most West European countries    +1              +15
       Reykjavik                       -1              -15

       In the North America and the Pasific Ocean;

       Eastern Standard Time           -5              -75
       Central                         -6              -90
       Mountain                        -7              -105
       Pasific                         -8              -120
       Alaska                          -9              -135
       Havaii                          -10             -140

            NOTE; Time zone related very closely to the longitude. If
                  you change either one of them you must check also
                  the other.

   EXECUTABLE programs:

     START;  contains five temporary menu keys

         SETUP   same as above
         JULIA   an alternate time set, completely different than SETUP
         LT.ST   local Time to Sidereal Time
         ST.LT   Sidereal Time to Local Time
         SUN     calculates the Sun's positions

            JULIA 

               Allows you to put a Julian day number instead of
               the calendar date and time. This is a little bit confusing
               way to define a given moment because it related to
               the Universal Time and the current Time Zone can
               affect that date so much that it differ from the Julian day
               which has been typed in.
               
          EXAMPLE:       
                             TZ (time zone) = -8  and DST= ON ( = 1 ) then
               by pressing JULIA and type a number 2448942.7 <enter> yields 
               following;
                           LT= 21.48 
                           JD0 = 2448941.5
                           JD  = 2448942.7
                           UT= 4.48 tomorrow
                           Sun Nov 15.1992  DN  (tough JD 2448942.5 is
                                             at 0 UT in November 16.1992)

               You find that UT = JD because the Julian day begins
               always at 12 UT in the calendar date and therefore at
               0 UT is the noon of Julian day and the fraction .7 .5 -
               = .2 represents the Universal Time.

               More confusing, if you then use the SETUP-menu and put
               the date 11 16 1992 to the DATE you will get the next
               things;
                           LT= 21.48
                           JD0 = 2448942.5
                           JD  = 2448943.7
                           UT= 4.48 tomorrow
                           Mon Nov 16.1992  321
               
               Again, JD and UT related together and LT, JD0 and 
               current date should represent the same date if all
               values have been set correct.
               You can update the time e.g. put 13 to the TIME-menu and
               you will get;
                            LT= 13
                            JD0 = 2448942.5
                            JD  = 2448943.33333
                            UT= 20 today
                            Mon Nov 16.1992 321

           In general, to the West longitudes, if LT >= 24+(-TZ+DST) then
           UT is situated to the next day.
           To the East longitudes, If LT < +TZ+DST then the UT is 
           situated the day before.


                SETUP < JUL.C or GRE.C > requirements for; 

     LT.ST  Local Time to Sidereal Time      : DATE TIME LONG ZONE DST
     ST.LT  Sidereal Time to Local Time      : DATE TIME LONG ZONE DST
     SUN    calculates the Sun's position    : DATE TIME LATIT LONG ZONE DST

        If you are using the JULIA-input then only LATIT, LONG, ZONE and 
        DST are required with it. These MUST set before JULIA.

        NOTE: Converting Sidereal Time to Local Time then the TIME
              represent that Sidereal Time we're are talking about
              and of course DATE, LONG, ZONE and DST belong to it too.


      OTHER EXECUTABLES file's input and output;

       ASCAL   it requires two number, you can't miss it.
               This calendar also searchs your calculator's alarms.
               However, there is a tiny quirk. If it finds the latest
               alarm then it reports all of them ?? 

       GSTR    a year number from stack, you will be see it.

       JSTR    a year number from stack.

       JDAY    three values, MM DD YYYY. results are Julian Day number
               and Day of a year. Uses the selected calendar.

       CADA    Type Julian day to the stack, result is a string
               contains calendar date.
               It check automatically the current calendar form.

       EOFT    Julian day number at 12 UT, ( i.e. no fraction part )
               result is Ephemeris Time.
               Takes Time Zone, Longitude and/or Dayligth Saving Time
               from current SETUP-variables. Therefore it is more
               desirable to beg it from the SUN-menu.

       EQSO    put month and year to the stack ( the months March, June
               September and December only ). Gives to the level 2
               a tagged object which is the time of the phenomenon at
               your local time. The accuracy is about ten minutes.
               On the level 1 is a string containing that date.

       GWUT    Julian day with decimals; yields two numbers, level 2
               is a tagged object; GW 0UT: this is valid only if
               entered Julian day is at 0 UT, otherwise it represents
               the mean Side real Time in the Greenwich at decimal of
               the Julian day number. Both numbers are actually same;
               the number level 2 is the form HH.MMSS and the other
               is in decimals.

       CONV    put ecliptical coordinates to stack. To level 2 ecliptical
               longitude and level 1 latitude. Yields 2 tagged objects.
               Takes the current Obliquity of the Ecliptic from somewhere.
               You can update it by running the SUN-menu.
               
        NOTE: CONV has not been purposed on reduction use, i.e. to reduce
              coordinates from one date to another. It does the conversion
              at the defined moment and before the conversion execution
              the SUN must be run at the same moment ( to update the
              Obliquity of the Ecliptic ).


    APPREVIATIONS of the main program

       GMST0:   mean Sidereal Time at 0 UT at the longitude of Greenwich
       GMST:    mean Sidereal Time at the defined time in Greenwich
       AST:     local Apparent Sidereal Time
       MST:     local Mean Sidereal Time at the defined time and longitude
       LT:      mean sidereal time converted to the Local Time

         NOTE:  For Apparent Sidereal Time you must execute the SUN-menu
                first to get better accuracy.
         NOTE:  You will get the Equation of Equinox to subract MST
                from AST (i.e. press [-]-button only).
         NOTE:  if the GMST = 0 then the LT  shows the Greenwich Transit
                of the Mean Equinox (when LT TZ and DST are all zero).

    SUN's results

  greek letter # lamda = Ecliptical longitude     dd.mmss
               #  beta = Ecliptical latitude      dd.mmss
               #  alfa = Right Ascension (R.A.)   hh.mmss      equatorial
               # delta = Declination (DECL)       dd.mmss      coordinates
                   Azi = Azimuth   dd.mmss    horizon
                   Alt = Altitude  dd.mmss    coordinates
                  Rise = rising time
                   Set = setting time
                     R = geocentric distance
                    LT = local time
                    SD = Sun's Semi Diameter in arc minutes  mm.ss
                 EPH.T = Sun's transit time over the South Meridian
             # epsilon = Obliquity of the Ecliptic  dd.mmss
         # delta # psi = Nutation in Longitude      dd.mmss
     # delta # epsilon = Nutation in Obliquity      dd.mmss

     EXAMPLE: Find the Sun's position and Equation of Equinox on 
              December 25 1992 at 0 UT ( LONGitude is -75 ).

          1.  Start the program by pressing START. ( how simple )
          2.  Go to the SETUP-menu
          3.  Press DATE and type 12 25 1992 <enter>.
          4.  Press TIME and set time to be same as the sum of TZ+DST
              e.g. TZ= -5 DST= OFF (=0) then type -5 <enter>
          5.  Press BACK
          6.  Press SUN and Wait ... ==>> GROB
          7.  Press ON and Wait ...
          8.  Press LT.ST
          9.  Press [-]  ==>> Eguation of Equinox

      To pass steps 2.-5. press JULIA and type 2448981.5 <enter>.
      This yields exactly the same ecliptical and equatorial coordinates
      as steps 2.-5. do. An other method to determine time at 0 UT is
      to put TIME, ZONE, LONG and DST to zero.

      SUN: FRI DEC 25.1992  0 UT  Nasir v1.2      Astronimical Almanac 1992

      Ecliptic long.    (lambda)  273.270446           273 27 05.20
      Ecliptic latit.   (beta)      0.0000                   +0".05
      Apparent R.A      (alfa)     18.150259            18 15 02.39
      Apparent decl.    (delta)   -23.234053           -23 23 40.6
      Distance          R           0.983466                   0.9835409
      SemiDiameter      SD         16.153177              16'15".70
      Ephemeris Transit EPH.T      12.001566            12 00 15.40
      Obliquity of the Ecliptic    23.262269           23 26'22".69
      Nutation in Longitude         0.001730                 17".352
      Nutation in Obliquity        -0.000205                 -2".044
      Mean Greenwich Sidereal Time  6.150086323          6 15 00.8632
      Equation of Equinox            .0001058204              +1.0613 sec.

       Compare these results with each other and I bet you can find
       the Sun from the sky by this program.
       This program ignore the dynamical time. All calculation are made
       in the Universal time i.e. it is your clock time at different
       time zones.

     ABOUT COORDINATES

       In here the ecliptical coordinates' zero point is the Earth's
       center (Geocentric). Zero direction to the longitude is vernal
       equinox growing counterclockwise from 0 to 360 degrees. 
       Reference plane to the latitude is Earth's orbit plane, is 
       called the ecliptic.
       
       The reference point of the right ascension is the direction of
       the vernal equinox ( the first point of Aries ). This happens 
       when the Sun is in this direction ( about March 21st, you can
       check it by EQSO and then put the given time and date to the
       TIME-menu and run the SUN-menu. The both coordinates, ecliptical
       longitude and Right Ascension, should be around zero at vernal
       equinoxes. It takes the current TZ and DST from somewhere so be
       sure you do not change them comparing the results to each other.
       ). R.A. gets all values counterclockwise from zero to 360 degrees
       but usually the degrees are converted to the 24-hour system as
       this program does.
       The reference plane of the declination is the Earth's equatorial
       plane. This number can get values -90 to +90 degress
       (in the case of the Sun this gets values about -23 to 23 ).

       This program counts the Azimuth  to the clockwise from the South
       on the northern hemisphere and from the North on the Southern hemis-
       phere and the values are between 0 and 360 degrees. E.g. if
       Azi= 90 deg. then the Sun is about in the West (if LATIT is positive).
       Altitude can have the values from -89.59... to 89.59... degrees
       where the zero plane is an observer's horizon plane.

       Distance unit is in the AU (=Astromical Unit = 1.49597870E11 meters ).

       The accuracy of the R.A. and Declination is few seconds within
       about two decade from the present -- to the past and future.


    REFERENCES

           Quarterly Journal of Royal Astronomical Society, 25(1),54(1984)
           The Astronomical Almanac 1991
           Practical Astronomy with Your Calculator, 3rd edition
           The Astrophysical Journal Supplement Series, 41:391-411,1979 Nov.
           Astronomical Algorithms, Jean Meeus 

END_DOC


BEGIN_ASC nasir.asc
%%HP: T(1)A(R)F(.); @ tasc v2.52 file
"69A20FF7A8B4000000108D10339201000000000000060B10002069D420339201
000000000000520D1000103910339201000000000004320B100020B95A203392
00000000000000040D100020A44420339206000000012345670D100030A44403
30339206000000076543210F10002044C420339200000000000000010D100020
45A520339200000000000000020D100020A47420C2A20B1000742756564796E6
76370212820003044354530C2A20D00000516C637C100020C445203392010000
00000000310D100020444520C2A20F200002020202269702B4164796023596E6
56E6D6161602C300020554520C2A2032000E416379627026713E223021393932
3030003064234330D9D20E163278BF133920100000000000042050FA1D6BB133
9201000000000000420EEDA190DA13CE2278BF14B2A2EBBE1AFE22D9D2033920
100000000000042076BA1B21305DF2293632B21303A0003064336330D9D20E16
3278BF133920200000000000063050FA1D6BB1339202000000000000630EEDA1
90DA13CE2278BF14B2A2EBBE1AFE22D9D2033920200000000000063076BA1B21
305DF2293632B21303A000404414543540D9D20E163247A208BA203392060048
9083261542033920500040473242563084E201005EEDA176BA13392030000000
0009615084E201005ED2A2D20B1EEDA176BA133920799000000000114084E201
0053F2A2D20B1EEDA190DA133920699000000000075084E201005803A2D20B1E
EDA190DA1B21308BA2033920600767656171542033920500030626142563084E
201005EEDA176BA133920200000000000523084E201005ED2A2D20B1EEDA176B
A133920799000000000888084E2010053F2A2D20B1EEDA176BA1339206990000
00000003084E201005803A2D20B1EEDA190DA1B21308BA203392060051712018
1542033920500076710242563084E201005EEDA176BA13392040000000005751
1084E201005ED2A2D20B1EEDA190DA133920799000000000733084E2010053F2
A2D20B1EEDA176BA133920699000000000087084E201005803A2D20B1EEDA176
BA1B21308BA2033920600259500091542033920500094047242563084E201005
EEDA176BA133920300000000003226084E201005ED2A2D20B1EEDA190DA13392
0799000000000328084E2010053F2A2D20B1EEDA190DA1339206990000000000
23084E201005803A2D20B1EEDA176BA1B2130B213093632B2130E9300404414D
4F44047A20C2A20D00003557E602C2A20D0000D4F6E602C2A20D000045575602
C2A20D000075564602C2A20D000045865702C2A20D000064279602C2A20D0000
35164702C2A20B00003557E6C2A20D0000A416E602C2A20D000064562602C2A2
0D0000D4162702C2A20D000014072702C2A20D0000D4169702C2A20D0000A457
E602C2A20D0000A457C602C2A20D000014577602C2A20D000035560702C2A20D
0000F4364702C2A20D0000E4F66702C2A20D000044563602B2130C7100403414
C4354047A208BA2033920300000000000196084E20207435CA4B1EEDA1339201
000000000000270ED2A284E20207435EEDA1CA4B1EEDA176BA13392010000000
0000071084E201045EEDA184E20207435CA4B1EEDA190DA1743A284E20207435
84E2020744390DA1505B1EEDA190DA1233A284E2020C49384E2020C43590DA1C
A4B1EEDA176BA1D13A2803A284E20207435EEDA1C53A284E20207433EEDA190D
A13F2A284E20207443EEDA176BA1CA4B1EEDA176BA1D13A2ED2A284E20207435
EEDA1ED2A284E20207423EEDA190DA1505B1EEDA190DA1803A284E2020743584
E2020742390DA1CA4B1EEDA190DA1803A2803A284E20207435EEDA1C53A284E2
0207433EEDA190DA13F2A284E20207443EEDA176BA1505B1EEDA176BA13F2A2E
D2A284E20207435EEDA1ED2A284E20207423EEDA190DA1CA4B1EEDA176BA13F2
A284E20207443CA4B1EEDA190DA13F2A2ED2A284E20207435EEDA1ED2A284E20
207443EEDA190DA1CA4B1EEDA190DA1B21308BA2033920000000000410001033
920899000000005761084E20207435505B1EEDA190DA13392069900000000004
10ED2A284E20207435EEDA1505B1EEDA190DA1B2130B21306730040141425354
0D9D20E16323392010000000000006195D2C184E202035453392010000000000
00510EEDA184E2010C890DA11C432D6E201086E1632D6E201086505B184E2010
29505B184E20108DCA4B1EEDA1EEDA184E201029CA4B184E20108D505B1EEDA1
90DA1D6E201086CA4B184E201029505B1EEDA166ED1339201000000000000619
472C160DD184E2030643363E1FB14563284E20101497632DCC028DBF1D6E2010
86505B184E201029505B184E20108D505B1EEDA1EEDA184E20108DCA4B184E20
1029CA4B1EEDA176BA14A6B1E1FB14563284E20101697632DCC0233920999000
0000033389CA4B184E201029505B184E20108D505B1EEDA150FA184E201029E5
5B184E20108DE55B1EEDA190DA178BF13392010000000000006195D2C13CE22F
1AA19C2A2D5CE1AFE22D9D208DBF13CE2284E2010164B2A2D5CE1AFE22C2A209
100034F6E64796E657F657375BF22C2A2090000E4F65DF22C2A2091000078656
E6F6D656E6F6E6B21305BF22D9D20F27B133920100000000000051050FA184E2
020544592CF190DA184E2030642343E1FB1DBBF184E2020544576BA184E20306
42343E1FB1B21305DF224563284E2020355497632DCC024563284E2020259497
632DCC02EF53293632B21302A300403544256540D9D20E163233920100000000
00006195D2C1233A2AE3C1C2A20D00006902D30284E20206935E1FB176BA1C2A
20D10000202FD02D30203E20303030376BA1C2A20F0000C802D3020284E2010C
833920100000000000051050FA1E1FB176BA1C2A201100002022902D30284E20
1029E1FB176BA176BA1C2A201100014A59402D30284E20101476BA1C2A205100
0020214C44502D30284E20101676BA176BA1C2A20310002594355402D30284E2
020259476BA1C2A20310000235544502D30284E2020355476BA176BA1C2A20D0
0002502D30284E20102776BA1C2A20B1000020202020202354402D3023392010
0000000009951084E20102750FA1E1FB176BA176BA1C2A2051000540584E2450
2D30284E20205445E1FB176BA1C2A20310000202023902D30284E201039E1FB1
76BA176BA1C2A20F0000B95A02D30284E2020B95AE1FB176BA1C2A2031000020
2B93902D30284E2020B939E1FB176BA176BA1F52E13392000000000000007693
39200000000000000560126E1683A2339200000000000000580146E1C2A20F00
003555E4A30284E2020444576BA1C2A201100002C44502D30284E2020C445E1F
B176BA176BA1684C19C2A2DA5E1634E1DCC02634E104B029C2A2743A20A132D6
E2010A6339200000000000000569D6E2010A666ED1E0CF19C2A2DA5E1654E1C4
232634E1DCC0247A20B21300F2E193632B2130A040040D494353440D9D20E163
2684C1858A1C2A20510007516964702E2E2E29C2A2485A184E2030A4440384E2
0407475554584E2020C44584E202045A590DA184E202044C490DA13392000053
90973720010EEDA176BA184E202069D433920100000000000051050FA176BA18
4E20306423434563284E2020354597632DCC028DBF184E2020A4443392060000
0005451542090DA178BF14563284E20103497632DCC023392040000000005256
3050FA14563284E20104797632DCC0284E2010479C2A276BA14563284E201045
97632DCC0233920999000000434606033920900009210110663084E201034EED
A176BA133920500000000270977033920800000139097372084E201034EEDA17
6BA133920500000000621399033920799000058777372084E201034EEDA176BA
133920999000000320041033920800000371630544084E201034EEDA176BA133
920400000000065835033920800000723165541084E201034EEDA176BA133920
400000000013565033920700000039808032084E201034EEDA176BA147A2084E
2020744384E2020743384E2020742384E2020743584E2020C43584E2020C493B
2130993C11C432D6E201096E16329C2A2233A20A132D6E2010A63ABB13392020
00000000000630EEDA1D6E201096D6E2010A66C7D1DCC02C4232339202000005
55440521033920300094816314391084E201047EEDA190DA1339204000000000
26702084E201047ED2A2D20B1EEDA176BA184E2010473F2A2D20B13392050000
0000014764050FA176BA184E201047803A2D20B133920700000000061606050F
A176BA14563284E2010D997632DCC0233920799000000000271984E2010D9CA4
B1EEDA1339206990000000002310ED2A284E2020C435EEDA1CA4B1EEDA190DA1
339205990000000000320ED2A284E2020C493EEDA1CA4B1EEDA190DA13392010
00000000000120ED2A284E2010D9EEDA1CA4B1EEDA176BA1E3FB14563284E202
0B95A97632DCC0233920100000844126232033920799000000051864084E2010
47EEDA190DA133920299000000000095084E201047ED2A2D20B1EEDA190DA133
920399000000003181084E2010473F2A2D20B1EEDA176BA1E3FB133920100000
000000029084E2010D9505B1EEDA1339201000000000000750ED2A284E2020C4
35EEDA1505B1EEDA176BA1339205990000000000010ED2A284E2020C493EEDA1
505B1EEDA176BA1339204990000000000090ED2A284E2010D9EEDA1505B1EEDA
190DA1E3FB178BF14563284E2020B93997632DCC0276BA14563284E201039976
32DCC0284E20403414C435B7FC18DBF1EB3A14563284E20102797632DCC02EB3
A133920300000000000063050FA184E2020C43576BA184E203064336384E2020
B95A33920799000000000025084E20102750FA190DA176BA14563284E2020693
597632DCC02EF53293632B2130F280050355445550550D9D20E163247A2047A2
0C2A20D000044144554D9D20E1632C2A20D200044144554D266F627D602D4D40
244440295959595C2A2011000A344144554A3AC422B7FC184E2040A444149545
63284E202044E497632DCC0233920999000000000005090DA14563284E2030A4
440397632DCC0284E2030A4440384E2020C44584E202045A590DA184E202044C
490DA133920100000000000042050FA176BA14563284E2020A44497632DCC028
4E2030A4440384E2040341444144563284E2020444597632DCC0284E2040E4F4
651493632B2130B213047A20C2A20D00004594D454D9D20E1632C2A20B200045
94D454D266F627D61647028484E2D4D43535C2A2011000A3C4F23545A3AC422B
7FC1E3FB178BF184E202045A590DA184E202044C490DA1339201000000000000
42050FA184E2030A4440376BA14563284E2020A44497632DCC024563284E2020
C44597632DCC0284E20403484554584E2040E4F4651493632B2130B213047A20
C2A20D0000C4F4E474D9D20E1632C2A20F2000C4F6E67696475746560296E602
46563696D616C637C2A2032000A07556374702E656761647966756A076BA1C2A
20B0000A369A3AC422B7FC14563284E202069D497632DCC0284E2040E4F46514
93632B2130B213047A20C2A20F0000C414459445D9D20E1632C2A20D2000C416
4796475746560296E60246563696D616C637C2A2012000A0D2930302C3028D02
C3029303A076BA1C2A20B0000A38DA3AC422B7FC14563284E20108D97632DCC0
284E2040E4F4651493632B2130B213047A20C2A20D0000A5F4E454D9D20E1632
C2A20D200094E647567656270202D21323020247F602021323C2A2091000A075
563747D3E65676A076BA1C2A20B1000A34596D65602A5F6E656A3AC422B7FC14
563284E202045A597632DCC0284E2030A4440384E2020C44584E202045A590DA
184E202044C490DA133920100000000000042050FA176BA14563284E2020A444
97632DCC0284E2040E4F4651493632B2130B213047A20C2A20D0000241434B4D
9D20E16324B2A26911284E2040E4F4651493632B2130B213047A20C2A20F0000
44C4E2F4E4D9D20E1632C2A2090000F4E44563284E203044354597632DCC029C
2A24563284E202044C497632DCC0284E2040E4F4651493632B2130B213047A20
C2A20F000044C4F46464D9D20E1632C2A20B0000F464644563284E2030443545
97632DCC024B2A24563284E202044C497632DCC0284E2040E4F4651493632B21
30B213047A20C2A20F0000A455C4E234D9D20E1632C2A205100002A457C69616
E6024563284E2020A47497632DCC0284E2040E4F4651493632B2130B213047A2
0C2A20F0000742554E234D9D20E1632C2A209100074275676F6279616E602456
3284E2020A47497632DCC0284E2040E4F4651493632B2130B2130B2130D51128
4E2040E4F4651493632B213093800403484554540D9D20E163284E2020C44584
E202045A590DA184E202044C490DA11C432D6E201055E1632D6E20105584E203
0642343E1FB13CE22D6E2010554B2A2EBBE1D6E2010553392010000000000004
20B9DE1908E1AFE22D9D2047A20C2A209100002975637475627461697C2A2050
000C2A20710000247F6D6F62727F677B2130D6E201055A23B1ED2A276BA16C7D
1B21305BF22C2A20110000247F64616975DF2276BA14563284E2020554597632
DCC02EF53293632B21307710040E4F4651440D9D20E1632684C184E2020A474C
2A20310000202443545D30284E203044354576BA176BA1C2A20F0000A045A5D3
0284E202045A576BA1C2A20110000202C445D30284E2020C445E1FB176BA176B
A176BA1C2A2031000A0A4440302D30284E2030A4440376BA176BA1C2A2031000
A0A4440202D30284E2020A44476BA176BA1C2A20F0000A05545D30284E202055
4576BA176BA1C2A2070000A084E20204445C2A2090000020284E202044E476BA
176BA176BA176BA1C2A20D0000A069A30284E202069D476BA176BA1C2A20F000
002028DA30284E20108D76BA176BA1858A19C2A2485A13F2A24A5A193632B213
08E1004034F4E46540D9D20E16323392010000000000006195D2C11C432D6E20
10C6D6E201026E1632D6E2010C6505B1D6E2010C6CA4B184E201039505B1EEDA
1D6E201026E55B184E201039CA4B1EEDA190DA166ED133920100000000000061
9472C160DD184E2030643363DBBF18DBF1C2A20900002514EB522D6E201026CA
4B184E201039505B1EEDA1D6E201026505B184E201039CA4B1D6E2010C6CA4B1
EEDA1EEDA176BA14A6B1C2A20D0000445434C4EB522339201000000000000619
5D2C1EF53293632B2130E810040541535F440D9D20E1632C2A20D20005417579
6E6F6870216E6460235F6C63747963656C2A2071000A3D4D40295959595A3AC4
22B7FC11C432D6E2010D4D6E201095E1632D6E2010D43F2A250FA13ABB13CE22
4B2A2279E1AFE22D9D20D6E20109533920300000000000002090DA1339203000
00000000001050FA14563284E20100597632DCC0284E204044145435D6E2010D
43F2A250FA16C7D1EB3A14563284E20100597632EFE0278BF13ABB1339201000
000000000420EEDA133920100000000000021076BA184E202045A576BA184E20
2044C476BA184E203064234378BF1E1FB1C2A2090000C445EB522E0CF1E0CF18
4E202045A590DA184E202044C490DA133920100000000000042050FA190DA184
E204034144414B21305DF22EF53293632B2130D4200407475554540D9D20E163
233920600000005451542090DA133920400000000052563050FA178BF178BF13
F2A2D20B1339204990000000000269EEDA1339208990000000401390E0CF1ED2
A2D20B1EEDA176BA1339206007821848104680E0CF1EEDA176BA133920400001
484501142076BA133920300000000000063050FA184E203064234378BF1E1FB1
C2A20F000074D4354503EB522DBBF193632B2130D31004054F4644540D9D20E1
63233920600000005451542090DA1339208000001390973720EEDA1339205000
00000270977076BA13ABB1339202000000000000630EEDA184E20306433631C4
32D6E2010C4E16328BA20339202000000000026019D6E2010C4CA4B1EEDA1339
202000000000026950ED2A2D6E2010C4EEDA1CA4B1EEDA176BA1339200000000
0000004403F2A2D6E2010C4EEDA1CA4B1EEDA176BA1339201000000000007210
803A2D6E2010C4EEDA1CA4B1EEDA190DA1339202000000000098240D6E2010C4
505B1EEDA190DA1339200000000000000120ED2A2D6E2010C4EEDA1505B1EEDA
190DA13392010000000000039103F2A2D6E2010C4EEDA1505B1EEDA176BA1B21
30EB3A133920300000000000063050FA1339201000000000000210DBBF190DA1
84E202045A584E202069D433920100000000000051050FA190DA176BA184E202
044C476BA1EF53293632B2130CA200403414441440D9D20E1632684C14B2A255
DB11C432D6E2010A4E1632D6E2010A49C2A276BA1743A250FA13ABB1743A2EED
A14B2A255DB19C2A276BA184E20404414D4F4DBBF16C7D13CE2284E2020A4748
B9C1339201000000000000010279E1AFE22D9D20D6E2010A4339203000000000
59744090DA133920400000005242563050FA1D6BB1339209990000000000570E
EDA1D13A276BA1D6BB133920100000000000073090DA1D6E2010A476BA1B2130
5BF22D6E2010A45DF2278BF133920100000000005295090DA133920200000000
0525630D4EB1D6BB178BF1D13A276BA133920100000000000603050FA1D6BB1E
D2A276BA1339201000000000000210D4EB1173A276BA184E20404414D4F4DBBF
16C7D1DBBF133920999000000000005076BA1339201000000000006030D4EB1D
6BB19C2A276BA1E0CF133920200000000052563050FA1D6BB133920300000000
002174090DA178BF1F1AA178BF1339201000000000000010DBBF1B0BC18B9C17
8BF1AE3C1D20B150FA1E0CF176BA1DBBF1A23B1EEDA1B0BC176BA176BA1684C1
EF53293632B21301330040A444149540D9D20E1632684C11C432D6E2010D6D6E
201044D6E201065E1632D6E201044D6E2010D63CE223F2A2B9DE1AFE22D9D20D
6E2010D63F2A290DA1D6E201065B21305BF22D9D20D6E2010D6173A276BA1D6E
2010659C2A290DA1B21305DF2278BF133920300000000002174076BA13392020
00000000525630EEDA1D6BB1DBBF133920200000000000001050FA1339201000
00000000094076BA1D6BB1339209990000000000570EEDA1D6BB133920100000
000000083090DA1D6E2010651C432D6E201044D6E2010D6D6E201097D6E20107
6D6E201075E1632D6E201097D6E2010D6339201000000000006030EEDA133920
999000000000005076BA1D6BB1339201000000000000950D6E20104476BA176B
A176BA178BF1D6E20107690DA1C2A20110007427563416C6EB522DBBF1C2A201
1000A457C63416C6EB5223CE2284E2020A4748B9C1339201000000000000010E
BBE1AFE22D9D20DBBF18DBF178BF14B2A2B21305BF22D9D208DBF178BF1D6E20
10759C2A290DA133920200000000000001050FA133920100000000000094076B
A1D6BB1339201000000000000570EEDA1D6BB133920100000000000083090DA1
B21305DF22D6E2010759C2A290DA133920300000000002174076BA1339202000
000000525630EEDA1D6BB133920200000000000563076BA1DBBF190DA190DA1C
2A2011000441697E457D6EB522EF532EF53293632B2130A140040A435452540D
9D20E1632684C11C432D6E201097E1632D6E201097803A2D4EB1ED2A2EEDA1D6
E201097743A2D4EB1803A2EEDA176BA1D6E201097339201000000000000910D4
EB1339201000000000000910EEDA133920100000000000051076BA1339201000
000000000030D4EB1DBBF192CF190DA133920100000000000043076BA1743A2D
4EB133920200000000000411076BA176BA178BF133920100000000000013050F
A1D6BB147A20C2A2011000D41627368602C2A201100014072796C602B2130DBB
F1ED2A290DA16C7D1DBBF1339201000000000000130D4EB19C2A276BA1D6E201
097F1AA1339201000000000000010D6E201097F1AA1B0BC18B9C178BF1AE3C1D
20B150FA176BA1D6E201097A23B1EEDA1B0BC176BA1684C1C2A20F1000A457C6
9616E602541637475627EB522EF53293632B213057200407435452540D9D20E1
632684C11C432D6E201097E1632D6E201097339201000000000000910D4EB1D6
E201097339202000000000000010D4EB1D6E2010973392020000000000000105
0FA1D6BB178BF178BF1803A2D4EB1ED2A2EEDA1DBBF1803A250FA1D6BB1E0CF1
78BF178BF1C53A276BA133920100000000000052050FA1D6BB190DA19C2A276B
A13F2A250FA1D6BB1DBBF1E0CF190DA1DBBF190DA1803A2A9CF1339201000000
000000910EEDA176BA133920100000000000051076BA13392010000000000000
30D4EB1E0CF178BF1803A250FA1D6BB1ED2A2EEDA1DBBF1803A2D4EB1DBBF13F
2A2A9CF190DA1DBBF190DA1E0CF176BA133920100000000000023076BA1743A2
D4EB178BF1339201000000000000220EEDA13F2A2A9CF1339201000000000000
110EEDA176BA1803A25BCF176BA133920200000000000154050FA1D6BB1743A2
EEDA1E0CF1E0CF176BA1DBBF190DA133920200000000000411076BA178BF1339
20100000000000013050FA1D6BB1DBBF1339201000000000000130D4EB19C2A2
76BA11C432D6E2010D4D6E201044E163247A20C2A2011000D41627368602C2A2
01100014072796C602B2130D6E2010D4ED2A290DA16C7D1D6E201044D6E20109
7F1AA1339201000000000000010D6E201097F1AA1B0BC18B9C178BF1AE3C1D20
B150FA176BA1D6E201097A23B1EEDA1B0BC176BA1684C1D6E2010D43CE22803A
2EBBE1AFE22D9D20D6E20104433920100000000000022090DA178BF13CE224B2
A2279E1AFE22D9D208DBF1C2A201100014072796C60233920100000000000003
0B21305BF22D9D20C2A20D0000D4169702DBBF1B21305DF22B21305BF22D9D20
D6E201044173A276BA178BF13CE22339201000000000000130D5CE1AFE22D9D2
0C2A20F0000A457E65602DBBF133920100000000000013090DA1B21305BF22D9
D20C2A20D0000D4169702DBBF1B21305DF22B21305DF22B0BC176BA1C2A20F10
0014373656E63796F6E602441697EB522EF532EF53293632B21308C500501435
3414C450D9D20E16323392010000000000006195D2C133920100000000000091
9472C1C2A20D2000024597075602D4F4E445840216E6460295541425C2A20710
00A3D4D40295959595A3AC422B7FC11C432D6E2010D6D6E201097E16323CE22D
6E2010D64B2A2279E1D6E2010D6339201000000000000310B9DE1908E1AFE22D
9D20C2A20920001427560297F6570216E60214C69656E602F3933A1B21305DF2
2D6E2010D69C2A2D6E20109784E2040A444149592CF13F2A276BA1743A250FA1
3ABB1743A2EEDA14B2A255DB19C2A276BA176BA1743A250FA14B2A255DB1F52E
1683A2339201000000000000930126E14B2A2339201000000000000420146E18
58A1C2A20F200014023616C656E6461627026713E20302269702B4359C2A2485
A177920000000000000000000000000000000007792000000000000000001000
0000000001207792000000000000000300000000000000000779200000000000
0000301000000000000120779200000000000000080000000000000000077920
0000000000000080000000000000003077920000000000000000000000000000
0000077920100000000000031000000000000000007792000000000000000800
0000000000000007792000000000000000800000000000000030779201000000
000000310000000000000000077920100000000000031000000000000000309C
2A2233A20A132D6E2010A6893E1C42329C2A2743A20A132D6E2010A633920100
0000000000830D6E2010A63F2A2EEDA166ED14B2A2D6E2010A63F2A2EEDA166E
D1893E1339201000000000000340D6E2010A6D13A2EEDA190DA13F2A266ED133
9201000000000000340D6E2010A6D13A2EEDA190DA1339201000000000000120
66ED1893E1C4232634E104B029C2A2743A20A132D6E2010A6339200000000000
000119D6E2010A6D13A2EEDA176BA133920100000000000302066ED184E20404
414D4F4D6E2010A69C2A276BA16C7D19C2A2DA5E1654E1C4232DBBF178BF13CE
224B2A2279E1AFE223392010000000000002505BF2278BF15DF229C2A2DA5E1E
0CF17792099900000000000501000000000000710E0CF1654E17792000000000
00000070100000000000532084E2020A47484E20404414D4F4D6E2010D6C53A2
76BA16C7D1D6E201097B0BC176BA176BA19C2A2DA5E1654E1DBBF19C2A276BA1
78BF178BF178BF178BF1233A25BCF14B2A2803A20A132D6E2010A63392099900
00000000050339201000000000000410D6E2010A63F2A2EEDA190DA166ED1E0C
F1D6E2010A676BA19C2A2DA5E1654E1C42323392010000000000002495D2C1DB
BF178BF19C2A276BA1743A250FA13ABB1743A2EEDA14B2A255DB14563284E201
03697632DCC029C2A24563284E20107797632DCC029C2A2D6E2010D676BA19C2
A2D6E20109784E2040A44414958DBF1DBBF190DA13CE22D6E201097339203000
000000019910CFCE1D6E201097339203000000000099020B9DE1908E1AFE22D9
D209C2A2DBBF1C2A20F200014C61627D602465647563647024696371626C6564
69C2A2485A1B21305BF22D9D2078BF1D6E20109733920600000000000001050F
A178BF133920899000000000001076BA1D6E2010D676BA1DBBF1E0CF13392020
0000000000001050FA176BA1D6E2010D676BA1339201000000009595320ED2A2
387C184991DBBF18499190DA178BF13CE224B2A2279E1AFE22D9D208DBF1DBBF
17792010000000000009100000000000000020C2A2090000E4F6B21305BF22D9
D20E0CF17792010000000000009100000000000000020E0CF1F1AA1B0BC1B213
05DF22C2A20310000216C61627D63776BA19C2A2DA5E1654E19C2A2E0CF1B213
05DF220A132D6E2010A63CE2284E2010364B2A2D9AE184E201036743A2D9AE13
87E1AFE22D9D2084E201036D13A2EEDA133920000000000000031090DA133920
100000000000002084E2010773F2A2EEDA190DA166ED1D6E2010A69C2A2DA5E1
654E184E2010369C2A276BA14563284E20103697632DCC02B21305BF22D9D203
3920100000000000733033920100000000000002084E2010773F2A2EEDA190DA
166ED1D6E2010A69C2A2DA5E1654E19C2A24563284E20103697632DCC0284E20
10779C2A276BA14563284E20107797632DCC02B21305DF22C4232634E1DCC024
7A20B21300F2E147A2084E20107784E20103684E204005051425B2130EFE02EF
53293632B213039C00603545142545E260D9D20E163284E2040E4F4651447A20
47A20C2A20F00003554455505D9D20E1632BECF184E2050355445550593632B2
130B213047A20C2A20F0000A455C49414D9D20E1632BECF14563284E202044E4
97632EFE02C2A20B2000A457C69616E602441697E2662716364796F6E6C2A201
1000A3A4441495A3AC422B7FC178BF178BF14563284E2020A44497632DCC023A
BB1339201000000000000420EEDA133920100000000000021076BA184E202045
A576BA184E202044C476BA184E20306423434563284E2020C44597632DCC0284
E2020C44584E202045A590DA184E202044C490DA133920100000000000042050
FA190DA14563284E2030A4440397632DCC0284E20403484554584E2030A44403
84E2040341444144563284E2020444597632DCC0284E2040E4F4651493632B21
30B213047A20C2A20F0000C445E23545D9D20E1632BECF184E2030A4440384E2
0407475554584E2020C44584E202045A590DA184E202044C490DA13392000053
90973720010EEDA176BA184E203064234378BF1E1FB1C2A20D000074D43545EB
522DBBF184E202069D433920100000000000051050FA176BA184E20306423437
8BF184E2020B95A84E201039505B1EEDA133920100000000000051050FA176BA
1E1FB1C2A20B0000143545EB522DBBF1E1FB1C2A20B0000D43545EB52293632B
2130B213047A20C2A20F00003545E2C445D9D20E1632BECF184E2030A4440384
E20407475554584E2020C44584E202069D433920100000000000051050FA190D
A184E203064234378BF1E1FB1C2A20D000074D43545EB522DBBF1E0CF190DA18
4E2030642343339200100336659627990EEDA1E1FB184E202045A576BA184E20
2044C476BA184E2030642343C2A2090000C445EB52293632B2130B213047A20C
2A20B00003555E4D9D20E1632BECF184E2030A44403339209990000000000050
76BA184E204054F464454563284E2020544597632DCC0284E2040D494353484E
202069354B2A284E204034F4E4654563284E20102997632DCC024563284E2010
C897632DCC0284E20401414253584E20403544256547A2084E2020355484E202
0259484E2010C884E20102984E2020693584E20102784E2020B93984E2010D98
4E2020744384E2020743384E2020742384E2020743584E2020C43584E2020C49
384E20104584E2020354584E20104784E20103484E2020544584E20101484E20
101684E202044E484E204005051425B2130EFE0284E2040E4F4651493632B213
0B2130B2130D511293632B213083B7"
END_ASC
Technical Details
Message-ID: <cshp48-v06i009=nasir_ks.211153@seq.uncwil.edu>
Path: arc1-ca.pugleaf.net!sparky!uunet!seq!spell

Show Full Headers
Complete Article Headers
Newsgroups: comp.sources.hp48
Path: arc1-ca.pugleaf.net!sparky!uunet!seq!spell
From: K. Sinenmaa <sinenmaa@cc.helsinki.fi>
Subject:  v06i009:  nasir_ks - Nasir Astronomical time application v1.2, Part01/02
Message-ID: <cshp48-v06i009=nasir_ks.211153@seq.uncwil.edu>
Followup-To: comp.sys.hp48
Sender: spell@seq.uncwil.edu (Chris Spell)
Organization: University of Helsinki
Date: Wed, 29 Jul 1992 01:13:16 GMT
Approved: spell@seq.uncwil.edu
Lines: 709