1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
//! Declare parameters specific to SPK type 19.
//!
//! ```text
//! C$ Abstract
//! C
//! C Declare parameters specific to SPK type 19.
//! C
//! C$ Disclaimer
//! C
//! C THIS SOFTWARE AND ANY RELATED MATERIALS WERE CREATED BY THE
//! C CALIFORNIA INSTITUTE OF TECHNOLOGY (CALTECH) UNDER A U.S.
//! C GOVERNMENT CONTRACT WITH THE NATIONAL AERONAUTICS AND SPACE
//! C ADMINISTRATION (NASA). THE SOFTWARE IS TECHNOLOGY AND SOFTWARE
//! C PUBLICLY AVAILABLE UNDER U.S. EXPORT LAWS AND IS PROVIDED "AS-IS"
//! C TO THE RECIPIENT WITHOUT WARRANTY OF ANY KIND, INCLUDING ANY
//! C WARRANTIES OF PERFORMANCE OR MERCHANTABILITY OR FITNESS FOR A
//! C PARTICULAR USE OR PURPOSE (AS SET FORTH IN UNITED STATES UCC
//! C SECTIONS 2312-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE
//! C SOFTWARE AND RELATED MATERIALS, HOWEVER USED.
//! C
//! C IN NO EVENT SHALL CALTECH, ITS JET PROPULSION LABORATORY, OR NASA
//! C BE LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING, BUT NOT
//! C LIMITED TO, INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND,
//! C INCLUDING ECONOMIC DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS,
//! C REGARDLESS OF WHETHER CALTECH, JPL, OR NASA BE ADVISED, HAVE
//! C REASON TO KNOW, OR, IN FACT, SHALL KNOW OF THE POSSIBILITY.
//! C
//! C RECIPIENT BEARS ALL RISK RELATING TO QUALITY AND PERFORMANCE OF
//! C THE SOFTWARE AND ANY RELATED MATERIALS, AND AGREES TO INDEMNIFY
//! C CALTECH AND NASA FOR ALL THIRD-PARTY CLAIMS RESULTING FROM THE
//! C ACTIONS OF RECIPIENT IN THE USE OF THE SOFTWARE.
//! C
//! C$ Required_Reading
//! C
//! C SPK
//! C
//! C$ Keywords
//! C
//! C SPK
//! C
//! C$ Restrictions
//! C
//! C None.
//! C
//! C$ Author_and_Institution
//! C
//! C N.J. Bachman (JPL)
//! C B.V. Semenov (JPL)
//! C
//! C$ Literature_References
//! C
//! C None.
//! C
//! C$ Version
//! C
//! C- SPICELIB Version 2.0.0, 11-MAY-2015 (NJB)
//! C
//! C Updated to support subtype 2.
//! C
//! C- SPICELIB Version 1.0.0, 07-MAR-2014 (NJB) (BVS)
//! C
//! C-&
//!
//!
//! C
//! C Maximum polynomial degree supported by the current
//! C implementation of this SPK type.
//! C
//! C The degree is compatible with the maximum degrees
//! C supported by types 13 and 21.
//! C
//! INTEGER MAXDEG
//! PARAMETER ( MAXDEG = 27 )
//!
//! C
//! C Integer code indicating `true':
//! C
//! INTEGER ITRUE
//! PARAMETER ( ITRUE = 1 )
//!
//! C
//! C Integer code indicating `false':
//! C
//! INTEGER IFALSE
//! PARAMETER ( IFALSE = -1 )
//!
//! C
//! C SPK type 19 subtype codes:
//! C
//! C
//! C Subtype 0: Hermite interpolation, 12-element packets.
//! C
//! INTEGER S19TP0
//! PARAMETER ( S19TP0 = 0 )
//!
//! C
//! C Subtype 1: Lagrange interpolation, 6-element packets.
//! C
//! INTEGER S19TP1
//! PARAMETER ( S19TP1 = S19TP0 + 1 )
//!
//! C
//! C Subtype 2: Hermite interpolation, 6-element packets.
//! C
//! INTEGER S19TP2
//! PARAMETER ( S19TP2 = S19TP1 + 1 )
//!
//!
//! C
//! C Packet sizes associated with the various subtypes:
//! C
//! INTEGER S19PS0
//! PARAMETER ( S19PS0 = 12 )
//!
//! INTEGER S19PS1
//! PARAMETER ( S19PS1 = 6 )
//!
//! INTEGER S19PS2
//! PARAMETER ( S19PS2 = 6 )
//!
//! C
//! C Number of subtypes:
//! C
//! INTEGER S19NST
//! PARAMETER ( S19NST = 3 )
//!
//! C
//! C Maximum packet size for type 19:
//! C
//! INTEGER S19MXZ
//! PARAMETER ( S19MXZ = S19PS0 )
//!
//! C
//! C Minimum packet size for type 19:
//! C
//! INTEGER S19MNZ
//! PARAMETER ( S19MNZ = S19PS1 )
//!
//! C
//! C The SPKPVN record size declared in spkrec.inc must be at least as
//! C large as the maximum possible size of an SPK type 19 record.
//! C
//! C The largest possible SPK type 19 record has subtype 1 (note that
//! C records of subtype 0 have half as many epochs as those of subtype
//! C 1, for a given polynomial degree). A type 1 record contains
//! C
//! C - The subtype and packet count
//! C - MAXDEG+1 packets of size S19PS1
//! C - MAXDEG+1 time tags
//! C
//! INTEGER MAXRSZ
//! PARAMETER ( MAXRSZ = 2 + (MAXDEG+1)*(S19PS1+1) )
//!
//! C
//! C End of include file spk19.inc.
//! C
//! ```
pub const MAXDEG: i32 = 27;
pub const ITRUE: i32 = 1;
pub const IFALSE: i32 = -1;
pub const S19TP0: i32 = 0;
pub const S19TP1: i32 = ;
pub const S19TP2: i32 = ;
pub const S19PS0: i32 = 12;
pub const S19PS1: i32 = 6;
pub const S19PS2: i32 = 6;
pub const S19NST: i32 = 3;
pub const S19MXZ: i32 = S19PS0;
pub const S19MNZ: i32 = S19PS1;
pub const MAXRSZ: i32 = ;