Explore Single Stage To Orbit (SSTO) for an ISS orbit

------------------------------------------------------------------------
See also Constant, Plot2D, SS2O
------------------------------------------------------------------------

Contents

%------------------------------------------------------------------------
%   Copyright (c) 2007 Princeton Satellite Systems, Inc.
%   All rights reserved.
%------------------------------------------------------------------------

Earth Rotation

%---------------
omega      = 2*pi/86400;
rEarth     = 6378.165;
mPayload   = 400;

ISS Orbit

%----------
r      = 330 + rEarth;
i      = 51*pi/180;
mu     = Constant('mu earth');

Compute the orbital velocity

%-----------------------------
v      = sqrt(mu/r);

Velocity gain from the Earth rotation

%--------------------------------------
vEarth = cos(i)*omega*rEarth;

Losses due to gravity turn and drag;

%---------------------------
vLoss  = 1.5;

Total delta-v

%---------------
v      = v + vLoss - vEarth;

Solid

%------
iSp        = 285;

fStructure = linspace(0,0.0425);

for k = 1:length(fStructure)
  [mF, mT, mS, e(k)] = SS2O( iSp, mPayload, fStructure(k), v );
end

Plot2D(fStructure,e,'Structural Fraction', 'Payload Fraction','SS2O SRM' );

%--------------------------------------
% PSS internal file version information
%--------------------------------------