KPL/PCK

P_constants (PcK) SPICE kernel file
===========================================================================

        By: Nat Bachman (NAIF)    1997 November 19


Organization
--------------------------------------------------------

     The contents of this file are as follows.

     Introductory Information:

         --   Version description

         --   Disclaimer

         --   Sources

         --   Explanation

         --   Body numbers and names

     Pck Data:

         --   Orientation constants for the Sun and planets

         --   Orientation constants for satellites

         --   Orientation constants for asteroids Gaspra and Ida

         --   Radii of Sun and planets

         --   Radii of satellites, where available

         --   Radii of asteroids Gaspra and Ida


Version description
--------------------------------------------------------

     This file was created on November 19, 1997.  This is a
     "bug fix" release which corrects errors found in the
     previous version of this file:  PCK00005.TPC, released
     June 25, 1995.  A corrections have been made to the W0 term
     for Metis; the value published in the 1994 IAU report was
     incorrect.  Also, corrections have been made to the assignments
     of values for Phobos:  the RA, Dec, and W assignments for
     Phobos had extraneous trailing zeros in their coefficient sets,
     and the nutation precession coefficient sets lacked a final
     set of trailing zeros.  This error caused incorrect evaluation
     of Phobos's orientation on some computer systems.

     The data in the file are based primarily on the `Report
     of the IAU/IAG/COSPAR Working Group on Cartographic
     Coordinates and Rotational Elements of the Planets
     and Satellites:  1994'.  See `Sources' below for details.

     This file contains updates of constants contained in the
     previous version of the file, plus data for the asteroids
     Gaspra and Ida.

     The use of the `PCK_version' kernel variable has been
     discontinued.  The previous file version was pck00004.tpc.


Disclaimer
--------------------------------------------------------

     This constants file may not contain the parameter values that
     you prefer. Note that this file may be readily modified by
     you or anyone else. NAIF suggests that you inspect this file
     visually before proceeding with any critical or extended
     data processing.

     NAIF requests that you update the `by line' and date if you
     modify the file.


Sources
--------------------------------------------------------

     The sources for the constants listed in this file are:

         1.   `Report of the IAU/IAG/COSPAR Working Group on
              Cartographic Coordinates and Rotational Elements of
              the Planets and Satellites: 1994', to be published.

         2.   `The Astronomical Almanac', 1993.

         3.   `Planetary Geodetic Control Using Satellite
              Imaging', Journal of Geophysical Research, Vol. 84,
              No. B3, March 10, 1979, by Thomas C. Duxbury. This
              paper is cataloged as NAIF document 190.0.

         4.   Letter from Thomas C. Duxbury to Dr. Ephraim
              Lazeryevich Akim, Keldish Institute of Applied
              Mathematics, USSR Academy of Sciences, Moscow, USSR.
              This letter is catalogued as NAIF document number
              195.0.

         5.   `Geophysical Coordinate Transformations', by Christopher
              T. Russell.  Cosmic Electrodynamics 2 (1971) 184-186.
              NAIF document 181.0.


         6.   `Placeholder' values were supplied by NAIF for some radii
              of the bodies listed below:

                 Body      NAIF ID code
                 ----      ------------
                 Thebe     514
                 Metis     516
                 Helene    612
                 Larissa   807

              See the discussion below for further information.


         7.   The correct value of the Metis W0 term is given in JPL IOM
              312.F-97-059 "Revised rotation angle for Jupiter satellite
              516 Metis," September 16, 1997, by J. H. Lieske.


     Most values are from the `IAU/IAG/COSPAR Working Group on
     Cartographic Coordinates and Rotational Elements of the
     Planets and Satellites: 1994'. All exceptions are commented
     where they occur in this file. The exceptions are:


         --   Radii for the Sun are from [2].

         --   The values for the latitude and longitude of the
              Northern hemisphere projection of the Earth's magnetic
              dipole are from [5].

         --   The second nutation precession angle (M2) for Mars is
              represented by a quadratic polynomial in the 1994
              IAU report. The SPICELIB subroutine BODEUL can not
              handle this term (which is extremely small), so we
              truncate the polynomial to a linear one.

         --   The expressions for the pole and prime meridian of
              Neptune given in the IAU report include
              trigonometric terms which BODEUL doesn't yet handle.
              We omit these terms.  See the comments accompanying the
              data for Neptune for further information.

         --   For several satellites, the 1994 IAU report either gives a
              single radius value or a polar radius and a single equatorial
              radius.  NAIF Toolkit software that uses body radii expects
              to find three radii whenever these data are read from the kernel
              pool.  In the cases listed below, NAIF has supplied an
              additional radius value in order to allow the software to
              function.  Wherever this was done, the fact has been noted,
              and comments indicate which radius values were given by
              the IAU report.  The `invented' values were created by NAIF
              and should not be used in any application requiring values
              sanctioned by an authoritative source.

              The affected satellites are:

                 Body      NAIF ID code
                 ----      ------------
                 Thebe     514
                 Metis     516
                 Helene    612
                 Larissa   807


         --   The W0 term for Metis is from [7].


     `Old values' listed are from the SPICE P_constants file
     dated June 25, 1990.  Most of these values came from the
     1988 IAU report.




