Demo two of the five NORAD element propagators.

------------------------------------------------------------------------
See also NORAD
------------------------------------------------------------------------
%-------------------------------------------------------------------------------
%   Copyright (c) 1997 Princeton Satellite Systems, Inc.
%   All rights reserved.
%-------------------------------------------------------------------------------
%   Since version 2.
%-------------------------------------------------------------------------------

rV = NORAD( 0, 1, 5, 'sgp', [], 'sgp.txt' );
t  = [0 360 720 1080 1440];  % minutes

fprintf('\nSGP-File Input\n\n')
disp('Position')
for k = 1:5
  fprintf('%11.2f %11.2f %11.2f %11.2f\n',t(k), rV.r(:,k));
end
fprintf('\nVelocity\n')
for k = 1:5
  fprintf('%11.2f %11.2f %11.2f %11.2f\n',t(k), rV.v(:,k));
end

s = [sprintf('SGPTest \n'),...
     sprintf('1 88888U          80275.98708465  .00073094  13844-3  66816-4 0     8\n'),...
		 sprintf('2 88888  72.8435 115.9689 0086731  52.6988  110.5714 16.05824518  105')];
rV = NORAD( 0, 1, 5, 'sgp', [], s );

fprintf('\nSGP-String input\n\n')
disp('Position')
for k = 1:5
  fprintf('%11.2f %11.2f %11.2f %11.2f\n',t(k), rV.r(:,k));
end
fprintf('\nVelocity\n')
for k = 1:5
  fprintf('%11.2f %11.2f %11.2f %11.2f\n',t(k), rV.v(:,k));
end


fprintf('\nSDP8\n\n')
rV = NORAD( 0, 1, 5, 'sdp8', [], 'sdp.txt' );

disp('Position')
for k = 1:5
  fprintf('%11.2f %11.2f %11.2f %11.2f\n',t(k), rV.r(:,k));
end
fprintf('\nVelocity\n')
for k = 1:5
  fprintf('%11.2f %11.2f %11.2f %11.2f\n',t(k), rV.v(:,k));
end


%--------------------------------------
SGP-File Input

Position
       0.00     2328.95    -5995.21     1720.02
     360.00     2455.99    -6071.94     1223.00
     720.00     2567.38    -6112.50      714.02
    1080.00     2663.02    -6115.38      195.78
    1440.00     2742.84    -6079.14     -328.82

Velocity
       0.00        2.91       -0.98       -7.09
     360.00        2.68       -0.45       -7.23
     720.00        2.44        0.10       -7.32
    1080.00        2.20        0.65       -7.36
    1440.00        1.95        1.21       -7.36

SGP-String input

Position
       0.00     2328.95    -5995.21     1720.02
     360.00     2455.99    -6071.94     1223.00
     720.00     2567.38    -6112.50      714.02
    1080.00     2663.02    -6115.38      195.78
    1440.00     2742.84    -6079.14     -328.82

Velocity
       0.00        2.91       -0.98       -7.09
     360.00        2.68       -0.45       -7.23
     720.00        2.44        0.10       -7.32
    1080.00        2.20        0.65       -7.36
    1440.00        1.95        1.21       -7.36

SDP8

Position
       0.00     7469.48      416.00     5829.63
     360.00    -3337.36    32351.43   -24658.63
     720.00    14226.55    24236.02    -4856.16
    1080.00   -10151.49    22223.99   -23392.49
    1440.00     9420.26    33847.17   -15390.89

Velocity
       0.00        5.11        6.44       -0.18
     360.00       -1.30       -1.16       -0.28
     720.00       -0.34        2.65       -2.08
    1080.00       -1.00       -2.34        0.77
    1440.00       -1.12        0.85       -1.50