Thermal capacity Nitrogen and CO2

%--------------------------------------------------------------------------
% See also: CPGas
%--------------------------------------------------------------------------

%--------------------------------------------------------------------------
%   Copyright (c) 2016 Princeton Satellite Systems, Inc.
%   All rights reserved.
%--------------------------------------------------------------------------
%   Since 2017.1
%--------------------------------------------------------------------------


t  = linspace(175,1500);
x  = {'CO2' 'N2'};
cP	= zeros(length(x),length(t));
for k = 1:length(x)
	cP(k,:) = CPGas( t, x{k} );
end
Plot2D(t,cP,'T (deg-K)','c_P (J/kg-deg-K)','Thermal Capacity');
legend(x)


%--------------------------------------