Explanation
--------------------------------------------------------

     The NAIF Toolkit software that uses this file is documented in
     the NAIF `Required Reading' file PCK.REQ. See that document
     for a detailed explanation of the NAIF text kernel file format.
     PCK.REQ is available in both printed and electronic form.

     This file, which is logically part of the SPICE P-kernel,
     contains constants used to model the orientation and shape of
     the Sun, planets, and satellites. The orientation models
     express the direction of the pole and location of the prime
     meridian of a body as a function of time. The shape models
     represent all bodies as ellipsoids, using two equatorial
     radii and a polar radius. Spheroids and spheres are obtained
     when two or all three radii are equal.


Orientation models

     All of the orientation models use three Euler angles to
     describe body orientation. To be precise, the Euler angles
     describe the orientation of the coordinate axes of the
     `Body Equator and Prime Meridian' system with respect to
     an inertial system.  By default, the inertial system is
     J2000 (also called `EME2000'), but other frames can be
     specified in the file.  See the PCK Required Reading for
     details.

     The first two angles, in order, are the right ascension and
     declination (henceforth RA and DEC) of the north pole of a
     body as a function of time. The third angle is the prime
     meridian location (represented by `W'), which is expressed
     as a rotation about the north pole, and is also a function of time.

     For the Sun and planets, the expressions for the north pole's
     right ascension and declination, as well as prime meridian location,
     are always (as far as the models that appear in this file are
     concerned) quadratic polynomials, where the independent variable is
     time. Some coefficients may be zero.

     In this file, the time arguments in expressions always refer
     to Barycentric Dynamical Time (TDB), measured in centuries or
     days past the a reference epoch.  By default, the reference
     epoch is the J2000 epoch, which is Julian ephemeris date
     2451545.0, but other epochs can be specified in the file.  See
     the PCK Required Reading for details.


     Example:  1991 IAU Model for orientation of the Earth.   Note that
     these values are used as an example only; see the data area below
     for current values.


        alpha   =   0.00 - 0.641 T             ( RA )
             0

        delta   =  90.0  - 0.557 T             ( DEC )
             0

        W       =  190.16 + 360.9856235 d      ( Prime meridian )


        T represents centuries past J2000 ( TDB ),

        d represents days past J2000 ( TDB ).

     In this file, the polynomials' coefficients above are assigned to the
     symbols

        BODY399_POLE_RA
        BODY399_POLE_DEC
        BODY399_POLE_PM

     as follows:

        BODY399_POLE_RA        = (    0.      -0.641         0. )
        BODY399_POLE_DEC       = (  +90.      -0.557         0. )
        BODY399_PM             = (  190.16  +360.9856235     0. )

     Note the number `399'; this is the NAIF ID code for the Earth.

     You'll see an additional symbol grouped with the ones listed here; it
     is

        BODY399_LONG_AXIS

     This term is zero for all bodies except Mars. It represents the offset
     between the longest axis of the triaxial ellipsoid used to model a
     body and the prime meridian of the body.

     Expressions for satellites are a little more complicated; in addition
     to polynomial terms, there are trigonometric terms. The arguments of
     the trigonometric terms are linear polynomials. In this file, we call
     the arguments of these trigonometric terms `nutation precession
     angles'.

     In this file, the polynomial expressions for the nutation precession
     angles are listed along with the planet's RA, DEC, and prime meridian
     terms.

     Example: 1991 IAU nutation precession angles for Earth.  Note that these
     values are used as an example only; see the data area below for current
     values.

        E1 = 125.045 -  0.052992 d
        E2 = 250.090 -  0.105984 d
        E3 = 260.008 + 13.012001 d
        E4 = 176.625 + 13.340716 d
        E5 = 357.529 +  0.985600 d

        d represents days past J2000 ( TDB )

     Because the NAIF Toolkit software expects the time units for the
     angles to be CENTURIES (as in the IAU models for most bodies--the
     Earth is an exception), the linear coefficients are scaled by 36525.0
     in the assignments:

        BODY3_NUT_PREC_ANGLES  = (  125.045    -1935.5328
                                    250.090    -3871.0656
                                    260.008   475263.336525
                                    176.625   487269.6519
                                    357.529    35999.04     )

     As stated above, the satellite orientation models use polynomial and
     trigonometric terms, where the arguments of the trigonometric terms
     are the `nutation precession angles'.

     Example: 1988 IAU values for the Moon.  Again, these values are used
     as an example only; see the data area below for current values.


        alpha   =  270.000  +  0.003 T  -  3.878 sin(E1) - 0.120 sin(E2)
             0
                                        +  0.070 sin(E3) - 0.017 sin(E4)  (RA)


        delta   =  66.541   +  0.013 T  +  1.543 cos(E1) + 0.024 cos(E2)
             0
                                        -  0.028 cos(E3) + 0.007 cos(E4)  (DEC)


        W       =  38.317   + 13.1763582 d    +  3.558 sin(E1)

                                              +  0.121 sin(E2)

                                              -  0.064 sin(E3)

                                              +  0.016 sin(E4)

                                              +  0.025 sin(E5)  ( Prime
                                                                 meridian )

        d represents days past J2000.

        E1--E5 are the nutation precession angles.

     The polynomial terms are assigned to symbols by the statements

        BODY301_POLE_RA        = (  270.000    0.003        0. )
        BODY301_POLE_DEC       = (  +66.541    0.013        0. )
        BODY301_PM             = (   38.317  +13.1763582    0. )

     The coefficients of the trigonometric terms are assigned to symbols by
     the statements

        BODY301_NUT_PREC_RA  = (  -3.878  -0.120  +0.070  -0.017   0.    )
        BODY301_NUT_PREC_DEC = (  +1.543  +0.024  -0.028  +0.007   0.    )
        BODY301_NUT_PREC_PM  = (  +3.558  +0.121  -0.064  +0.016  +0.025 )

     Note that for the RA and PM (prime meridian) assignments, the ith term
     is the coefficient of sin(Ei) in the expression used in the IAU model,
     while for the DEC assignment, the ith term is the coefficient of
     cos(Ei) in the expression used in the IAU model.

     NAIF software expects the models for satellite orientation to
     follow the form of the model shown here: the polynomial portions of the
     RA, DEC, and W expressions are expected to be quadratic, the
     trigonometric terms for RA and W (satellite prime meridian) are expected
     to be linear combinations of sines of nutation precession angles, the
     trigonometric terms for DEC are expected to be linear combinations of
     cosines of nutation precession angles, and the polynomials for the nutation
     precession angles themselves are expected to be linear.

     Eventually, the software will handle more complex expressions, we
     expect.


Shape models

     There is only one kind of shape model supported by the NAIF Toolkit
     software at present: the triaxial ellipsoid. The 1994 IAU report does
     not use any other models.

     For each body, three radii are listed:  The first number is
     the largest equatorial radius (the length of the semi-axis
     containing the prime meridian), the second number is the smaller
     equatorial radius, and the third is the polar radius.

     Example: Radii of the Earth.

        BODY399_RADII     = (     6378.14    6378.14      6356.75   )


Body numbers and names
--------------------------------------------------------


        1  Mercury barycenter
        2  Venus barycenter
        3  Earth barycenter
        4  Mars barycenter
        5  Jupiter barycenter
        6  Saturn barycenter
        7  Uranus barycenter
        8  Neptune barycenter
        9  Pluto barycenter
        10 Sun

        While not relevant to the P_constants kernel, we note here for
        completeness that 0 is used to represent the solar system
        barycenter.

        199 Mercury


        299 Venus


        399 Earth

        301 Moon


        499 Mars

        401 Phobos      402 Deimos


        599 Jupiter

        501 Io          502 Europa      503 Ganymede    504 Callisto
        505 Amalthea    506 Himalia     507 Elara       508 Pasiphae
        509 Sinope      510 Lysithea    511 Carme       512 Ananke
        513 Leda        514 Thebe       515 Adrastea    516 Metis


        699 Saturn

        601 Mimas       602 Enceladus   603 Tethys      604 Dione
        605 Rhea        606 Titan       607 Hyperion    608 Iapetus
        609 Phoebe      610 Janus       611 Epimetheus  612 Helene
        613 Telesto     614 Calypso     615 Atlas       616 Prometheus
        617 Pandora     618 Pan


        799 Uranus

        701 Ariel       702 Umbriel     703 Titania     704 Oberon
        705 Miranda     706 Cordelia    707 Ophelia     708 Bianca
        709 Cressida    710 Desdemona   711 Juliet      712 Portia
        713 Rosalind    714 Belinda     715 Puck


        899 Neptune

        801 Triton      802 Nereid      803 Naiad       804 Thalassa
        805 Despina     806 Galatea     807 Larissa     808 Proteus


        999 Pluto

        901 Charon


        9511010 Asteriod Gaspra
        2431010 Asteroid Ida



Orientation constants for the Sun and planets
--------------------------------------------------------


Sun

     Old values:

        Values for the Sun in the 1994 report are the same as in the
        1991 report.

     Current values:

        \begindata

        BODY10_POLE_RA         = (  286.13       0.          0. )
        BODY10_POLE_DEC        = (   63.87       0.          0. )
        BODY10_PM              = (   84.10     +14.18440     0. )
        BODY10_LONG_AXIS       = (    0.                        )

        \begintext


Mercury

     Old values:

        body199_pole_ra          = (  281.01,     -0.033,      0. )
        body199_pole_dec         = (   61.45,     -0.005,      0. )
        body199_pm               = (  329.71      +6.1385025   0. )

        body199_long_axis        = (    0.                        )



     Current values:

        \begindata

        BODY199_POLE_RA          = (  281.01,     -0.033,      0. )
        BODY199_POLE_DEC         = (   61.45,     -0.005,      0. )
        BODY199_PM               = (  329.68      +6.1385025   0. )

        BODY199_LONG_AXIS        = (    0.                        )

        \begintext


Venus

     Old values:

        Values for the Venus in the 1994 report are the same as in the
        1991 report.


     Current values:

        \begindata

        BODY299_POLE_RA          = (  272.76       0.          0. )
        BODY299_POLE_DEC         = (  +67.16       0.          0. )
        BODY299_PM               = (  160.20      -1.4813688   0. )

        BODY299_LONG_AXIS        = (    0.                        )

        \begintext


Earth

     Old values:

        Values shown are from the 1988 IAU report.

        body399_pole_ra        = (    0.      -0.641         0. )
        body399_pole_dec       = (  +90.      -0.557         0. )
        body399_pm             = (  190.16  +360.9856235     0. )
        body399_long_axis      = (    0.                        )

        The linear terms before and after scaling:

           -.052992   -->     -1935.5328
           -.105984   -->     -3871.0656
         -13.012      -->   -475263.3
          13.340716   -->   +487269.6519
           -.9856     -->    -35999.04

        body3_nut_prec_angles  = (  125.045    -1935.5328
                                    249.390    -3871.0656
                                    196.694  -475263.3
                                    176.630  +487269.6519
                                    358.219   -35999.04     )


     Current values:

        \begindata

        BODY399_POLE_RA        = (    0.      -0.641         0. )
        BODY399_POLE_DEC       = (  +90.      -0.557         0. )
        BODY399_PM             = (  190.16  +360.9856235     0. )
        BODY399_LONG_AXIS      = (    0.                        )

        \begintext

        Nutation precession angles for the Earth-Moon system:

           The linear coefficients have been scaled up from degrees/day
           to degrees/century, because the SPICELIB PCK reader expects
           these units.  The original constants were:

                                    125.045D0   -0.0529921D0
                                    250.089D0   -0.1059842D0
                                    260.008D0   13.0120009D0
                                    176.625D0   13.3407154D0
                                    357.529D0    0.9856003D0
                                    311.589D0   26.4057084D0
                                    134.963D0   13.0649930D0
                                    276.617D0    0.3287146D0
                                     34.226D0    1.7484877D0
                                     15.134D0   -0.1589763D0
                                    119.743D0    0.0036096D0
                                    239.961D0    0.1643573D0
                                     25.053D0   12.9590088D0


        \begindata

        BODY3_NUT_PREC_ANGLES  = (  125.045         -1935.5364525000
                                    250.089         -3871.0729050000
                                    260.008        475263.3328725000
                                    176.625        487269.6299850000
                                    357.529         35999.0509575000
                                    311.589        964468.4993100001
                                    134.963        477198.8693250000
                                    276.617         12006.3007650000
                                     34.226         63863.5132425000
                                     15.134         -5806.6093575000
                                    119.743           131.8406400000
                                    239.961          6003.1503825000
                                     25.053        473327.7964200000 )

        \begintext



        Northern hemisphere projection of the Earth's magnetic dipole:
        Coordinates are planetocentric.  Values are from [5].

        \begindata

        BODY399_MAG_NORTH_POLE_LON  =  ( -69.761 )
        BODY399_MAG_NORTH_POLE_LAT  =  (  78.565 )



        \begintext




Mars

     Old values:

        Values shown are from the 1991 IAU report.

        body499_pole_ra          = (  317.681     -0.108       0.  )
        body499_pole_dec         = (  +52.886     -0.061       0.  )
        body499_pm               = (  176.868   +350.8919830   0.  )

        body4_nut_prec_angles  = (  169.51     -15916.2801
                                    192.93  +41215163.19675
                                     53.47       -662.965275
                                     36.53       +662.965275  )


     Current values:

        \begindata

        BODY499_POLE_RA          = (  317.681     -0.108       0.  )
        BODY499_POLE_DEC         = (  +52.886     -0.061       0.  )
        BODY499_PM               = (  176.901   +350.8919830   0.  )

        \begintext

        Source [3] specifies the following value for the lambda_a term
        (BODY4_LONG_AXIS ) for Mars.

        This term is the POSITIVE WEST LONGITUDE, measured from the prime
        meridian, of the longest axis of the ellipsoid representing the `mean
        planet surface', as the article states.

           body499_long_axis        = (  110.  )

        Source [4] specifies the lambda_a value

           body499_long_axis        = (  104.9194  )

        We list these lambda_a values for completeness. The IAU gives equal
        values for both equatorial radii, so the lambda_a offset does not
        apply to the IAU model.

        The 1994 IAU report defines M2, the second nutation precession angle,
        by:

                                                2
           192.93  +  1128.4096700 d  +  8.864 T

        We truncate the M2 series to a linear expression, because the PCK
        software cannot handle the quadratic term.

        Again, the linear terms are scaled by 36525.0:

            -0.4357640000000000       -->     -15916.28010000000
          1128.409670000000           -->   41215163.19675000
            -1.8151000000000000E-02   -->       -662.9652750000000

        We also introduce a fourth nutation precession angle, which
        is the pi/2-complement of the third angle.  This angle is used
        in computing the prime meridian location for Deimos.  See the
        discussion of this angle below in the section containing orientation
        constants for Deimos.

        \begindata
        BODY4_NUT_PREC_ANGLES  = (  169.51     -15916.2801
                                    192.93  +41215163.19675
                                     53.47       -662.965275
                                     36.53       +662.965275  )

        \begintext


Jupiter

     Old values:

        Values are from the 1991 IAU report.

        body599_pole_ra        = (   268.05    -0.009  0.  )
        body599_pole_dec       = (   +64.49    +0.003  0.  )
        body599_pm             = (   284.95  +870.536  0.  )
        body599_long_axis      = (     0.                  )

        body5_nut_prec_angles  = (   73.32   +91472.9
                                    198.54   +44243.8
                                    283.90    +4850.7
                                    355.80    +1191.3
                                    119.90     +262.1
                                    229.80      +64.3
                                    352.25    +2382.6
                                    113.35    +6070.0
                                    146.64  +182945.8
                                    397.08   +88487.6  )

     Current values:

        The number of nutation precession angles is ten. The ninth and
        tenth are twice the first and second, respectively.

        \begindata

        BODY599_POLE_RA        = (   268.05    -0.009  0.  )
        BODY599_POLE_DEC       = (   +64.49    +0.003  0.  )
        BODY599_PM             = (   284.95  +870.536  0.  )
        BODY599_LONG_AXIS      = (     0.                  )

        BODY5_NUT_PREC_ANGLES  = (   73.32   +91472.9
                                     24.62   +45137.2
                                    283.90    +4850.7
                                    355.80    +1191.3
                                    119.90     +262.1
                                    229.80      +64.3
                                    352.25    +2382.6
                                    113.35    +6070.0
                                    146.64  +182945.8
                                     49.24   +90274.4  )
        \begintext


Saturn

     Old values:

        Values are from the 1991 IAU report.

        body699_pole_ra        = (    40.58    -0.036      0.  )
        body699_pole_dec       = (   +83.54    -0.004      0.  )
        body699_pm             = (    38.90  +810.7939024  0.  )
        body699_long_axis      = (     0.                      )

        body6_nut_prec_angles  = (  353.32   75706.7
                                     28.72   75706.7
                                    177.40  -36505.5
                                    300.00   -7225.9
                                    316.45     506.2
                                    345.20   -1016.3
                                     29.80     -52.1
                                    706.64  151413.4
                                     57.44  151413.4  )
     Current values:

        \begindata

        BODY699_POLE_RA        = (    40.589    -0.036      0.  )
        BODY699_POLE_DEC       = (   +83.537    -0.004      0.  )
        BODY699_PM             = (    38.90   +810.7939024  0.  )
        BODY699_LONG_AXIS      = (     0.                       )

        \begintext

        The first seven angles given here are the angles S1
        through S7 from the 1994 report; the eighth and
        ninth angles are 2*S1 and 2*S2, respectively.


        \begindata

        BODY6_NUT_PREC_ANGLES  = (  353.32   75706.7
                                     28.72   75706.7
                                    177.40  -36505.5
                                    300.00   -7225.9
                                    316.45     506.2
                                    345.20   -1016.3
                                     29.80     -52.1
                                    706.64  151413.4
                                     57.44  151413.4  )

        \begintext


Uranus

     Old values:

        Values are from the 1991 report.

        body799_pole_ra        = (  257.43     0.         0.  )
        body799_pole_dec       = (  -15.10     0.         0.  )
        body799_pm             = (  203.81  -501.1600928  0.  )
        body799_long_axis      = (    0.                      )


        body7_nut_prec_angles  = (  115.75  +54991.87
                                    141.69  +41887.66
                                    135.03  +29927.35
                                     61.77  +25733.59
                                    249.32  +24471.46
                                     43.86  +22278.41
                                     77.66  +20289.42
                                    157.36  +16652.76
                                    101.81  +12872.63
                                    138.64   +8061.81
                                    102.23   -2024.22
                                    316.41    2863.96
                                    304.01     -51.94
                                    308.71     -93.17
                                    340.82     -75.32
                                    259.14    -504.81
                                    204.46   -4048.44
                                    632.82    5727.92     )
     Current values:

        \begindata

        BODY799_POLE_RA        = (  257.311     0.         0.  )
        BODY799_POLE_DEC       = (  -15.175     0.         0.  )
        BODY799_PM             = (  203.81   -501.1600928  0.  )
        BODY799_LONG_AXIS      = (    0.                       )


        \begintext

        The first 16 angles given here are the angles U1
        through U16 from the 1994 report; the 17th and
        18th angles are 2*U11 and 2*U12, respectively.

        \begindata

        BODY7_NUT_PREC_ANGLES  = (  115.75  +54991.87
                                    141.69  +41887.66
                                    135.03  +29927.35
                                     61.77  +25733.59
                                    249.32  +24471.46
                                     43.86  +22278.41
                                     77.66  +20289.42
                                    157.36  +16652.76
                                    101.81  +12872.63
                                    138.64   +8061.81
                                    102.23   -2024.22
                                    316.41    2863.96
                                    304.01     -51.94
                                    308.71     -93.17
                                    340.82     -75.32
                                    259.14    -504.81
                                    204.46   -4048.44
                                    632.82    5727.92     )

        \begintext



Neptune

     Old values:

         Values are unchanged in the 1994 IAU report.

     Current values:


        The RA and DEC expressions for Neptune in the 1994 IAU report
        (as in the 1991 report) involve trigonometric terms:

           alpha   =  299.36  +  0.70 sin(N)
                0

           delta   =  43.46   -  0.51 cos(N)
                0

           W       =  253.18  +  536.3128492 d  -  0.48 sin(N)


           N       =  357.85  +  52.316 T


        Because the SPICELIB routine BODEUL (still) cannot handle the
        trigonometric terms, we truncate the expressions to polynomials.
        The errors we make (in degrees) are:

                                          RA        DEC        PM
                                         ----      -----      ----

           Error bound (max abs value)   0.70      0.51       0.48


           \begindata

           BODY899_POLE_RA        = (  299.36     0.         0.  )
           BODY899_POLE_DEC       = (  +43.46     0.         0.  )
           BODY899_PM             = (  253.18  +536.3128492  0.  )
           BODY899_LONG_AXIS      = (    0.                      )

           \begintext

           The 1994 report defines the nutation precession angles

              N, N1, N2, ... , N7

           and also uses the multiples of N1 and N7

              2*N1

           and

              2*N7, 3*N7, ..., 9*N7

           In this file, we treat the angles and their multiples as
           separate angles.  In the kernel variable

              BODY8_NUT_PREC_ANGLES

           the order of the angles is

              N, N1, N2, ... , N7, 2*N1, 2*N7, 3*N7, ..., 9*N7

           Each angle is defined by a linear polynomial, so two
           consecutive array elements are allocated for each
           angle.  The first term of each pair is the constant term,
           the second is the linear term.

              \begindata

              BODY8_NUT_PREC_ANGLES = (   357.850        52.316
                                          323.920     62606.600
                                          220.510     55064.200
                                          354.270     46564.500
                                           75.310     26109.400
                                           35.360     14325.400
                                          142.610      2824.600
                                          177.850        52.316
                                          647.840    125213.200
                                          355.700       104.632
                                          533.550       156.948
                                          711.400       209.264
                                          889.250       261.580
                                         1067.100       313.896
                                         1244.950       366.212
                                         1422.800       418.528
                                         1600.650       470.844   )

              \begintext



Pluto

     Old values:

         Values are unchanged in the 1994 IAU report.

     Current values:

        \begindata

        BODY999_POLE_RA        = (  313.02    0.         0.  )
        BODY999_POLE_DEC       = (   +9.09    0.         0.  )
        BODY999_PM             = (  236.77  -56.3623195  0.  )
        BODY999_LONG_AXIS      = (    0.                     )

        \begintext




Orientation constants for the satellites
--------------------------------------------------------


Moon

     Old values:

        Values are from the 1988 IAU report.

        body301_pole_ra        = (  270.000    0.           0. )
        body301_pole_dec       = (  +66.534    0.           0. )
        body301_pm             = (   38.314  +13.1763581    0. )
        body301_long_axis      = (    0.                       )

        body301_nut_prec_ra  = (  -3.878  -0.120  +0.070  -0.017   0.    )
        body301_nut_prec_dec = (  +1.543  +0.024  -0.028  +0.007   0.    )
        body301_nut_prec_pm  = (  +3.558  +0.121  -0.064  +0.016  +0.025 )


     New values:

        \begindata

        BODY301_POLE_RA      = (  269.9949    0.0031        0.        )
        BODY301_POLE_DEC     = (   66.5392    0.0130        0.        )
        BODY301_PM           = (   38.3213   13.17635815   -1.4D-12   )
        BODY301_LONG_AXIS    = (    0.                                )

        BODY301_NUT_PREC_RA  = (  -3.8787   -0.1204  +0.0700  -0.0172
                                   0.       +0.0072   0.       0.
                                   0.       -0.0052   0.       0.
                                  +0.0043                             )

        BODY301_NUT_PREC_DEC = (   1.5419   0.0239   -0.0278  +0.0068
                                   0.      -0.0029   +0.0009   0.
                                   0.      +0.0008    0.       0.
                                  -0.0009                             )

        BODY301_NUT_PREC_PM  = (  3.5610   +0.1208   -0.0642  +0.0158
                                 +0.0252   -0.0066   -0.0047  -0.0046
                                 +0.0028   +0.0052   +0.0040  +0.0019
                                 -0.0044                              )

        \begintext



Satellites of Mars


     Phobos

          Old values:

             Values are unchanged in the 1994 report.

          Current values:

            The quadratic prime meridian term is scaled by 1/36525**2:

               8.864000000000000   --->   6.6443009930565219E-09

          \begindata

          BODY401_POLE_RA       = (  317.68      -0.108       0.  )
          BODY401_POLE_DEC      = (  +52.90      -0.061       0.  )
          BODY401_PM            = (   35.06
                                   +1128.8445850
                                       6.6443009930565219D-09     )

          BODY401_LONG_AXIS     = (    0.         0. )

          BODY401_NUT_PREC_RA   = (   +1.79   0.    0.  0. )
          BODY401_NUT_PREC_DEC  = (   -1.08   0.    0.  0. )
          BODY401_NUT_PREC_PM   = (   -1.42  -0.78  0.  0. )

          \begintext


     Deimos

        Old values:

           Values are unchanged in the 1994 report.


        New values:

           The Deimos prime meridian expression is:


                                                     2
              W = 79.41  +  285.1618970 d  -  0.520 T  -  2.58 sin M
                                                                    3

                                                       +  0.19 cos M .
                                                                    3


           At the present time, the constants kernel software (the routine
           BODEUL in particular) cannot handle the cosine term directly,
           but we can represent it as

              0.19 sin M
                        4

           where

              M   =  90.D0 - M
               4              3

           Therefore, the nutation precession angle assignments for Phobos
           and Deimos contain four coefficients rather than three.

           The quadratic prime meridian term is scaled by 1/36525**2:

              -0.5200000000000000  --->   -3.8978300049519307E-10

           \begindata

           BODY402_POLE_RA       = (  316.65     -0.108       0.            )
           BODY402_POLE_DEC      = (  +53.52     -0.061       0.            )
           BODY402_PM            = (   79.41   +285.1618970  -3.897830D-10  )
           BODY402_LONG_AXIS     = (    0.                                  )

           BODY402_NUT_PREC_RA   = (    0.   0.   +2.98   0.    )
           BODY402_NUT_PREC_DEC  = (    0.   0.   -1.78   0.    )
           BODY402_NUT_PREC_PM   = (    0.   0.   -2.58   0.19  )

           \begintext




Satellites of Jupiter

     Values for Europa, Ganymede, Callisto, Adrastea, Metis, and Thebe
     have been updated in the 1994 report.  All others match values from
     the 1991 report.


     Io

        The 1991 report erroneously stated the formula for the RA of Io
        as

            268.05  -    0.009T   +  0.094*cos(J3)   +  0.024*sin(J4)

        The correct formula is

            268.05  -    0.009T   +  0.094*sin(J3)   +  0.024*sin(J4)

        Values in the 1994 report match the corrected values from the 1991
        report.

        \begindata

        BODY501_POLE_RA       = (  268.05          -0.009      0.  )
        BODY501_POLE_DEC      = (  +64.50          +0.003      0.  )
        BODY501_PM            = (  200.39        +203.4889538  0.  )
        BODY501_LONG_AXIS     = (    0.                            )

        BODY501_NUT_PREC_RA   = (    0.   0.    +0.094   +0.024   )
        BODY501_NUT_PREC_DEC  = (    0.   0.    +0.040   +0.011   )
        BODY501_NUT_PREC_PM   = (    0.   0.    -0.085   -0.022   )

        \begintext



     Europa


        Old values:

        body502_pole_ra       = (  268.08          -0.009      0.   )
        body502_pole_dec      = (  +64.51          +0.003      0.   )
        body502_pm            = (   35.72        +101.3747235  0.   )
        body502_long_axis     = (    0.                             )

        body502_nut_prec_ra   = ( 0. 0. 0. +1.086  +0.060  +0.015  +0.009 )
        body502_nut_prec_dec  = ( 0. 0. 0. +0.468  +0.026  +0.007  +0.002 )
        body502_nut_prec_pm   = ( 0. 0. 0. -0.980  -0.054  -0.014  -0.008 )


        Current values:

        \begindata

        BODY502_POLE_RA       = (  268.08          -0.009      0.   )
        BODY502_POLE_DEC      = (  +64.51          +0.003      0.   )
        BODY502_PM            = (   35.67        +101.3747235  0.   )
        BODY502_LONG_AXIS     = (    0.                             )

        BODY502_NUT_PREC_RA   = ( 0. 0. 0. +1.086  +0.060  +0.015  +0.009 )
        BODY502_NUT_PREC_DEC  = ( 0. 0. 0. +0.468  +0.026  +0.007  +0.002 )
        BODY502_NUT_PREC_PM   = ( 0. 0. 0. -0.980  -0.054  -0.014  -0.008 )

        \begintext


     Ganymede

        Old values:

        body503_pole_ra       = (  268.20          -0.009      0.   )
        body503_pole_dec      = (  +64.57          +0.003      0.   )
        body503_pm            = (   43.14         +50.3176081  0.   )
        body503_long_axis     = (    0.                             )

        body503_nut_prec_ra   = ( 0. 0. 0.  -0.037  +0.431  +0.091   )
        body503_nut_prec_dec  = ( 0. 0. 0.  -0.016  +0.186  +0.039   )
        body503_nut_prec_pm   = ( 0. 0. 0.  +0.033  -0.389  -0.082   )


        Current values:

        \begindata

        BODY503_POLE_RA       = (  268.20          -0.009      0.   )
        BODY503_POLE_DEC      = (  +64.57          +0.003      0.   )
        BODY503_PM            = (   44.04         +50.3176081  0.   )
        BODY503_LONG_AXIS     = (    0.                             )

        BODY503_NUT_PREC_RA   = ( 0. 0. 0.  -0.037  +0.431  +0.091   )
        BODY503_NUT_PREC_DEC  = ( 0. 0. 0.  -0.016  +0.186  +0.039   )
        BODY503_NUT_PREC_PM   = ( 0. 0. 0.  +0.033  -0.389  -0.082   )

        \begintext


     Callisto


        Old values:


        body504_pole_ra       = (   268.72   -0.009      0.  )
        body504_pole_dec      = (   +64.83   +0.003      0.  )
        body504_pm            = (   259.67  +21.5710715  0.  )
        body504_long_axis     = (     0.                     )

        body504_nut_prec_ra   = ( 0. 0. 0. 0. -0.068 +0.590  0. +0.010 )
        body504_nut_prec_dec  = ( 0. 0. 0. 0. -0.029 +0.254  0. -0.004 )
        body504_nut_prec_pm   = ( 0. 0. 0. 0. +0.061 -0.533  0. -0.009 )


        Current values:


        \begindata

        BODY504_POLE_RA       = (   268.72   -0.009      0.  )
        BODY504_POLE_DEC      = (   +64.83   +0.003      0.  )
        BODY504_PM            = (   259.73  +21.5710715  0.  )
        BODY504_LONG_AXIS     = (     0.                     )

        BODY504_NUT_PREC_RA   = ( 0. 0. 0. 0. -0.068 +0.590  0. +0.010 )
        BODY504_NUT_PREC_DEC  = ( 0. 0. 0. 0. -0.029 +0.254  0. -0.004 )
        BODY504_NUT_PREC_PM   = ( 0. 0. 0. 0. +0.061 -0.533  0. -0.009 )

        \begintext


     Amalthea


        Current values match those of the corrected 1991 report.
        The 1991 report erroneously stated the formula for the DEC
        of Amalthea as

            64.49  +    0.003T   -  0.36*sin(J1)

        The correct formula is

            64.49  +    0.003T   -  0.36*cos(J1)

        Values in the 1994 report match the corrected values from the 1991
        report.

        \begindata

        BODY505_POLE_RA       = (   268.05    -0.009      0.  )
        BODY505_POLE_DEC      = (   +64.49    +0.003      0.  )
        BODY505_PM            = (   231.67  +722.6314560  0.  )
        BODY505_LONG_AXIS     = (     0.                      )

        BODY505_NUT_PREC_RA  = ( -0.84  0. 0. 0. 0. 0. 0. 0.  +0.01  )
        BODY505_NUT_PREC_DEC = ( -0.36  0. 0. 0. 0. 0. 0. 0.   0.    )
        BODY505_NUT_PREC_PM  = ( +0.76  0. 0. 0. 0. 0. 0. 0.  -0.01  )

        \begintext


     Thebe


        Old values:

        body514_pole_ra       = (  268.05     -0.009       0.  )
        body514_pole_dec      = (   64.49     +0.003       0.  )
        body514_pm            = (    9.91   +533.7005330   0.  )
        body514_long_axis     = (    0.                        )

        body514_nut_prec_ra  = ( 0. -2.12  0. 0. 0. 0. 0. 0. 0.  +0.04  )
        body514_nut_prec_dec = ( 0. -0.91  0. 0. 0. 0. 0. 0. 0.  +0.01  )
        body514_nut_prec_pm  = ( 0. +1.91  0. 0. 0. 0. 0. 0. 0.  -0.04  )


        Current values:

        \begindata

        BODY514_POLE_RA       = (  268.05     -0.009       0.  )
        BODY514_POLE_DEC      = (   64.49     +0.003       0.  )
        BODY514_PM            = (    8.56   +533.7004100   0.  )
        BODY514_LONG_AXIS     = (    0.                        )

        BODY514_NUT_PREC_RA  = ( 0. -2.11  0. 0. 0. 0. 0. 0. 0.  +0.04  )
        BODY514_NUT_PREC_DEC = ( 0. -0.91  0. 0. 0. 0. 0. 0. 0.  +0.01  )
        BODY514_NUT_PREC_PM  = ( 0. +1.91  0. 0. 0. 0. 0. 0. 0.  -0.04  )

        \begintext


     Adrastea

        Old values:

        body515_pole_ra       = (  268.05     -0.009       0.  )
        body515_pole_dec      = (   64.49     +0.003       0.  )
        body515_pm            = (    5.75  +1206.9950400   0.  )
        body515_long_axis     = (    0.                        )


        Current values:

        \begindata

        BODY515_POLE_RA       = (  268.05     -0.009       0.  )
        BODY515_POLE_DEC      = (   64.49     +0.003       0.  )
        BODY515_PM            = (   33.29  +1206.9986602   0.  )
        BODY515_LONG_AXIS     = (    0.                        )

        \begintext


     Metis


        Old values:

        body516_pole_ra       = (  268.05     -0.009       0.  )
        body516_pole_dec      = (   64.49     +0.003       0.  )
        body516_pm            = (  302.24  +1221.2489660   0.  )
        body516_long_axis     = (    0.                        )


        Current values:

           Note W0 has been updated per [7].  The old, erroneous value
           was 355.09.

        \begindata

        BODY516_POLE_RA       = (  268.05     -0.009       0.  )
        BODY516_POLE_DEC      = (   64.49     +0.003       0.  )
        BODY516_PM            = (  346.09  +1221.2547301   0.  )
        BODY516_LONG_AXIS     = (    0.                        )

        \begintext



Satellites of Saturn


     Values for all Saturnian satellites are unchanged in the 1994 IAU
     report.


     Mimas


        Current values:

           \begindata

           BODY601_POLE_RA       = (    40.66    -0.036      0.  )
           BODY601_POLE_DEC      = (   +83.52    -0.004      0.  )
           BODY601_PM            = (   337.46  +381.9945550  0.  )
           BODY601_LONG_AXIS     = (     0.                      )

           BODY601_NUT_PREC_RA   = ( 0. 0. +13.56  0.    0.   0. 0. 0. 0. )
           BODY601_NUT_PREC_DEC  = ( 0. 0.  -1.53  0.    0.   0. 0. 0. 0. )
           BODY601_NUT_PREC_PM   = ( 0. 0. -13.48  0. -44.85  0. 0. 0. 0. )

           \begintext


     Enceladus


        Current values:

           \begindata

           BODY602_POLE_RA       = (   40.66    -0.036      0.  )
           BODY602_POLE_DEC      = (  +83.52    -0.004      0.  )
           BODY602_PM            = (    2.82  +262.7318996  0.  )
           BODY602_LONG_AXIS     = (    0.                      )

           \begintext



     Tethys


        Current values:

           \begindata

           BODY603_POLE_RA       = (    40.66    -0.036      0.  )
           BODY603_POLE_DEC      = (   +83.52    -0.004      0.  )
           BODY603_PM            = (    10.45  +190.6979085  0.  )
           BODY603_LONG_AXIS     = (     0.                      )

           BODY603_NUT_PREC_RA   = ( 0. 0. 0.  +9.66   0.    0.  0.  0.  0. )
           BODY603_NUT_PREC_DEC  = ( 0. 0. 0.  -1.09   0.    0.  0.  0.  0. )
           BODY603_NUT_PREC_PM   = ( 0. 0. 0.  -9.60  +2.23  0.  0.  0.  0. )

           \begintext


     Dione


        Current values:

           \begindata

           BODY604_POLE_RA       = (    40.66    -0.036      0.  )
           BODY604_POLE_DEC      = (   +83.52    -0.004      0.  )
           BODY604_PM            = (   357.00  +131.5349316  0.  )
           BODY604_LONG_AXIS     = (     0.                      )

           \begintext



     Rhea


        Current values:

           \begindata

           BODY605_POLE_RA       = (   40.38    -0.036      0.   )
           BODY605_POLE_DEC      = (  +83.55    -0.004      0.   )
           BODY605_PM            = (  235.16   +79.6900478  0.   )
           BODY605_LONG_AXIS     = (    0.                       )

           BODY605_NUT_PREC_RA   = ( 0. 0. 0. 0. 0.  +3.10  0. 0. 0. )
           BODY605_NUT_PREC_DEC  = ( 0. 0. 0. 0. 0.  -0.35  0. 0. 0. )
           BODY605_NUT_PREC_PM   = ( 0. 0. 0. 0. 0.  -3.08  0. 0. 0. )

           \begintext



     Titan


        Current values:

           \begindata

           BODY606_POLE_RA       = (    36.41   -0.036      0.   )
           BODY606_POLE_DEC      = (   +83.94   -0.004      0.   )
           BODY606_PM            = (   189.64  +22.5769768  0.   )
           BODY606_LONG_AXIS     = (     0.                      )

           BODY606_NUT_PREC_RA   = ( 0. 0. 0. 0. 0. 0. +2.66  0. 0. )
           BODY606_NUT_PREC_DEC  = ( 0. 0. 0. 0. 0. 0. -0.30  0. 0. )
           BODY606_NUT_PREC_PM   = ( 0. 0. 0. 0. 0. 0. -2.64  0. 0. )

           \begintext



     Hyperion

         The IAU report does not give an orientation model for Hyperion.



     Iapetus


        Current values:

           \begindata

           BODY608_POLE_RA       = (   318.16  -3.949      0.  )
           BODY608_POLE_DEC      = (   +75.03  -1.143      0.  )
           BODY608_PM            = (   350.20  +4.5379572  0.  )
           BODY608_LONG_AXIS     = (     0.                    )

           \begintext



     Phoebe


        Current values:

           \begindata

           BODY609_POLE_RA       = (  355.00      0.         0.  )
           BODY609_POLE_DEC      = (  +68.70      0.         0.  )
           BODY609_PM            = (  304.70   +930.8338720  0.  )
           BODY609_LONG_AXIS     = (    0.                       )

           \begintext


     Janus


        Current values:

           \begindata

           BODY610_POLE_RA       = (   40.58     -0.036      0.  )
           BODY610_POLE_DEC      = (   83.52     -0.004      0.  )
           BODY610_PM            = (   58.83   +518.2359876  0.  )
           BODY610_LONG_AXIS     = (    0.                       )

           BODY610_NUT_PREC_RA   = ( 0. -1.623  0. 0. 0. 0. 0. 0. +0.023 )
           BODY610_NUT_PREC_DEC  = ( 0. -0.183  0. 0. 0. 0. 0. 0. +0.001 )
           BODY610_NUT_PREC_PM   = ( 0. +1.613  0. 0. 0. 0. 0. 0. -0.023 )

           \begintext



     Epimetheus


        Values for Epimetheus match those from the corrected 1991 report.

           The 1991 report erroneously gave the linear coefficient in the
           formula for the DEC of Epimetheus as

              +0.004

           The correct value is

              -0.004


        Current values:

           \begindata

           BODY611_POLE_RA       = (   40.58     -0.036      0.  )
           BODY611_POLE_DEC      = (   83.52     -0.004      0.  )
           BODY611_PM            = (  293.87   +518.4907239  0.  )
           BODY611_LONG_AXIS     = (    0.                       )

           BODY611_NUT_PREC_RA   = ( -3.153  0. 0. 0. 0. 0. 0. +0.086  0. )
           BODY611_NUT_PREC_DEC  = ( -0.356  0. 0. 0. 0. 0. 0. +0.005  0. )
           BODY611_NUT_PREC_PM   = ( +3.133  0. 0. 0. 0. 0. 0. -0.086  0. )

           \begintext



     Helene


        Current values:

           \begindata

           BODY612_POLE_RA       = (   40.85     -0.036      0.  )
           BODY612_POLE_DEC      = (   83.34     -0.004      0.  )
           BODY612_PM            = (  245.12   +131.6174056  0.  )
           BODY612_LONG_AXIS     = (    0.                       )

           \begintext



     Telesto


        Current values:

           \begindata

           BODY613_POLE_RA       = (    50.51    -0.036      0.  )
           BODY613_POLE_DEC      = (    84.06    -0.004      0.  )
           BODY613_PM            = (    56.88  +190.6979332  0.  )
           BODY613_LONG_AXIS     = (     0.                      )

           \begintext




     Calypso


        Current values:

           \begindata

           BODY614_POLE_RA       = (   36.41     -0.036       0.  )
           BODY614_POLE_DEC      = (   85.04     -0.004       0.  )
           BODY614_PM            = (  153.51   +190.6742373   0.  )
           BODY614_LONG_AXIS     = (    0.                        )

           \begintext



     Atlas


        Current values:

           \begindata

           BODY615_POLE_RA       = (    40.58    -0.036      0.  )
           BODY615_POLE_DEC      = (    83.53    -0.004      0.  )
           BODY615_PM            = (   137.88  +598.3060000  0.  )
           BODY615_LONG_AXIS     = (     0.                      )

           \begintext



     Prometheus


        Current values:

           \begindata

           BODY616_POLE_RA       = (    40.58    -0.036      0.  )
           BODY616_POLE_DEC      = (    83.53    -0.004      0.  )
           BODY616_PM            = (   296.14  +587.2890000  0.  )
           BODY616_LONG_AXIS     = (     0.                      )

           \begintext



     Pandora


        Current values:

           \begindata

           BODY617_POLE_RA       = (    40.58    -0.036      0.  )
           BODY617_POLE_DEC      = (    83.53    -0.004      0.  )
           BODY617_PM            = (   162.92  +572.7891000  0.  )
           BODY617_LONG_AXIS     = (     0.                      )

           \begintext



     Pan


        Current values:

           \begindata

           BODY618_POLE_RA       = (   40.6     -0.036       0.  )
           BODY618_POLE_DEC      = (   83.5     -0.004       0.  )
           BODY618_PM            = (   48.8   +626.0440000   0.  )
           BODY618_LONG_AXIS     = (    0.                       )

           \begintext





Satellites of Uranus


     Values for all Uranian satellites are the same in the 1991 and 1994
     IAU reports.


     Ariel

        Current values:

           \begindata

           BODY701_POLE_RA       = (   257.43     0.         0.  )
           BODY701_POLE_DEC      = (   -15.10     0.         0.  )
           BODY701_PM            = (   156.22  -142.8356681  0.  )
           BODY701_LONG_AXIS     = (     0.                      )

           BODY701_NUT_PREC_RA   = (  0. 0. 0. 0. 0.
                                      0. 0. 0. 0. 0.    0.   0.    +0.29 )

           BODY701_NUT_PREC_DEC  = (  0. 0. 0. 0. 0.
                                      0. 0. 0. 0. 0.    0.   0.    +0.28 )

           BODY701_NUT_PREC_PM   = (  0. 0. 0. 0. 0.
                                      0. 0. 0. 0. 0.    0.  +0.05  +0.08 )

           \begintext



     Umbriel

        Current values:

           \begindata

           BODY702_POLE_RA       = (   257.43    0.         0.   )
           BODY702_POLE_DEC      = (   -15.10    0.         0.   )
           BODY702_PM            = (   108.05  -86.8688923  0.   )
           BODY702_LONG_AXIS     = (     0.                      )

           BODY702_NUT_PREC_RA   = (  0. 0. 0. 0. 0.
                                      0. 0. 0. 0. 0.   0.   0.    0.  +0.21 )

           BODY702_NUT_PREC_DEC  = (  0. 0. 0. 0. 0.
                                      0. 0. 0. 0. 0.   0.   0.    0.  +0.20 )

           BODY702_NUT_PREC_PM   = (  0. 0. 0. 0. 0.
                                      0. 0. 0. 0. 0.   0.  -0.09  0.  +0.06 )

           \begintext



     Titania

        Current values:

           \begindata

           BODY703_POLE_RA       = (   257.43    0.         0.   )
           BODY703_POLE_DEC      = (   -15.10    0.         0.   )
           BODY703_PM            = (    77.74  -41.3514316  0.   )
           BODY703_LONG_AXIS     = (     0.                      )

           BODY703_NUT_PREC_RA   = (  0. 0. 0. 0. 0.
                                      0. 0. 0. 0. 0.   0. 0. 0. 0.  +0.29 )

           BODY703_NUT_PREC_DEC  = (  0. 0. 0. 0. 0.
                                      0. 0. 0. 0. 0.   0. 0. 0. 0.  +0.28 )

           BODY703_NUT_PREC_PM   = (  0. 0. 0. 0. 0.
                                      0. 0. 0. 0. 0.   0. 0. 0. 0.  +0.08 )
           \begintext



     Oberon

        Current values:

           \begindata

           BODY704_POLE_RA       = (   257.43    0.         0.   )
           BODY704_POLE_DEC      = (   -15.10    0.         0.   )
           BODY704_PM            = (     6.77  -26.7394932  0.   )
           BODY704_LONG_AXIS     = (     0.                      )


           BODY704_NUT_PREC_RA   = (  0. 0. 0. 0. 0.
                                      0. 0. 0. 0. 0.
                                      0. 0. 0. 0. 0.  +0.16 )

           BODY704_NUT_PREC_DEC  = (  0. 0. 0. 0. 0.
                                      0. 0. 0. 0. 0.
                                      0. 0. 0. 0. 0.  +0.16 )

           BODY704_NUT_PREC_PM   = (  0. 0. 0. 0. 0.
                                      0. 0. 0. 0. 0.
                                      0. 0. 0. 0. 0.  +0.04 )
           \begintext



     Miranda

        Current values:

           \begindata

           BODY705_POLE_RA      = (   257.43     0.         0.   )
           BODY705_POLE_DEC     = (   -15.08     0.         0.   )
           BODY705_PM           = (    30.70  -254.6906892  0.   )
           BODY705_LONG_AXIS    = (     0.                       )

           BODY705_NUT_PREC_RA  = (  0.     0.     0.    0.    0.
                                     0.     0.     0.    0.    0.
                                     4.41   0.     0.    0.    0.
                                     0.    -0.04                   )

           BODY705_NUT_PREC_DEC = (  0.     0.     0.    0.    0.
                                     0.     0.     0.    0.    0.
                                     4.25   0.     0.    0.    0.
                                     0.    -0.02                   )

           BODY705_NUT_PREC_PM  = (  0.     0.     0.    0.    0.
                                     0.     0.     0.    0.    0.
                                     1.15  -1.27   0.    0.    0.
                                     0.    -0.09   0.15            )
           \begintext



     Cordelia

        Current values:

           \begindata

           BODY706_POLE_RA      = (   257.31      0.         0.   )
           BODY706_POLE_DEC     = (   -15.18      0.         0.   )
           BODY706_PM           = (   127.69  -1074.5205730  0.   )
           BODY706_LONG_AXIS    = (     0.                        )

           BODY706_NUT_PREC_RA  = (  -0.15  )
           BODY706_NUT_PREC_DEC = (  +0.14  )
           BODY706_NUT_PREC_PM  = (  -0.04  )

           \begintext



     Ophelia

        Current values:

           \begindata

           BODY707_POLE_RA      = (   257.31      0.         0.   )
           BODY707_POLE_DEC     = (   -15.18      0.         0.   )
           BODY707_PM           = (   130.35   -956.4068150  0.   )
           BODY707_LONG_AXIS    = (     0.                        )

           BODY707_NUT_PREC_RA  = ( 0.   -0.09 )
           BODY707_NUT_PREC_DEC = ( 0.   +0.09 )
           BODY707_NUT_PREC_PM  = ( 0.   -0.03 )

           \begintext



     Bianca

        Current values:

           \begindata

           BODY708_POLE_RA      = (   257.31      0.         0.   )
           BODY708_POLE_DEC     = (   -15.18      0.         0.   )
           BODY708_PM           = (   105.46   -828.3914760  0.   )
           BODY708_LONG_AXIS    = (     0.                        )

           BODY708_NUT_PREC_RA  = ( 0. 0.  -0.16 )
           BODY708_NUT_PREC_DEC = ( 0. 0.  +0.16 )
           BODY708_NUT_PREC_PM  = ( 0. 0.  -0.04 )

           \begintext



     Cressida

        Current values:

           \begindata

           BODY709_POLE_RA      = (   257.31      0.         0.   )
           BODY709_POLE_DEC     = (   -15.18      0.         0.   )
           BODY709_PM           = (    59.16   -776.5816320  0.   )
           BODY709_LONG_AXIS    = (     0.                        )

           BODY709_NUT_PREC_RA  = ( 0. 0. 0. -0.04 )
           BODY709_NUT_PREC_DEC = ( 0. 0. 0. +0.04 )
           BODY709_NUT_PREC_PM  = ( 0. 0. 0. -0.01 )

           \begintext



     Desdemona

        Current values:

           \begindata

           BODY710_POLE_RA      = (   257.31      0.         0.   )
           BODY710_POLE_DEC     = (   -15.18      0.         0.   )
           BODY710_PM           = (    95.08   -760.0531690  0.   )
           BODY710_LONG_AXIS    = (     0.                        )

           BODY710_NUT_PREC_RA  = ( 0. 0. 0.  0.  -0.17 )
           BODY710_NUT_PREC_DEC = ( 0. 0. 0.  0.  +0.16 )
           BODY710_NUT_PREC_PM  = ( 0. 0. 0.  0.  -0.04 )

           \begintext



     Juliet

        Current values:

           \begindata

           BODY711_POLE_RA      = (   257.31      0.         0.   )
           BODY711_POLE_DEC     = (   -15.18      0.         0.   )
           BODY711_PM           = (   302.56   -730.1253660  0.   )
           BODY711_LONG_AXIS    = (     0.                        )

           BODY711_NUT_PREC_RA  = ( 0. 0. 0. 0. 0. -0.06 )
           BODY711_NUT_PREC_DEC = ( 0. 0. 0. 0. 0. +0.06 )
           BODY711_NUT_PREC_PM  = ( 0. 0. 0. 0. 0. -0.02 )

           \begintext



     Portia

        Current values:

           \begindata

           BODY712_POLE_RA      = (   257.31      0.         0.   )
           BODY712_POLE_DEC     = (   -15.18      0.         0.   )
           BODY712_PM           = (    25.03   -701.4865870  0.   )
           BODY712_LONG_AXIS    = (     0.                        )

           BODY712_NUT_PREC_RA  = ( 0. 0. 0. 0. 0. 0.  -0.09 )
           BODY712_NUT_PREC_DEC = ( 0. 0. 0. 0. 0. 0.  +0.09 )
           BODY712_NUT_PREC_PM  = ( 0. 0. 0. 0. 0. 0.  -0.02 )

           \begintext



     Rosalind

        Current values:

           \begindata

           BODY713_POLE_RA      = (   257.31      0.         0.   )
           BODY713_POLE_DEC     = (   -15.18      0.         0.   )
           BODY713_PM           = (   314.90   -644.6311260  0.   )
           BODY713_LONG_AXIS    = (     0.                        )

           BODY713_NUT_PREC_RA  = ( 0. 0. 0. 0. 0. 0. 0.   -0.29 )
           BODY713_NUT_PREC_DEC = ( 0. 0. 0. 0. 0. 0. 0.   +0.28 )
           BODY713_NUT_PREC_PM  = ( 0. 0. 0. 0. 0. 0. 0.   -0.08 )

           \begintext



     Belinda

        Current values:

           \begindata

           BODY714_POLE_RA      = (   257.31      0.         0.   )
           BODY714_POLE_DEC     = (   -15.18      0.         0.   )
           BODY714_PM           = (   297.46   -577.3628170  0.   )
           BODY714_LONG_AXIS    = (     0.                        )

           BODY714_NUT_PREC_RA  = ( 0. 0. 0. 0. 0. 0. 0. 0.   -0.03 )
           BODY714_NUT_PREC_DEC = ( 0. 0. 0. 0. 0. 0. 0. 0.   +0.03 )
           BODY714_NUT_PREC_PM  = ( 0. 0. 0. 0. 0. 0. 0. 0.   -0.01 )

           \begintext



     Puck

        Current values:

           \begindata

           BODY715_POLE_RA      = (   257.31      0.         0.   )
           BODY715_POLE_DEC     = (   -15.18      0.         0.   )
           BODY715_PM           = (    91.24   -472.5450690  0.   )
           BODY715_LONG_AXIS    = (     0.                        )

           BODY715_NUT_PREC_RA  = ( 0. 0. 0. 0. 0. 0. 0. 0. 0.   -0.33 )
           BODY715_NUT_PREC_DEC = ( 0. 0. 0. 0. 0. 0. 0. 0. 0.   +0.31 )
           BODY715_NUT_PREC_PM  = ( 0. 0. 0. 0. 0. 0. 0. 0. 0.   -0.09 )

           \begintext




Satellites of Neptune


     Values in the 1994 IAU report match the corrected 1991 report.


     Triton


        Current values:

           \begindata

           BODY801_POLE_RA       = (   299.36    0.         0.  )
           BODY801_POLE_DEC      = (    41.17    0.         0.  )
           BODY801_PM            = (   296.53  -61.2572637  0.  )
           BODY801_LONG_AXIS     = (     0.                     )


           BODY801_NUT_PREC_RA   = (    0.      0.      0.      0.
                                        0.      0.      0.    -32.35
                                        0.
                                       -6.28   -2.08   -0.74   -0.28
                                       -0.11   -0.07   -0.02   -0.01   )


           BODY801_NUT_PREC_DEC  = (    0.      0.      0.      0.
                                        0.      0.      0.     22.55
                                        0.
                                        2.10    0.55    0.16    0.05
                                        0.02    0.01    0.      0.     )


           BODY801_NUT_PREC_PM   = (    0.      0.      0.      0.
                                        0.      0.      0.     22.25
                                        0.
                                        6.73    2.05    0.74    0.28
                                        0.11    0.05    0.02    0.01   )
           \begintext




     Nereid

        Old values:

           Values are from the 1988 IAU report.

           body802_pole_ra       = (    273.48    0.        0.  )
           body802_pole_dec      = (     67.22    0.        0.  )
           body802_pm            = (    237.22   +0.9996465 0.  )
           body802_long_axis     = (      0.                    )


           The report seems to have a typo:  in the nut_prec_ra expression,
           where the report gives  -0.51 sin 3N3, we use -0.51 3N2.

           body802_nut_prec_ra   = (  0.    -17.81
                                      0.      0.     0.      0.
                                      0.      0.     0.
                                     +2.56   -0.51  +0.11   -0.03  )

           body802_nut_prec_dec  = (  0.     -6.67
                                      0.      0.     0.      0.
                                      0.      0.     0.
                                     +0.47   -0.07  +0.01          )

           body802_nut_prec_pm   = (  0.     16.48
                                      0.      0.     0.      0.
                                      0.      0.     0.
                                     -2.57   +0.51 -0.11   +0.02  )



        Current values:

           The 1994 report does not give values for Nereid.  In order
           to obtain rotational elements for Nereid, a separate PCK
           file must be loaded.



     Naiad

        Current values:


           \begindata

           BODY803_POLE_RA       = (   299.36     0.         0.  )
           BODY803_POLE_DEC      = (    43.36     0.         0.  )
           BODY803_PM            = (   254.06  1222.8441209  0.  )
           BODY803_LONG_AXIS     = (     0.                      )


           BODY803_NUT_PREC_RA   = (    0.70     -6.49     0.      0.
                                        0.        0.       0.      0.
                                        0.25      0.       0.      0.
                                        0.        0.       0.      0.
                                        0.                             )

           BODY803_NUT_PREC_DEC  = (   -0.51     -4.75     0.      0.
                                        0.        0.       0.      0.
                                        0.09      0.       0.      0.
                                        0.        0.       0.      0.
                                        0.                             )

           BODY803_NUT_PREC_PM   = (   -0.48      4.40     0.      0.
                                        0.        0.       0.      0.
                                       -0.27      0.       0.      0.
                                        0.        0.       0.      0.
                                        0.                             )
           \begintext




     Thalassa

        Current values:

           \begindata

           BODY804_POLE_RA       = (  299.36      0.         0.  )
           BODY804_POLE_DEC      = (   43.45      0.         0.  )
           BODY804_PM            = (  102.06   1155.7555612  0.  )
           BODY804_LONG_AXIS     = (    0.                       )


           BODY804_NUT_PREC_RA   = (    0.70      0.      -0.28    0.
                                        0.        0.       0.      0.
                                        0.        0.       0.      0.
                                        0.        0.       0.      0.
                                        0.                             )

           BODY804_NUT_PREC_DEC  = (   -0.51      0.      -0.21    0.
                                        0.        0.       0.      0.
                                        0.        0.       0.      0.
                                        0.        0.       0.      0.
                                        0.                             )

           BODY804_NUT_PREC_PM   = (   -0.48      0.       0.19    0.
                                        0.        0.       0.      0.
                                        0.        0.       0.      0.
                                        0.        0.       0.      0.
                                        0.                             )
           \begintext



     Despina

        Current values:


           \begindata

           BODY805_POLE_RA       = (  299.36       0.          0.  )
           BODY805_POLE_DEC      = (   43.45       0.          0.  )
           BODY805_PM            = (  306.51    1075.7341562   0.  )
           BODY805_LONG_AXIS     = (    0.                         )


           BODY805_NUT_PREC_RA   = (    0.70      0.       0.     -0.09
                                        0.        0.       0.      0.
                                        0.        0.       0.      0.
                                        0.        0.       0.      0.
                                        0.                             )

           BODY805_NUT_PREC_DEC  = (   -0.51      0.       0.     -0.07
                                        0.        0.       0.      0.
                                        0.        0.       0.      0.
                                        0.        0.       0.      0.
                                        0.                             )

           BODY805_NUT_PREC_PM   = (   -0.49      0.       0.      0.06
                                        0.        0.       0.      0.
                                        0.        0.       0.      0.
                                        0.        0.       0.      0.
                                        0.                             )
           \begintext



     Galatea

        Current values:


           \begindata

           BODY806_POLE_RA       = (  299.36       0.          0.  )
           BODY806_POLE_DEC      = (   43.43       0.          0.  )
           BODY806_PM            = (  258.09     839.6597686   0.  )
           BODY806_LONG_AXIS     = (    0.                         )


           BODY806_NUT_PREC_RA   = (    0.70      0.       0.      0.
                                       -0.07      0.       0.      0.
                                        0.        0.       0.      0.
                                        0.        0.       0.      0.
                                        0.                             )

           BODY806_NUT_PREC_DEC  = (   -0.51      0.       0.      0.
                                       -0.05      0.       0.      0.
                                        0.        0.       0.      0.
                                        0.                             )

           BODY806_NUT_PREC_PM   = (   -0.48      0.       0.      0.
                                        0.05      0.       0.      0.
                                        0.        0.       0.      0.
                                        0.        0.       0.      0.
                                        0.                             )
           \begintext




     Larissa

        Current values:


           \begindata

           BODY807_POLE_RA       = (  299.36       0.          0.  )
           BODY807_POLE_DEC      = (   43.41       0.          0.  )
           BODY807_PM            = (  179.41     649.0534470   0.  )
           BODY807_LONG_AXIS     = (    0.                         )


           BODY807_NUT_PREC_RA   = (    0.70      0.       0.      0.
                                        0.       -0.27     0.      0.
                                        0.        0.       0.      0.
                                        0.        0.       0.      0.
                                        0.                             )

           BODY807_NUT_PREC_DEC  = (   -0.51      0.       0.      0.
                                        0.       -0.20     0.      0.
                                        0.        0.       0.      0.
                                        0.        0.       0.      0.
                                        0.                             )

           BODY807_NUT_PREC_PM   = (   -0.48      0.       0.      0.
                                        0.        0.19     0.      0.
                                        0.        0.       0.      0.
                                        0.        0.       0.      0.
                                        0.                             )
           \begintext



     Proteus

        Current values:


           \begindata

           BODY808_POLE_RA       = (  299.27       0.          0.  )
           BODY808_POLE_DEC      = (   42.91       0.          0.  )
           BODY808_PM            = (   93.38     320.7654228   0.  )
           BODY808_LONG_AXIS     = (    0.                         )


           BODY808_NUT_PREC_RA   = (    0.70      0.       0.      0.
                                        0.        0.      -0.05    0.
                                        0.        0.       0.      0.
                                        0.        0.       0.      0.
                                        0.                             )

           BODY808_NUT_PREC_DEC  = (   -0.51      0.       0.      0.
                                        0.        0.      -0.04    0.
                                        0.        0.       0.      0.
                                        0.        0.       0.      0.
                                        0.                             )

           BODY808_NUT_PREC_PM   = (   -0.48      0.       0.      0.
                                        0.        0.       0.04    0.
                                        0.        0.       0.      0.
                                        0.        0.       0.      0.
                                        0.                             )
           \begintext





Satellites of Pluto

     Charon

        Values match those of the 1991 IAU report.

        Current values:

           \begindata

           BODY901_POLE_RA       = (    313.02    0.         0.  )
           BODY901_POLE_DEC      = (     +9.09    0.         0.  )
           BODY901_PM            = (     56.77  -56.3623195  0.  )
           BODY901_LONG_AXIS     = (      0.                     )

           \begintext



Orientation constants for Asteroids Gaspra and Ida
--------------------------------------------------------


Gaspra


        Current values:

           \begindata

           BODY9511010_POLE_RA       = (    9.47      0.         0.  )
           BODY9511010_POLE_DEC      = (  +26.70      0.         0.  )
           BODY9511010_PM            = (   83.67  +1226.9114850  0.  )
           BODY9511010_LONG_AXIS     = (    0.                       )

           \begintext


Ida

        Current values:

           \begindata

           BODY2431010_POLE_RA       = (  348.76      0.         0.  )
           BODY2431010_POLE_DEC      = (  +87.12      0.         0.  )
           BODY2431010_PM            = (  265.95  -1864.6280070  0.  )
           BODY2431010_LONG_AXIS     = (    0.                       )

           \begintext




Radii of Sun and Planets
--------------------------------------------------------


Sun

     Value for the Sun is from the [2], page K7.

        \begindata

        BODY10_RADII      = (   696000.     696000.      696000.     )

        \begintext


Mercury

     Old values:

        Values for Mercury are the same in the 1991 and 1994 reports.

     Current values:

        \begindata

        BODY199_RADII     = (     2439.7      2439.7      2439.7     )

        \begintext


Venus

     Old values:

        Values for Venus are the same in the 1991 and 1994 reports.

     Current values:

        \begindata

        BODY299_RADII     = (     6051.8      6051.8      6051.8     )

        \begintext


Earth

     Old values:

        Values for the Earth are the same in the 1991 and 1994 reports.

     Current values:

        \begindata

        BODY399_RADII     = (     6378.140    6378.140     6356.75   )

        \begintext


Mars


     Old values:

        Values for Mars are the same in the 1991 and 1994 reports.

     Current values:

        \begindata

        BODY499_RADII       = (     3397.      3397.         3375.     )

        \begintext



Jupiter

     Old values:

        Values for Jupiter are the same in the 1991 and 1994 reports.

     Current values:

        \begindata

        BODY599_RADII     = (    71492.      71492.       66854.     )

        \begintext



Saturn

     Old values:

        Values for Saturn are the same in the 1991 and 1994 reports.

     Current values:

        \begindata

        BODY699_RADII     = (    60268.      60268.       54364.     )

        \begintext



Uranus

     Old values:

        Values for Uranus are the same in the 1991 and 1994 reports.

     Current values:

        \begindata

        BODY799_RADII     = (    25559.      25559.       24973.     )

        \begintext



Neptune

     Old values:

        Values for Neptune are the same in the 1991 and 1994 reports.


     Current values:

        (Values are for the 1 bar pressure level.)

        \begindata

        BODY899_RADII   = (    24764.      24764.       24341.     )

        \begintext



Pluto

     Old values:

        BODY999_RADII     = (     1151.       1151.        1151.     )

     Current values:

        \begindata

        BODY999_RADII     = (     1195.       1195.        1195.     )

        \begintext




Radii of Satellites
--------------------------------------------------------


Moon

     Old values:

        Values for the Moon are the same in the 1991 and 1994 reports.


     Current values:

        \begindata

        BODY301_RADII     = (     1737.4      1737.4       1737.4    )

        \begintext



Satellites of Mars

     Old values:

        Values for Phobos and Deimos are the same in the 1991 and 1994
        reports.


     Current values:

        \begindata

        BODY401_RADII     = (       13.4        11.2          9.2    )
        BODY402_RADII     = (        7.5         6.1          5.2    )

        \begintext



Satellites of Jupiter

     Old values:

        Values for all satellites of Jupiter are the same in the 1991
        and 1994 reports.


     Current values:

        \begindata

        BODY501_RADII     = (     1830.       1818.7       1815.3    )
        BODY502_RADII     = (     1565.       1565.        1565.     )
        BODY503_RADII     = (     2634.       2634.        2634.     )
        BODY504_RADII     = (     2403.       2403.        2403.     )
        BODY505_RADII     = (      131.         73.          67.     )

        \begintext

        Only mean radii are available in the 1994 IAU report for bodies
        506-513.

        \begindata

        BODY506_RADII    = (  85      85      85   )
        BODY507_RADII    = (  40      40      40   )
        BODY508_RADII    = (  18      18      18   )
        BODY509_RADII    = (  14      14      14   )
        BODY510_RADII    = (  12      12      12   )
        BODY511_RADII    = (  15      15      15   )
        BODY512_RADII    = (  10      10      10   )
        BODY513_RADII    = (   5       5       5   )

        \begintext

        The value for the second radius for Thebe (body 514) is not given in
        the 1994 IAU report.  The available radii are:

           BODY514_RADII    = (  55    ---    45   )

        The 1991 report gives the mean radius of Thebe as 50km; we use this
        radius for all three axes, as we do for the satellites for which only
        the mean radius is available.

        \begindata

        BODY514_RADII    = (  50      50      50   )
        BODY515_RADII    = (  13      10       8   )

        \begintext

        The value for the second radius for body 516 is not given in
        1994 IAU report.   The values given are:

           BODY516_RADII    = (  20   ---   20   )

        The 1994 report gives the mean radius of Metis as 20km; we use this
        radius for all three axes, as we do for the satellites for which only
        the mean radius is available.

        \begindata

        BODY516_RADII    = (  20      20    20   )

        \begintext



Satellites of Saturn


     Old values:

        body601_radii     = (      210.3       197.4        192.6    )
        body602_radii     = (      256.2       247.3        244.0    )
        body603_radii     = (      535.6       528.2        525.8    )
        body604_radii     = (      560.        560.         560.     )
        body605_radii     = (      764.        764.         764.     )
        body606_radii     = (     2575.       2575.        2575.     )
        body607_radii     = (      180.        140.         112.5    )
        body608_radii     = (      718.        718.         718.     )
        body609_radii     = (      115.        110.         105.     )
        body610_radii     = (       97.         95.          77.     )
        body611_radii     = (       69.         55.          55.     )
        body612_radii     = (       16          16           16      )
        body613_radii     = (       15          12.5          7.5    )
        body614_radii     = (       15           8            8      )
        body615_radii     = (       18.5        17.2         13.5    )
        body616_radii     = (       74          50           34      )
        body617_radii     = (       55          44           31      )
        body618_radii     = (       10          10           10      )


     Current values:

        \begindata

        BODY601_RADII     = (      209.1       196.2        191.4    )
        BODY602_RADII     = (      256.3       247.3        244.6    )
        BODY603_RADII     = (      535.6       528.2        525.8    )
        BODY604_RADII     = (      560.        560.         560.     )
        BODY605_RADII     = (      764.        764.         764.     )
        BODY606_RADII     = (     2575.       2575.        2575.     )
        BODY607_RADII     = (      180.        140.         112.5    )
        BODY608_RADII     = (      718.        718.         718.     )
        BODY609_RADII     = (      115.        110.         105.     )
        BODY610_RADII     = (       97.         95.          77.     )
        BODY611_RADII     = (       69.         55.          55.     )

        \begintext

        Only the first equatorial radius for Helene (body 612) is given in the
        1994 IAU report:

            BODY612_RADII     = (       17.5        ---          ---     )

        The mean radius is 16km; we use this radius for all three axes, as
        we do for the satellites for which only the mean radius is available.


        \begindata

        BODY612_RADII     = (       16          16           16      )
        BODY613_RADII     = (       15          12.5          7.5    )
        BODY614_RADII     = (       15           8            8      )
        BODY615_RADII     = (       18.5        17.2         13.5    )
        BODY616_RADII     = (       74          50           34      )
        BODY617_RADII     = (       55          44           31      )

        \begintext


         For Pan, only a mean radius is given in the 1994 report.

        \begindata

        BODY618_RADII     = (       10          10           10      )

        \begintext



Satellites of Uranus

     All radii of Uranian satellites are the same as in the 1991
     report.

     Current values:

        \begindata

        BODY701_RADII     = (      581.1       577.9        577.7    )
        BODY702_RADII     = (      584.7       584.7        584.7    )
        BODY703_RADII     = (      788.9       788.9        788.9    )
        BODY704_RADII     = (      761.4       761.4        761.4    )
        BODY705_RADII     = (      240.4       234.2        232.9    )

        \begintext

        The 1994 report gives only mean radii for satellites 706--715.

        \begindata

        BODY706_RADII     = (      13.          13.          13.    )
        BODY707_RADII     = (      15.          15.          15.    )
        BODY708_RADII     = (      21.          21.          21.    )
        BODY709_RADII     = (      31.          31.          31.    )
        BODY710_RADII     = (      27.          27.          27.    )
        BODY711_RADII     = (      42.          42.          42.    )
        BODY712_RADII     = (      54.          54.          54.    )
        BODY713_RADII     = (      27.          27.          27.    )
        BODY714_RADII     = (      33.          33.          33.    )
        BODY715_RADII     = (      77.          77.          77.    )

        \begintext




Satellites of Neptune


     All values match those of the 1991 IAU report.

     Current values:

        The 1994 report gives mean radii only for bodies 801-806.

        \begindata

        BODY801_RADII     = (     1352.6      1352.6      1352.6     )
        BODY802_RADII     = (      170         170         170       )
        BODY803_RADII     = (       29          29          29       )
        BODY804_RADII     = (       40          40          40       )
        BODY805_RADII     = (       74          74          74       )
        BODY806_RADII     = (       79          79          79       )

        \begintext


        The second equatorial radius for Larissa is not given in the 1994
        report.  The available values are:

            BODY807_RADII     = (   104     ---     89   )

        The mean radius is 96km; we use this radius for all three axes, as
        we do for the satellites for which only the mean radius is available.

        \begindata

        BODY807_RADII     = (    96      96       96  )
        BODY808_RADII     = (   218     208      201  )

        \begintext





Satellites of Pluto


     All values match those of the 1991 IAU report.


     Current values:

        \begindata

        BODY901_RADII     = (      593.        593.         593.     )

        \begintext



Radii of Asteroids Gaspra and Ida
--------------------------------------------------------


Gaspra


     Current values:


        \begindata

        BODY9511010_RADII     = (     9.1     5.2     4.4     )

        \begintext




Ida


     Current values:


        \begindata

        BODY2431010_RADII     = (    26.8     12.0    7.6     )

        \begintext