summaryrefslogtreecommitdiff
path: root/24/CH44
diff options
context:
space:
mode:
Diffstat (limited to '24/CH44')
-rwxr-xr-x24/CH44/EX44.1/Example44_1.sce13
-rwxr-xr-x24/CH44/EX44.1/Example44_1_result.txt2
-rwxr-xr-x24/CH44/EX44.2/Example44_2.sce39
-rwxr-xr-x24/CH44/EX44.2/Example44_2_result.txt14
-rwxr-xr-x24/CH44/EX44.3/Example44_3.sce14
-rwxr-xr-x24/CH44/EX44.3/Example44_3_result.txt2
-rwxr-xr-x24/CH44/EX44.4/Example44_4.sce18
-rwxr-xr-x24/CH44/EX44.4/Example44_4_result.txt5
-rwxr-xr-x24/CH44/EX44.5/Example44_5.sce8
-rwxr-xr-x24/CH44/EX44.5/Example44_5_result.txt2
-rwxr-xr-x24/CH44/EX44.6/Example44_6.sce18
-rwxr-xr-x24/CH44/EX44.6/Example44_6_result.txt5
12 files changed, 140 insertions, 0 deletions
diff --git a/24/CH44/EX44.1/Example44_1.sce b/24/CH44/EX44.1/Example44_1.sce
new file mode 100755
index 000000000..bc2cdc30b
--- /dev/null
+++ b/24/CH44/EX44.1/Example44_1.sce
@@ -0,0 +1,13 @@
+//Given that
+M_U = 235.0439 //in Atomic mass unit
+M_Ce = 139.9054 //in Atomic mass unit
+M_Zr = 93.9063 //in Atomic mass unit
+M_n = 1.00867 //in Atomic mass unit
+uCsqure = 931.5 //in Mev
+
+//Sample Problem 44-1
+txt = mopen('Example44_1_result.txt','wt')
+mfprintf(txt, '**Sample Problem 44-1**\n')
+Q = -((M_Ce + M_Zr + M_n) - M_U) * uCsqure
+mfprintf(txt, 'The disintegration energy is %dMev', Q)
+mclose(txt) \ No newline at end of file
diff --git a/24/CH44/EX44.1/Example44_1_result.txt b/24/CH44/EX44.1/Example44_1_result.txt
new file mode 100755
index 000000000..8f8cd13ea
--- /dev/null
+++ b/24/CH44/EX44.1/Example44_1_result.txt
@@ -0,0 +1,2 @@
+**Sample Problem 44-1**
+The disintegration energy is 208Mev \ No newline at end of file
diff --git a/24/CH44/EX44.2/Example44_2.sce b/24/CH44/EX44.2/Example44_2.sce
new file mode 100755
index 000000000..65570fc01
--- /dev/null
+++ b/24/CH44/EX44.2/Example44_2.sce
@@ -0,0 +1,39 @@
+//Given that
+c = 3*10^8 //in m/s
+e = 1.6*10^-19
+conv = 3600*24 //day to sec conversion
+Pgen = 3400*10^6 //in W
+Pused = 1100*10^6 //in W
+fuel = 8.60*10^4 //in kg
+Q = 200*10^6*e //in J
+Uinitial = 8.6*10^4 //in kg
+M_u = 3.90*10^-25 //in kg/atom
+N = 5.70*10^4
+p = 3/100
+
+txt = mopen('Example44_2_result.txt','wt')
+//Sample Problem 44-2a
+mfprintf(txt, '**Sample Problem 44-2a**\n')
+eff = Pused/Pgen*100
+mfprintf(txt, 'The efficiency of the power plant is %d\%\n', eff)
+
+//Sample Problem 44-2b
+mfprintf(txt, '\n**Sample Problem 44-2b**\n')
+R = Pgen/Q
+mfprintf(txt, 'The fissions in the reactor per second is %e\n', R)
+
+//Sample Proble 44-2c
+mfprintf(txt, '\n**Sample Problem 44-2c**\n')
+RateDay = (1+0.25)*R*M_u*conv
+mfprintf(txt, 'The uranium use in a day is equal to %fkg/day\n', RateDay)
+
+//Sample Problem 44-2d
+mfprintf(txt, '\n**Sample Problem 44-2d**\n')
+T = fuel*p/RateDay
+mfprintf(txt, 'The U will long for %ddays\n', T)
+
+//Sample Problem 44-2e
+mfprintf(txt, '\n**Sample Problem 44-2e**\n')
+MassConvRate = Pgen/c^2
+mfprintf(txt, 'The mass conversion rate is %ekg/s', MassConvRate)
+mclose(txt) \ No newline at end of file
diff --git a/24/CH44/EX44.2/Example44_2_result.txt b/24/CH44/EX44.2/Example44_2_result.txt
new file mode 100755
index 000000000..89a41ec24
--- /dev/null
+++ b/24/CH44/EX44.2/Example44_2_result.txt
@@ -0,0 +1,14 @@
+**Sample Problem 44-2a**
+The efficiency of the power plant is 32/
+
+**Sample Problem 44-2b**
+The fissions in the reactor per second is 1.062500e+020
+
+**Sample Problem 44-2c**
+The uranium use in a day is equal to 4.475250kg/day
+
+**Sample Problem 44-2d**
+The U will long for 576days
+
+**Sample Problem 44-2e**
+The mass conversion rate is 3.777778e-008kg/s \ No newline at end of file
diff --git a/24/CH44/EX44.3/Example44_3.sce b/24/CH44/EX44.3/Example44_3.sce
new file mode 100755
index 000000000..b94048565
--- /dev/null
+++ b/24/CH44/EX44.3/Example44_3.sce
@@ -0,0 +1,14 @@
+//Given that
+ratio = 0.0072
+T = 2.0*10^9 //in years
+Th1 = 7.04*10^8 //in years
+Th2 = 44.7*10^8 //in years
+
+//Sample Problem 44-3
+txt = mopen('Example44_3_result.txt','wt')
+mfprintf(txt, '**Sample Problem 44-3**\n')
+l1 = log(2)/Th1
+l2 = log(2)/Th2
+ratioEarlier = ratio*%e^((l1 - l2)*T)
+mfprintf(txt, 'The earlier ratio is equal to %f', ratioEarlier)
+mclose(txt) \ No newline at end of file
diff --git a/24/CH44/EX44.3/Example44_3_result.txt b/24/CH44/EX44.3/Example44_3_result.txt
new file mode 100755
index 000000000..0e33ec89f
--- /dev/null
+++ b/24/CH44/EX44.3/Example44_3_result.txt
@@ -0,0 +1,2 @@
+**Sample Problem 44-3**
+The earlier ratio is equal to 0.037831 \ No newline at end of file
diff --git a/24/CH44/EX44.4/Example44_4.sce b/24/CH44/EX44.4/Example44_4.sce
new file mode 100755
index 000000000..64c598bb1
--- /dev/null
+++ b/24/CH44/EX44.4/Example44_4.sce
@@ -0,0 +1,18 @@
+//Given that
+R = 10^-15 //in meter
+e = 1.6*10^-19 //in coloumb
+q1 = e
+k = 9*10^9 //in SI unit
+B = 1.38*10^-23 //in J/K
+
+txt = mopen('Example44_4_result.txt','wt')
+//Sample Problem 44-4a
+mfprintf(txt, '**Sample Problem 44-4a**\n')
+K = k*q1^2/(2*R)/2
+mfprintf(txt, 'The initial kinetic energy is equal to %dKev\n', K/e/10^3)
+
+//Sample Problem 44-4b
+mfprintf(txt, '\n**Sample Problem 44-4b**\n')
+T = 2*K/(3*B) //B is Boltzman constant
+mfprintf(txt, 'The temprature required to achieve that energy equal to %eK', T)
+mclose(txt) \ No newline at end of file
diff --git a/24/CH44/EX44.4/Example44_4_result.txt b/24/CH44/EX44.4/Example44_4_result.txt
new file mode 100755
index 000000000..55ef719c8
--- /dev/null
+++ b/24/CH44/EX44.4/Example44_4_result.txt
@@ -0,0 +1,5 @@
+**Sample Problem 44-4a**
+The initial kinetic energy is equal to 360Kev
+
+**Sample Problem 44-4b**
+The temprature required to achieve that energy equal to 2.782609e+009K \ No newline at end of file
diff --git a/24/CH44/EX44.5/Example44_5.sce b/24/CH44/EX44.5/Example44_5.sce
new file mode 100755
index 000000000..5963fd3a1
--- /dev/null
+++ b/24/CH44/EX44.5/Example44_5.sce
@@ -0,0 +1,8 @@
+//Sample Problem 44-5
+txt = mopen('Example44_5_result.txt','wt')
+mfprintf(txt, '**Sample Problem 44-5**\n')
+MassRate = 4*1.67*10^-27/(4.20*10^-12) //mass of proton required to produce 1 unit of energy
+Ps = 3.90*10^26 //in W
+Rate = MassRate*Ps
+mfprintf(txt, 'The rate at which hydrogen is consumed is %ekg/s', Rate)
+mclose(txt) \ No newline at end of file
diff --git a/24/CH44/EX44.5/Example44_5_result.txt b/24/CH44/EX44.5/Example44_5_result.txt
new file mode 100755
index 000000000..7d7cece21
--- /dev/null
+++ b/24/CH44/EX44.5/Example44_5_result.txt
@@ -0,0 +1,2 @@
+**Sample Problem 44-5**
+The rate at which hydrogen is consumed is 6.202857e+011kg/s \ No newline at end of file
diff --git a/24/CH44/EX44.6/Example44_6.sce b/24/CH44/EX44.6/Example44_6.sce
new file mode 100755
index 000000000..799f193f3
--- /dev/null
+++ b/24/CH44/EX44.6/Example44_6.sce
@@ -0,0 +1,18 @@
+//Given that
+d = 200 //in kg/m^3
+fac = 10^3
+Na = 6.023*10^23
+Mt = 3*10^-3 //in kg/mol
+Md = 2*10^-3 //in kg/mol
+
+txt = mopen('Example44_6_result.txt','wt')
+//Sample Problem 44-6a
+mfprintf(txt, '**Sample Problem 44-6a**\n')
+n = 2*fac *d *Na /(Mt + Md)
+mfprintf(txt, 'The number of particle in unit volume is %em^-3\n', n)
+
+//Sample Problem 44-6b
+mfprintf(txt, '\n**Sample Problem 44-6b**\n')
+TauMin = 10^20/n
+mfprintf(txt, 'The duration of time, pallet can maintain is of the order of %esec', TauMin)
+mclose(txt) \ No newline at end of file
diff --git a/24/CH44/EX44.6/Example44_6_result.txt b/24/CH44/EX44.6/Example44_6_result.txt
new file mode 100755
index 000000000..954fbe6e3
--- /dev/null
+++ b/24/CH44/EX44.6/Example44_6_result.txt
@@ -0,0 +1,5 @@
+**Sample Problem 44-6a**
+The number of particle in unit volume is 4.818400e+031m^-3
+
+**Sample Problem 44-6b**
+The duration of time, pallet can maintain is of the order of 2.075378e-012sec \ No newline at end of file
generated by cgit (git 2.34.1) at 2025-03-12 20:02:29 +0000