Table of contents
CSPICE_DSKP02 fetches triangular plates from a type 2 DSK segment.
Given:
handle the handle of a DSK file containing a type 2
segment from which data are to be fetched.
[1,1] = size(handle); int32 = class(handle)
dladsc the DLA descriptor associated with the segment
from which data are to be fetched.
[SPICE_DLA_DSCSIZ,1] = size(dladsc)
int32 = class(dladsc)
start the ID of the first plate to be fetched from the
segment designated by `handle' and `dladsc'.
[1,1] = size(start); int32 = class(start)
The ID of a plate is its ordinal position within the
segment. Plate IDs range from 1 to `np', where `np' is the
number of plates in the segment.
Note that Fortran-style 1-based indexing is used for
plate IDs because these IDs must be consistent with
the IDs used in DSK files, across all languages
supported by SPICE.
room the maximum number of plates to return.
[1,1] = size(room); int32 = class(room)
the call:
[plates] = cspice_dskp02( handle, dladsc, start, room )
returns:
plates an array representing a contiguous set of `n' plates,
where `n' is between 1 and `room' inclusive.
[3,n] = size(plates); int32 = class(plates)
The returned plates are arranged in order of increasing plate
ID. The IDs of the returned plates range from
start
to
start + n - 1
Each "plate" consists of three vertex indices.
The range of vertex indices is from 1 to NV, where NV is
the number of vertices in the segment.
The correspondence of elements of `plates' with the
elements of the set of plates contained in the segment
is:
plates(1,1) plate_set(1, start)
plates(2,1) plate_set(2, start)
plates(3,1) plate_set(3, start)
... ...
plates(1,n) plate_set(1, start+n-1)
plates(2,n) plate_set(2, start+n-1)
plates(3,n) plate_set(3, start+n-1)
If an error occurs on the call, `plates' is
undefined.
See the parameter definitions file
MiceDLA.m
for declarations of DLA descriptor sizes and documentation of the
contents of DLA descriptors.
See the parameter definitions file
MiceDSK.m
for declarations of DSK descriptor sizes and documentation of the
contents of DSK descriptors.
See the parameter definitions file
MiceDSK.m
for declarations of DSK data type 2 (plate model) parameters.
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) Look up all the vertices associated with each plate
of the model contained in a specified type 2 segment. For each
of the first 5 plates, display the plate's vertices and normal
vector.
For this example, we'll show the context of this look-up:
opening the DSK file for read access, traversing a trivial,
one-segment list to obtain the segment of interest.
Example code begins here.
function dskp02_ex1
%
% Constants
%
PBUFSIZ = 10000;
%
% Initial values
%
verts = zeros(3,3);
%
% Prompt for the name of the file to search.
%
dsk = input( 'Name of DSK file > ', 's' );
%
% Open the DSK file for read access.
% We use the DAS-level interface for
% this function.
%
handle = cspice_dasopr( dsk );
%
% Begin a forward search through the
% kernel, treating the file as a DLA.
% In this example, it's a very short
% search.
%
[dladsc, found] = cspice_dlabfs( handle );
if ~found
%
% We arrive here only if the kernel
% contains no segments. This is
% unexpected, but we're prepared for it.
%
fprintf( 'No segments found in DSK file %s\n', dsk )
return
end
%
% If we made it this far, `dladsc' is the
% DLA descriptor of the first segment.
%
% Get segment vertex and plate counts.
%
[nv, np] = cspice_dskz02( handle, dladsc );
fprintf( '\n' )
fprintf( 'Number of vertices: %d\n', nv )
fprintf( 'Number of plates: %d\n', np )
%
% Display the vertices of each of the first 5 plates.
%
remain = min(np, 5);
start = 1;
while (remain > 0 )
%
% `nread' is the number of plates we"ll read on this
% loop pass. Set `nread' to the minimum of PBUFSIZ
% and `remain'.
%
nread = min(PBUFSIZ, remain);
plates = cspice_dskp02( handle, dladsc, start, nread );
for i = 1:(nread)
plix = start + i - 1;
%
% Read the vertices of the current plate.
%
for j = 1:3
verts(j,:) = cspice_dskv02( handle, dladsc, ...
plates(j,i), 1 );
end
%
% Display the vertices of the ith plate:
%
fprintf( '\n' )
fprintf( 'Plate number: %d\n', plix )
for j = 1:3
fprintf( ' Vertex %d: ( %16.8e %16.8e %16.8e )\n', ...
j, verts(j,:) )
end
%
% Display the normal vector of the current plate:
%
normal = cspice_dskn02( handle, dladsc, plix );
fprintf( ' Normal: ( %16.8e %16.8e %16.8e )\n', normal )
end
start = start + nread;
remain = remain - nread;
end
%
% Close file.
%
cspice_dascls( handle )
When this program was executed on a Mac/Intel/Octave5.x/64-bit
platform, using the DSK file named phobos512.bds, the output
was:
Name of DSK file > phobos512.bds
Number of vertices: 1579014
Number of plates: 3145728
Plate number: 1
Vertex 1: ( -6.77444000e+00 6.26815000e+00 6.01149000e+00 )
Vertex 2: ( -6.76238000e+00 6.25728000e+00 6.02556000e+00 )
Vertex 3: ( -6.75710000e+00 6.27754000e+00 6.02096000e+00 )
Normal: ( -5.81973770e-01 3.21285613e-01 7.47048918e-01 )
Plate number: 2
Vertex 1: ( -6.77444000e+00 6.26815000e+00 6.01149000e+00 )
Vertex 2: ( -6.77973000e+00 6.24790000e+00 6.01610000e+00 )
Vertex 3: ( -6.76238000e+00 6.25728000e+00 6.02556000e+00 )
Normal: ( -5.81456950e-01 3.21988310e-01 7.47148809e-01 )
Plate number: 3
Vertex 1: ( -6.77973000e+00 6.24790000e+00 6.01610000e+00 )
Vertex 2: ( -6.76768000e+00 6.23701000e+00 6.03019000e+00 )
Vertex 3: ( -6.76238000e+00 6.25728000e+00 6.02556000e+00 )
Normal: ( -5.81597068e-01 3.22641957e-01 7.46757671e-01 )
Plate number: 4
Vertex 1: ( -6.77973000e+00 6.24790000e+00 6.01610000e+00 )
Vertex 2: ( -6.78499000e+00 6.22762000e+00 6.02070000e+00 )
Vertex 3: ( -6.76768000e+00 6.23701000e+00 6.03019000e+00 )
Normal: ( -5.83129010e-01 3.20560704e-01 7.46459237e-01 )
Plate number: 5
Vertex 1: ( -6.78499000e+00 6.22762000e+00 6.02070000e+00 )
Vertex 2: ( -6.77299000e+00 6.21674000e+00 6.03482000e+00 )
Vertex 3: ( -6.76768000e+00 6.23701000e+00 6.03019000e+00 )
Normal: ( -5.83664048e-01 3.23060196e-01 7.44962005e-01 )
This routine enables SPICE-based user applications to rapidly
fetch the plate data from a specified type 2 DSK segment. Using
a large output array generally improves efficiency.
1) If the input handle is invalid, an error is signaled by a
routine in the call tree of this routine.
2) If a file read error occurs, the error is signaled by a
routine in the call tree of this routine.
3) If the input DLA descriptor is invalid, the effect of this
routine is undefined. The error *may* be diagnosed by
routines in the call tree of this routine, but there are no
guarantees.
4) If `room' is non-positive, the error SPICE(VALUEOUTOFRANGE)
is signaled by a routine in the call tree of this routine.
5) If `start' is less than 1 or greater than the number of plates
in the segment, the error SPICE(INDEXOUTOFRANGE) is signaled
by a routine in the call tree of this routine.
6) If any of the input arguments, `handle', `dladsc', `start' or
`room', is undefined, an error is signaled by the Matlab error
handling system.
7) If any of the input arguments, `handle', `dladsc', `start' or
`room', is not of the expected type, or it does not have the
expected dimensions and size, an error is signaled by the Mice
interface.
See input argument `handle'.
None.
DAS.REQ
DSK.REQ
MICE.REQ
None.
N.J. Bachman (JPL)
J. Diaz del Rio (ODC Space)
M. Liukis (JPL)
E.D. Wright (JPL)
-Mice Version 1.1.0, 21-JUL-2020 (EDW) (JDR)
Fixed typos in code example.
Edited the header to comply with NAIF standard. Updated
code example to prompt for the input DSK file and reduce the
number of plates whose vertices are shown on output.
Added -Parameters, -Exceptions, -Files, -Restrictions,
-Literature_References and -Author_and_Institution sections, and
completed -Particulars section.
Eliminated use of "lasterror" in rethrow.
Removed reference to the function's corresponding CSPICE header from
-Required_Reading section.
-Mice Version 1.0.0, 04-APR-2017 (NJB) (EDW) (ML)
fetch plate data from a type 2 DSK segment
|