Procedure

     SPKS21 ( S/P Kernel, subset, type 21 )

     SUBROUTINE SPKS21 ( HANDLE, BADDR, EADDR, BEGIN, END )

Abstract

     Extract a subset of the data in a SPK segment of type 21
     into a new segment.

Required_Reading

     DAF
     SPK
     TIME

Keywords

     EPHEMERIS

Declarations

     IMPLICIT NONE

     INCLUDE 'spk21.inc'

     INTEGER               HANDLE
     INTEGER               BADDR
     INTEGER               EADDR
     DOUBLE PRECISION      BEGIN
     DOUBLE PRECISION      END

Brief_I/O

     VARIABLE  I/O  DESCRIPTION
     --------  ---  --------------------------------------------------
     HANDLE     I   Handle of source segment.
     BADDR      I   Beginning address of source segment.
     EADDR      I   Ending address of source segment.
     BEGIN      I   Beginning (initial epoch) of subset.
     END        I   End (final epoch) of subset.

Detailed_Input

     HANDLE,
     BADDR,
     EADDR    are the file handle assigned to a SPK file, and the
              beginning and ending addresses of a segment within
              the file. Together they determine a complete set of
              ephemeris data, from which a subset is to be
              extracted.

     BEGIN,
     END      are the initial and final epochs (ephemeris time)
              of the subset to be extracted.

Detailed_Output

     None.

Parameters

     None.

Exceptions

     1)  If an error occurs while reading data from the source SPK
         file, the error is signaled by a routine in the call tree of
         this routine.

     2)  If an error occurs while writing data to the output SPK file,
         the error is signaled by a routine in the call tree of this
         routine.

Files

     See argument HANDLE.

Particulars

     The exact structure of a segment of data type 21 is detailed in
     the SPK Required Reading file.

Examples

     None.

Restrictions

     None.

Literature_References

     None.

Author_and_Institution

     N.J. Bachman       (JPL)
     J. Diaz del Rio    (ODC Space)
     F.T. Krogh         (JPL)
     B.V. Semenov       (JPL)
     W.L. Taber         (JPL)
     I.M. Underwood     (JPL)

Version

    SPICELIB Version 1.1.0, 14-OCT-2021 (JDR) (BVS)

        Bug fix: fixed routine name in CHKIN/CHKOUT calls (SPKS01 
        -> SPKS21).

        Edited the header to comply with NAIF standard. Moved SPK
        required reading from $Literature_References to
        $Required_Reading section.

    SPICELIB Version 1.0.0, 16-JAN-2014 (NJB) (FTK) (WLT) (IMU)