Index Page
pdpool
A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X 

Procedure
Abstract
Required_Reading
Keywords
Declarations
Brief_I/O
Detailed_Input
Detailed_Output
Parameters
Exceptions
Files
Particulars
Examples
Restrictions
Literature_References
Author_and_Institution
Version

Procedure

 PDPOOL ( Put d.p.'s into the kernel pool )

      ENTRY PDPOOL ( NAME, N, VALUES )

Abstract

     This entry point provides toolkit programmers a method for
     programmatically inserting double precision data into the
     kernel pool.

Required_Reading

      None.

Keywords

      POOL

Declarations

     CHARACTER*(*)         NAME
     INTEGER               N
     DOUBLE PRECISION      VALUES ( * )

Brief_I/O

     VARIABLE  I/O  DESCRIPTION
     --------  ---  --------------------------------------------------
     NAME       I   The kernel pool name to associate with VALUES.
     N          I   The number of values to insert.
     VALUES     I   An array of values to insert into the kernel pool.

Detailed_Input

     NAME       is the name of the kernel pool variable to associate
                with the values supplied in the array VALUES

     N          is the number of values to insert into the kernel pool.

     VALUES     is an array of d.p. values to insert into the kernel
                pool.

Detailed_Output

     None.

Parameters

     None.

Exceptions

     1) If NAME is already present in the kernel pool and there
        is sufficient room to hold all values supplied in VALUES,
        the old values associated with NAME will be overwritten.

     2) If there is not sufficient room to insert a new variable
        into the kernel pool and NAME is not already present in
        the kernel pool, the error SPICE(KERNELPOOLFULL) is
        signaled by a routine in the call tree to this routine.

     3) If there is not sufficient room to insert the values associated
        with NAME, the error 'SPICE(NOMOREROOM)' will be signaled.

     4) The error 'SPICE(BADVARNAME)' signals if the kernel pool 
        variable name length exceeds MAXLEN.

Files

     None.

Particulars

     This entry point provides a programmatic interface for inserting
     data into the SPICE kernel pool without reading an external file.

