Sail dimensions as a function of payload mass

Assume a payload mass fraction of 1/3

Since version 7.
------------------------------------------------------------------------
Reference: Colin R. McInnes, "Solar Sailing: Technology, Dynamics and Mission
           Applications", Springer Praxis, London, 1999, p. 15
------------------------------------------------------------------------
See also AccelToLoading, Plot2D
------------------------------------------------------------------------

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

acc0 = [0.5 1 3 6]*1e-3;
payload = 0:1:50;
eff = 0.85;

sigma = eff*AccelToLoading( acc0 );
mass = 3*payload;

side = zeros(4,length(payload));

for k = 1:length(sigma)
  area = mass/sigma(k);
  side(k,:) = sqrt(area);
end

Plot2D( payload, side, 'Payload Mass (kg)', 'Sail side length (m)',...
  'Square Sail Dimensions for Payload Fraction of 1/3')

accels = cellstr(num2str(acc0'*1e3));
accels{1} = [accels{1} ' mm/s^2'];
legend(accels,'Location','northwest')


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