Procedure

     SPKS14 ( S/P Kernel, subset, type 14 )

     SUBROUTINE SPKS14 ( SRCHAN, SRCDSC, DSTHAN, DSTDSC, DSTSID )

Abstract

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

Required_Reading

     SPK

Keywords

     EPHEMERIS

Declarations

     IMPLICIT NONE

     INTEGER               SRCHAN
     DOUBLE PRECISION      SRCDSC(*)
     INTEGER               DSTHAN
     DOUBLE PRECISION      DSTDSC(*)
     CHARACTER*(*)         DSTSID

Brief_I/O

     VARIABLE  I/O  DESCRIPTION
     --------  ---  --------------------------------------------------
     SRCHAN     I   Handle of the SPK file with the source segment.
     SRCDSC     I   Descriptor for the source segment.
     DSTHAN     I   Handle of the SPK file for the destination segment.
     DSTDSC     I   Descriptor for the destination segment.
     DSTSID     I   Segment identifier for the new segment.

Detailed_Input

     SRCHAN   is the handle of the SPK file containing the source
              segment.

     SRCDSC   is the SPK descriptor for the source segment.

     DSTHAN   is the handle of the SPK file containing the new segment.

     DSTDSC   is the SPK descriptor for the destination segment. It
              contains the desired start and stop times for the
              requested subset.

     DSTSID   is the segment identifier for the destination segment.

Detailed_Output

     None.

Parameters

     None.

Exceptions

     1)  If the length of the SPK record that is to be moved is larger
         than MAXREC, the error SPICE(SPKRECTOOLARGE) is signaled.

Files

     See arguments SRCHAN, DSTHAN.

Particulars

     This subroutine copies a subset of the data form one SPK segment
     to another.

     The exact structure of a segment of SPK type 14 is detailed in
     the SPK Required Reading. Please see this document for details.

Examples

     None.

Restrictions

     1)  We assume that the source descriptor actually describes a
         segment in the source SPK file containing the time coverage
         that is desired for the subsetting operation.

Literature_References

     None.

Author_and_Institution

     J. Diaz del Rio    (ODC Space)
     K.R. Gehringer     (JPL)

Version

    SPICELIB Version 1.0.1, 03-JUN-2021 (JDR)

        Edited the header to comply with NAIF standard.

    SPICELIB Version 1.0.0, 08-MAR-1995 (KRG)