Examples

     Suppose that you wish to supply default values for a program
     so that it may function even in the absence of the appropriate
     text kernels.  You can use the entry points PCPOOL, PDPOOL
     and PIPOOL to initialize the kernel pool with suitable
     values at program initialization.  The example below shows
     how you might set up various kernel pool variables that might
     be required by a program.


        Set up the relationship between the EARTH_BODYFIXED frame
        and the IAU_EARTH frame.

        CALL IDENT  ( MATRIX )
        CALL PCPOOL ( 'TKFRAME_EARTH_FIXED_SPEC',     1, 'MATRIX'    )
        CALL PCPOOL ( 'TKFRAME_EARTH_FIXED_RELATIVE', 1, 'IAU_EARTH' )
        CALL PDPOOL ( 'TKFRAME_EARTH_FIXED_MATRIX',   9,  MATRIX )


        Load the IAU model for the earth's rotation and shape.


        RA ( 1 ) =  0.0D0
        RA ( 2 ) = -0.641D0
        RA ( 3 ) =  0.0D0

        DEC( 1 ) = 90.0D0
        DEC( 2 ) = -0.557D0
        DEC( 3 ) =  0.0D0

        PM ( 1 ) = 190.16D0
        PM ( 2 ) = 360.9856235D0
        PM ( 3 ) =   0.0D0

        R  ( 1 ) =  6378.140D0
        R  ( 2 ) =  6378.140D0
        R  ( 3 ) =  6356.75D0

        CALL PDPOOL ( 'BODY399_POLE_RA',   3, RA  )
        CALL PDPOOL ( 'BODY399_POLE_DEC',  3, DEC )
        CALL PDPOOL ( 'BODY399_PM',        3, PM  )
        CALL PDPOOL ( 'BODY399_RADII',     3, R   )


        Set up a preliminary set of leapsecond values.

        CALL PDPOOL ( 'DELTET/DELTA_T_A', 1, 32.184D0  )
        CALL PDPOOL ( 'DELTET/K',         1,  1.657D-3 )
        CALL PDPOOL ( 'DELTET/EB',        1,  1.671D-2 )

        VALUES(1) = 6.23999600D0
        VALUES(2) = 1.99096871D-7

        CALL PDPOOL ( 'DELTET/M', 2, VALUES )


        VALUES(  1 ) = 10
        VALUES(  3 ) = 11
        VALUES(  5 ) = 12
        VALUES(  7 ) = 13
        VALUES(  9 ) = 14
        VALUES( 11 ) = 15
        VALUES( 13 ) = 16
        VALUES( 15 ) = 17
        VALUES( 17 ) = 18
        VALUES( 19 ) = 19
        VALUES( 21 ) = 20
        VALUES( 23 ) = 21
        VALUES( 25 ) = 22
        VALUES( 27 ) = 23
        VALUES( 29 ) = 24
        VALUES( 31 ) = 25
        VALUES( 33 ) = 26
        VALUES( 35 ) = 27
        VALUES( 37 ) = 28
        VALUES( 39 ) = 29
        VALUES( 41 ) = 30
        VALUES( 43 ) = 31

        CALL TPARSE ( '1972-JAN-1', VALUES(2),  ERROR )
        CALL TPARSE ( '1972-JUL-1', VALUES(4),  ERROR )
        CALL TPARSE ( '1973-JAN-1', VALUES(6),  ERROR )
        CALL TPARSE ( '1974-JAN-1', VALUES(8),  ERROR )
        CALL TPARSE ( '1975-JAN-1', VALUES(10), ERROR )
        CALL TPARSE ( '1976-JAN-1', VALUES(12), ERROR )
        CALL TPARSE ( '1977-JAN-1', VALUES(14), ERROR )
        CALL TPARSE ( '1978-JAN-1', VALUES(16), ERROR )
        CALL TPARSE ( '1979-JAN-1', VALUES(18), ERROR )
        CALL TPARSE ( '1980-JAN-1', VALUES(20), ERROR )
        CALL TPARSE ( '1981-JUL-1', VALUES(22), ERROR )
        CALL TPARSE ( '1982-JUL-1', VALUES(24), ERROR )
        CALL TPARSE ( '1983-JUL-1', VALUES(26), ERROR )
        CALL TPARSE ( '1985-JUL-1', VALUES(28), ERROR )
        CALL TPARSE ( '1988-JAN-1', VALUES(30), ERROR )
        CALL TPARSE ( '1990-JAN-1', VALUES(32), ERROR )
        CALL TPARSE ( '1991-JAN-1', VALUES(34), ERROR )
        CALL TPARSE ( '1992-JUL-1', VALUES(36), ERROR )
        CALL TPARSE ( '1993-JUL-1', VALUES(38), ERROR )
        CALL TPARSE ( '1994-JUL-1', VALUES(40), ERROR )
        CALL TPARSE ( '1996-JAN-1', VALUES(42), ERROR )
        CALL TPARSE ( '1997-JUL-1', VALUES(44), ERROR )

        CALL PDPOOL ( 'DELTET/DELTA_AT',  44, VALUES )

Restrictions

     None.

Literature_References

     None.

Author_and_Institution

     N.J. Bachman    (JPL)
     W.L. Taber      (JPL)
     B.V. Semenov    (JPL)

Version

    SPICELIB Version 9.1.0, 17-JAN-2014 (BVS) (NJB)

        Updated to increment POOL state counter.
        Updated Index_Entries section.

    SPICELIB Version 9.0.0, 24-MAY-2010 (EDW)

        Added an error check on the length of the kernel pool variable
        name argument to enforce the variable name length does not
        exceed MAXLEN.

    SPICELIB Version 8.1.0, 19-MAR-2009 (NJB)

        Watcher update code was re-written for compatibility
        with new watcher system implementation.

    SPICELIB Version 8.0.0, 04-JUN-1999 (WLT)

        Added the entry points PCPOOL, PDPOOL and PIPOOL to allow
        direct insertion of data into the kernel pool without having
        to read an external file.

        Added the interface LMPOOL that allows SPICE
        programs to load text kernels directly from memory instead
        of requiring a text file.

        Added the entry point SZPOOL to return kernel pool definition
        parameters.

        Added the entry point DVPOOL to allow the removal of a variable
        from the kernel pool.

        Added the entry point GNPOOL to allow users to determine
        variables that are present in the kernel pool
Wed Apr  5 17:47:03 2017