Generates a point design for a D-He3 engine.
Includes Bremsstrahlung and synchrotron but not transport.
See also: FusionPower, CentralPressure, VolumeAveragedPressure, BField, Synchrotron, Bremsstrahlung, PlasmaRadius, PlasmaVolume, FirstWallThermalPower, NumberOfElectrons, MagnetMass, PlasmaInternalEnergy
------------------------------------------------------------------------
Reference: Schaffer, M.J., "Considerations for Steady-State FRC-Based Fusion Space Propulsion", GA-A23579, December 2000. General Atomics, San Diego, CA
------------------------------------------------------------------------
%-------------------------------------------------------------------------- % Copyright (c) 2011 Princeton Satellite Systems, Inc. % All rights reserved. % 2021.2 fix order of inputs to Synchrotron %-------------------------------------------------------------------------- % Global parameters %------------------ pFusion = 6160; %(MW) beta = 1; rhoMag = 4300; % Titanium (kg/m^3) sigmaMag = 880e6; % Titanium rW = 0.998; % wall reflectivity % D-He3 %----- zDH = [1 2]; n1DH = 6.15e20; n2DH = 6.15e20; nIDH = [n1DH n2DH]; r1DH = 'd'; r2DH = 'he3'; tDH = 100; pFusDH = FusionPower( n1DH, n2DH, r1DH, r2DH, tDH ); pCDH = CentralPressure( tDH, [n1DH n2DH], zDH ); pVDH = VolumeAveragedPressure( tDH, [n1DH n2DH], zDH ); bDH = BField( pVDH, beta ); pSDH = Synchrotron( nIDH, zDH, bDH, tDH, 2, rW); pBDH = Bremsstrahlung( nIDH, zDH, tDH, 2 ); pNetDH = pFusDH - pSDH - pBDH; rPDH = PlasmaRadius( pNetDH, pFusion ); vPDH = PlasmaVolume( pNetDH, pFusion ); pWallDH = FirstWallThermalPower( (pSDH+pBDH)*vPDH, 1.1*rPDH ); nEDH = NumberOfElectrons( nIDH, zDH ); mMDH = MagnetMass( rhoMag, sigmaMag, bDH, rPDH); iEDH = PlasmaInternalEnergy( sum(nIDH), tDH, vPDH ); %Table s = {}; k = 1; s{k,1} = 'Fuel, Assumed'; s{k,2} = '50/50 D$^3$He'; s{k,3} = '50/50 D$^3$He'; k = k + 1; s{k,1} = 'First Wall Thermal Power (MW m$^{-2}$)'; s{k,2} = '10'; s{k,3} = sprintf('%4.1f',pWallDH); k = k + 1; s{k,1} = 'Plasma Radius (m)'; s{k,2} = '3.45'; s{k,3} = sprintf('%4.2f',rPDH); k = k + 1; s{k,1} = 'Plasma Volume (m$^3$)'; s{k,2} = '172'; s{k,3} = sprintf('%4.0f',vPDH); k = k + 1; s{k,1} = 'RMS Plasma Pressure (Pa)'; s{k,2} = '2.5e+07'; s{k,3} = sprintf('%5.1e',pVDH); k = k + 1; s{k,1} = 'Central Plasma Pressure (Pa)'; s{k,2} = '4.9e+07'; s{k,3} = sprintf('%5.1e',pCDH); k = k + 1; s{k,1} = 'Plasma Internal Energy (GJ)'; s{k,2} = '6.45'; s{k,3} = sprintf('%4.2f',iEDH); k = k + 1; s{k,1} = '$\beta$'; s{k,2} = '1'; s{k,3} = sprintf('%4.0f',beta); s{k,1} = 'Average Magnetic Field at Coil (T)'; s{k,2} = '7.9'; s{k,3} = sprintf('%4.1f',bDH); k = k + 1; s{k,1} = 'Magnet Specific Mass (kg/W)'; s{k,2} = '1.9e-05'; s{k,3} = sprintf('%6.1e',1e-6*mMDH/pFusion); k = k + 1; s{k,1} = 'Magnet Mass (kg)'; s{k,2} = '1.52e+05'; s{k,3} = sprintf('%5.2e',mMDH); k = k + 1; s{k,1} = 'Shield \& Magnet Mass (kg)'; s{k,2} = '500000'; s{k,3} = '473670'; k = k + 1; s{k,1} = 'Central Temperature (keV)'; s{k,2} = '100'; s{k,3} = sprintf('%4.0f',tDH); k = k + 1; s{k,1} = 'Ion Density 10$^{20}$ m$^{-3}$)'; s{k,2} = '12.3'; s{k,3} = sprintf('%4.1f',sum(nIDH)/1e20); k = k + 1; s{k,1} = 'Electron Density ( 10$^{20}$ m$^{-3}$)'; s{k,2} = '18.4'; s{k,3} = sprintf('%4.1f',nEDH/1e20); k = k + 1; s{k,1} = 'Synchrotron (MW m$^{-3}$)'; s{k,2} = '0.0'; s{k,3} = sprintf('%4.2f', pSDH); k = k + 1; s{k,1} = 'Bremsstrahlung (MW m$^{-3}$)'; s{k,2} = sprintf('%4.1f',0.23*8000/172); s{k,3} = sprintf('%4.2f',pBDH); k = k + 1; s{k,1} = 'Fusion Power (GW)'; s{k,2} = '8.0'; s{k,3} = sprintf('%4.1f',pFusDH*vPDH/1e3);k = k + 1; s{k,1} = 'Net Power (GW)'; s{k,2} = sprintf('%4.1f',8*0.77); s{k,3} = sprintf('%4.1f',pNetDH*vPDH/1e3); fprintf(1,'\n\n'); for k = 1:size(s,1) fprintf(1,'%60s %20s %20s \n',s{k,:}) end CreateLatexTable(s,'PointDesignTable' ); % PSS internal file version information %--------------------------------------
Fuel, Assumed 50/50 D$^3$He 50/50 D$^3$He First Wall Thermal Power (MW m$^{-2}$) 10 31.5 Plasma Radius (m) 3.45 2.45 Plasma Volume (m$^3$) 172 61 RMS Plasma Pressure (Pa) 2.5e+07 2.5e+07 Central Plasma Pressure (Pa) 4.9e+07 4.9e+07 Plasma Internal Energy (GJ) 6.45 1812086813.44 Average Magnetic Field at Coil (T) 7.9 7.9 Magnet Specific Mass (kg/W) 1.9e-05 1.8e-06 Magnet Mass (kg) 1.52e+05 1.11e+04 Shield \& Magnet Mass (kg) 500000 473670 Central Temperature (keV) 100 100 Ion Density 10$^{20}$ m$^{-3}$) 12.3 12.3 Electron Density ( 10$^{20}$ m$^{-3}$) 18.4 18.4 Synchrotron (MW m$^{-3}$) 0.0 1.46 Bremsstrahlung (MW m$^{-3}$) 10.7 45.25 Fusion Power (GW) 8.0 9.0 Net Power (GW) 6.2 6.2