Table of contents
CSPICE_CKW01 adds a type 1 segment to a C-kernel.
Given:
handle the handle of the CK file to which the segment will be written.
help, handle
LONG = Scalar
The file must have been opened with write access.
begtim the beginning encoded SCLK time of the segment.
help, begtim
DOUBLE = Scalar
This value should be less than or equal to the first time in
the segment.
endtim the encoded SCLK time at which the segment ends.
help, endtim
DOUBLE = Scalar
This value should be greater than or equal to the last time in
the segment.
inst the NAIF integer ID code for the instrument.
help, inst
LONG = Scalar
ref a character string which specifies the reference frame of the
segment.
help, ref
STRING = Scalar
This should be one of the frames supported by the Icy routine
cspice_namfrm.
avflag a logical flag which indicates whether or not the segment will
contain angular velocity.
help, avflag
BOOLEAN = Scalar
segid the segment identifier.
help, segid
STRING = Scalar
A CK segment identifier may contain up to 40 characters.
sclkdp the encoded spacecraft clock times associated with each pointing
instance.
help, sclkdp
DOUBLE = Array[N]
These times must be strictly increasing.
quats an array of SPICE-style quaternions representing a sequence of
C-matrices.
help, quats
DOUBLE = Array[4,N]
See the discussion of quaternion styles in -Particulars below.
avvs the angular velocity vectors ( optional ).
help, avvs
DOUBLE = Array[3,N]
If `avflag' is False then this array is ignored by the
routine, however it still must be supplied as part of
the calling sequence.
the call:
cspice_ckw01, handle, begtim, endtim, inst, ref, $
avflag, segid, sclkdp, quats, avvs
writes the data for a type 1 segment to the open CK file
indicated by `handle'.
None.
Any numerical results shown for this example may differ between
platforms as the results depend on the SPICE kernels used as input
and the machine specific arithmetic implementation.
1) The following example creates a CK file with a type 1 segment
from a series of pointing instances that represent a structure
initially aligned with the J2000 frame, and which is rotating
about the J2000 z-axis. There will be one pointing instance per
10-tick interval.
Example code begins here.
PRO ckw01_ex1
;;
;; Create a CK type 1 segment; fill with data for a simple time
;; dependent rotation and angular velocity.
;;
;;
;; Define needed parameters
;;
CK1 = "ckw01_ex1.bc"
INST = -77701
MAXREC = 201
SECPERTICK = 0.001d
SPICETRUE = 1L
SEGID = "Test type 1 CK segment"
IFNAME = "Test CK type 1 segment created by cspice_ckw01"
;;
;; NCOMCH is the number of characters to reserve for the kernel's
;; comment area. This example doesn't write comments, so set to
;; zero.
;;
NCOMCH = 0
;;
;; The base reference from for the rotation data.
;;
REF = "J2000"
;;
;; Time spacing in encoded ticks.
;;
SPACING_TICKS = 10.d
;;
;; Time spacing in seconds
;;
SPACING_SECS = SPACING_TICKS * SECPERTICK
;;
;; Declare an angular rate in radians per sec.
;;
RATE = 1.d-2
;;
;; Open a new kernel.
;;
cspice_ckopn, CK1, IFNAME, NCOMCH, handle
;;
;; Create a 4xMAXREC matrix for quaternions, and a
;; 3xMAXREC for expavs.
;;
quats = dblarr( 4, MAXREC )
av = dblarr( 3, MAXREC )
;;
;; Create a 3x3 double precision identity matrix.
;; The Icy call:
;;
;; cspice_ident, work_mat
;;
;; performs the same function.
;;
work_mat = identity( 3 )
;;
;; Convert the matrix to quaternion.
;;
cspice_m2q, work_mat, work_quat
;;
;; Copy the work quaternion to the first row of
;; `quats'.
;;
quats[0:3] = work_quat
;;
;; Create an angular velocity vector. This vector is in the
;; REF reference frame.
;;
av [0:2] = [0.d, 0.d, RATE ]
;;
;; Create an array of encoded tick values in increments of
;; SPACING_TICKS with an initial value of 1000 ticks...
;;
sclkdp = dindgen(MAXREC) * SPACING_TICKS
sclkdp = sclkdp + 1000.d
;;
;; Fill the rest of the `av' and `quats' matrices
;; with simple data.
;;
for i = 1, (MAXREC-1) do begin
;;
;; Create the transformation matrix for a rotation of `theta'
;; about the Z axis. Calculate `theta' from the constant
;; angular rate RATE at increments of SPACING_SECS.
;;
theta = ( double(i) * RATE * SPACING_SECS)
cspice_rotmat, work_mat, theta, 3, work_mat
;;
;; Convert the `work_mat' matrix to SPICE type quaternion.
;;
cspice_m2q, work_mat, work_quat
;;
;; Store the quaternion in the `quats' matrix.
;; Store angular velocity in `av'. Both variables
;; represent arrays, but in IDL you can fill them
;; as vectors.
;;
;;
quats[ (i*4):((i*4)+3) ] = work_quat
av [ (i*3):((i*3)+2) ] = [ 0.d, 0.d, RATE ]
endfor
;;
;; This segment contains angular velocity.
;;
avflag = SPICETRUE
;;
;; Set the segment boundaries equal to the first and last
;; time for the data arrays.
;;
begtim = sclkdp[ 0]
endtim = sclkdp[MAXREC-1]
;;
;; All information ready to write. Write to a CK type 1 segment
;; to the file indicated by `handle'.
;;
cspice_ckw01, handle, $
begtim, $
endtim, $
INST, $
REF, $
avflag, $
SEGID , $
sclkdp, $
quats, $
av
;;
;; SAFELY close the file
;;
cspice_ckcls, handle
END
When this program is executed, no output is presented on
screen. After run completion, a new CK file exists in the
output directory.
For a detailed description of a type 1 CK segment please see the
CK Required Reading.
This routine relieves the user from performing the repetitive
calls to the DAF routines necessary to construct a CK segment.
Quaternion Styles
-----------------
There are different "styles" of quaternions used in
science and engineering applications. Quaternion styles
are characterized by
- The order of quaternion elements
- The quaternion multiplication formula
- The convention for associating quaternions
with rotation matrices
Two of the commonly used styles are
- "SPICE"
> Invented by Sir William Rowan Hamilton
> Frequently used in mathematics and physics textbooks
- "Engineering"
> Widely used in aerospace engineering applications
Icy routine interfaces ALWAYS use SPICE quaternions.
Quaternions of any other style must be converted to SPICE
quaternions before they are passed to Icy routines.
Relationship between SPICE and Engineering Quaternions
------------------------------------------------------
Let `m' be a rotation matrix such that for any vector `v',
m*v
is the result of rotating `v' by theta radians in the
counterclockwise direction about unit rotation axis vector `a'.
Then the SPICE quaternions representing `m' are
(+/-) ( cos(theta/2),
sin(theta/2) a[0],
sin(theta/2) a[1],
sin(theta/2) a[2] )
while the engineering quaternions representing `m' are
(+/-) ( -sin(theta/2) a[0],
-sin(theta/2) a[1],
-sin(theta/2) a[2],
cos(theta/2) )
For both styles of quaternions, if a quaternion q represents
a rotation matrix `m', then -q represents `m' as well.
Given an engineering quaternion
qeng = ( q0, q1, q2, q3 )
the equivalent SPICE quaternion is
qspice = ( q3, -q0, -q1, -q2 )
Associating SPICE Quaternions with Rotation Matrices
----------------------------------------------------
Let `from' and `to' be two right-handed reference frames, for
example, an inertial frame and a spacecraft-fixed frame. Let the
symbols
v , v
from to
denote, respectively, an arbitrary vector expressed relative to
the `from' and `to' frames. Let `m' denote the transformation matrix
that transforms vectors from frame `from' to frame `to'; then
v = m * v
to from
where the expression on the right hand side represents left
multiplication of the vector by the matrix.
Then if the unit-length SPICE quaternion q represents `m', where
q = (q0, q1, q2, q3)
the elements of `m' are derived from the elements of q as follows:
.- -.
| 2 2 |
| 1 - 2*( q2 + q3 ) 2*(q1*q2 - q0*q3) 2*(q1*q3 + q0*q2) |
| |
| |
| 2 2 |
m = | 2*(q1*q2 + q0*q3) 1 - 2*( q1 + q3 ) 2*(q2*q3 - q0*q1) |
| |
| |
| 2 2 |
| 2*(q1*q3 - q0*q2) 2*(q2*q3 + q0*q1) 1 - 2*( q1 + q2 ) |
| |
`- -'
Note that substituting the elements of -q for those of q in the
right hand side leaves each element of `m' unchanged; this shows
that if a quaternion q represents a matrix `m', then so does the
quaternion -q.
To map the rotation matrix `m' to a unit quaternion, we start by
decomposing the rotation matrix as a sum of symmetric
and skew-symmetric parts:
2
m = [ i + (1-cos(theta)) omega ] + [ sin(theta) omega ]
symmetric skew-symmetric
`omega' is a skew-symmetric matrix of the form
.- -.
| 0 -n3 n2 |
| |
omega = | n3 0 -n1 |
| |
| -n2 n1 0 |
`- -'
The vector N of matrix entries (n1, n2, n3) is the rotation axis
of `m' and theta is M's rotation angle. Note that N and theta
are not unique.
Let
C = cos(theta/2)
s = sin(theta/2)
Then the unit quaternions `q' corresponding to `m' are
q = +/- ( C, S*n1, S*n2, S*n3 )
The mappings between quaternions and the corresponding rotations
are carried out by the Icy routines
cspice_q2m {quaternion to matrix}
cspice_m2q {matrix to quaternion}
cspice_m2q always returns a quaternion with scalar part greater than
or equal to zero.
SPICE Quaternion Multiplication Formula
---------------------------------------
Given a SPICE quaternion
q = ( q0, q1, q2, q3 )
corresponding to rotation axis `a' and angle theta as above, we can
represent `q' using "scalar + vector" notation as follows:
s = q0 = cos(theta/2)
v = ( q1, q2, q3 ) = sin(theta/2) * a
q = s + v
Let `q1' and `q2' be SPICE quaternions with respective scalar
and vector parts s1, s2 and v1, v2:
q1 = s1 + v1
q2 = s2 + v2
We represent the dot product of v1 and v2 by
<v1, v2>
and the cross product of v1 and v2 by
v1 x v2
Then the SPICE quaternion product is
q1*q2 = s1*s2 - <v1,v2> + s1*v2 + s2*v1 + (v1 x v2)
If `q1' and `q2' represent the rotation matrices `m1' and `m2'
respectively, then the quaternion product
q1*q2
represents the matrix product
m1*m2
1) If `handle' is not the handle of a C-kernel opened for writing,
an error is signaled by a routine in the call tree of this
routine.
2) If `segid' is more than 40 characters long, the error
SPICE(SEGIDTOOLONG) is signaled by a routine in the call tree
of this routine.
3) If `segid' contains any nonprintable characters, the error
SPICE(NONPRINTABLECHARS) is signaled by a routine in the call
tree of this routine.
4) If the first encoded SCLK time is negative, the error
SPICE(INVALIDSCLKTIME) is signaled by a routine in the call
tree of this routine.
5) If the second encoded SCLK or any subsequent times, or if the
encoded SCLK times are not strictly increasing, the error
SPICE(TIMESOUTOFORDER) is signaled by a routine in the call
tree of this routine.
6) If `begtim' is greater than sclkdp[0] or `endtim' is less than
sclkdp[nrec-1], where `nrec' is the number of pointing records,
the error SPICE(INVALIDDESCRTIME) is signaled by a routine in
the call tree of this routine.
7) If the name of the reference frame is not one of those
supported by the routine cspice_namfrm, the error
SPICE(INVALIDREFFRAME) is signaled by a routine in the call
tree of this routine.
8) If `nrec', the number of pointing records, is less than or
equal to 0, the error SPICE(INVALIDNUMREC) is signaled by a
routine in the call tree of this routine.
9) If any quaternion has magnitude zero, the error
SPICE(ZEROQUATERNION) is signaled by a routine in the call
tree of this routine.
10) If any of the input arguments, `handle', `begtim', `endtim',
`inst', `ref', `avflag', `segid', `sclkdp', `quats' or `avvs',
is undefined, an error is signaled by the IDL error handling
system.
11) If any of the input arguments, `handle', `begtim', `endtim',
`inst', `ref', `avflag', `segid', `sclkdp', `quats' or `avvs',
is not of the expected type, or it does not have the expected
dimensions and size, an error is signaled by the Icy
interface.
12) If the input vector arguments `sclkdp', `quats' and `avvs' do
not have the same dimension (N), an error is signaled by the
Icy interface.
This routine adds a type 1 segment to a C-kernel. The C-kernel
may be either a new one or an existing one opened for writing.
None.
ICY.REQ
CK.REQ
DAF.REQ
SCLK.REQ
None.
J. Diaz del Rio (ODC Space)
E.D. Wright (JPL)
-Icy Version 1.1.0, 25-AUG-2021 (JDR)
Changed argument names "begtime" and "endtime" to "begtim" and
"endtim" for consistency with other routines.
Edited the header to comply with NAIF standard. Added example's
problem statement.
Added -Parameters, -Particulars, -Exceptions, -Files, -Restrictions,
-Literature_References and -Author_and_Institution sections.
Removed reference to the routine's corresponding CSPICE header from
-Abstract section.
Added arguments' type and size information in the -I/O section.
-Icy Version 1.0.0, 16-JUN-2003 (EDW)
write CK type_1 pointing data segment
|