blob: 39bfc181a5e004f08d73f35151b50002a660f37a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
clc;clear;
//Example 15.15
//calculation of amount of dueterium consumed
//given values
M1=2.01478;//atomic mass of Hydrogen in amu
M2=4.00388;//atomic mass of Helium in amu
amu=931;//amu in MeV
e=30/100;//efficiency
P=50*10^6;//output power
NA=6.026*10^26;//avogadro number
t=8.64*10^4;//seconds in a day
//calculation
Q=(2*M1-M2)*amu;//energy released in a D-D reaction in MeV
O=Q*e*10^6/2;//actual output per dueterium atom in eV
n=P/(O*1.6*10^-19);//no of D atoms required
m=n*M1/NA;//equivalent mass of D required per s
X=m*t;
disp(X,'Deuterium requirement per day in kg is');
|
