C$ Abstract
C
C     Declarations of the CK data type specific and general CK low
C     level routine parameters.
C
C$ Required_Reading
C
C     CK.REQ
C
C$ Keywords
C
C     CK
C
C$ Restrictions
C
C     1) If new CK types are added, the size of the record passed 
C        between CKRxx and CKExx must be registered as separate 
C        parameter. If this size will be greater than current value 
C        of the CKMRSZ parameter (which specifies the maximum record 
C        size for the record buffer used inside CKPFS) then it should
C        be assigned to CKMRSZ as a new value.
C
C$ Author_and_Institution
C
C     B.V. Semenov      (JPL)
C
C$ Literature_References
C
C     CK Required Reading.
C
C$ Version
C
C-    SPICELIB Version 1.0.0, 05-04-99 (BVS)
C
C-&

C
C     Number of quaternion components and number of quaternion and 
C     angular rate components together.
C
      INTEGER               QSIZ
      PARAMETER           ( QSIZ   = 4 )
      
      INTEGER               QAVSIZ
      PARAMETER           ( QAVSIZ = 7 )

C
C     CK Type 1 parameters:
C
C     CK1DTP   CK data type 1 ID;
C
C     CK1RSZ   maximum size of a record passed between CKR01
C              and CKE01.
C
      INTEGER               CK1DTP
      PARAMETER           ( CK1DTP = 1 )

      INTEGER               CK1RSZ
      PARAMETER           ( CK1RSZ = 8 )

C
C     CK Type 2 parameters:
C
C     CK2DTP   CK data type 2 ID;
C
C     CK2RSZ   maximum size of a record passed between CKR02 
C              and CKE02.
C
      INTEGER               CK2DTP
      PARAMETER           ( CK2DTP = 2 )

      INTEGER               CK2RSZ
      PARAMETER           ( CK2RSZ = 10 )


C
C     CK Type 3 parameters:
C
C     CK3DTP   CK data type 3 ID;
C
C     CK3RSZ   maximum size of a record passed between CKR03 
C              and CKE03.
C
      INTEGER               CK3DTP
      PARAMETER           ( CK3DTP = 3 )

      INTEGER               CK3RSZ
      PARAMETER           ( CK3RSZ = 17 )

C
C     CK Type 4 parameters:
C
C     CK4DTP   CK data type 4 ID;
C
C     CK4PCD   parameter defining integer to DP packing schema that 
C              is applied when seven number integer array containing 
C              polynomial degrees for quaternion and angular rate 
C              components packed into a single DP number stored in 
C              actual CK records in a file; the value of must not be
C              changed or compatibility with existing type 4 CK files 
C              will be lost.
C
C     CK4MXD   maximum Chebychev polynomial degree allowed in type 4
C              records; the value of this parameter must never exceed 
C              value of the CK4PCD;
C
C     CK4SFT   number of additional DPs, which are not polynomial 
C              coefficients, located at the beginning of a type 4 
C              CK record that passed between routines CKR04 and CKE04; 
C              
C     CK4RSZ   maximum size of type 4 CK record passed between CKR04 
C              and CKE04; CK4RSZ is computed as follows:
C
C                 CK4RSZ = ( CK4MXD + 1 ) * QAVSIZ + CK4SFT 
C
      INTEGER               CK4DTP
      PARAMETER           ( CK4DTP = 4 )

      DOUBLE PRECISION      CK4PCD
      PARAMETER           ( CK4PCD = 128.D0 )
      
      INTEGER               CK4MXD
      PARAMETER           ( CK4MXD = 18 )
      
      INTEGER               CK4SFT
      PARAMETER           ( CK4SFT = 10 )
      
      INTEGER               CK4RSZ
      PARAMETER           ( CK4RSZ = ( CK4MXD + 1 ) * QAVSIZ + CK4SFT )

C
C     Maximum record size that can be handled by CKPFS. This value 
C     must be set to the maximum of all CKxRSZ parameters (currently
C     CK4RSZ.)
C
      INTEGER               CKMRSZ
      PARAMETER           ( CKMRSZ = CK4RSZ )