summaryrefslogtreecommitdiff
path: root/1026/CH13
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1026/CH13
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1026/CH13')
-rwxr-xr-x1026/CH13/EX13.1/Example13_1.sce23
-rwxr-xr-x1026/CH13/EX13.2/Example13_2.sce21
-rwxr-xr-x1026/CH13/EX13.4/Example13_4.sce21
-rwxr-xr-x1026/CH13/EX13.5/Example13_5.sce25
-rwxr-xr-x1026/CH13/EX13.6/Example13_6.sce15
-rwxr-xr-x1026/CH13/EX13.7/Example13_7.sce19
6 files changed, 124 insertions, 0 deletions
diff --git a/1026/CH13/EX13.1/Example13_1.sce b/1026/CH13/EX13.1/Example13_1.sce
new file mode 100755
index 000000000..010ef312c
--- /dev/null
+++ b/1026/CH13/EX13.1/Example13_1.sce
@@ -0,0 +1,23 @@
+//chapter13,Example13_1,pg 391
+
+//xMy -> x-mass no., M-element, y-atomic no.
+
+M7Li3=7.018232//mass of 7li3 (amu)
+
+Malpha=4.003874//mass of alpha particle (amu)
+
+Mpr=1.008145//mass of proton (amu)
+
+//reaction:- 7li3 + 1H1-> 4He2 + 4He2
+
+delM=M7Li3+Mpr-2*Malpha//mass defect
+
+Q=delM*931//1 amu= 931 Mev
+
+Ey=9.15//K.E energy of product nucleus
+
+Ex=2*Ey-Q//K.E of incident particle
+
+printf("kinetic energy of incident proton\n")
+
+printf("Ex=%.2f Mev",Ex) \ No newline at end of file
diff --git a/1026/CH13/EX13.2/Example13_2.sce b/1026/CH13/EX13.2/Example13_2.sce
new file mode 100755
index 000000000..b8f3bc3ad
--- /dev/null
+++ b/1026/CH13/EX13.2/Example13_2.sce
@@ -0,0 +1,21 @@
+//chapter13,Example13_2,pg 391
+
+M235U=235//at.mass of 235U
+
+m=10^-3
+
+N=6.023*10^23
+
+Eperfi=200*10^6//energy per fission
+
+E=Eperfi*1.6*10^-19//energy per fission (in joules)
+
+T=10^-6
+
+A=M235U
+
+P=((m*N)/A)*(E/T)//power output
+
+printf("power of explosion\n")
+
+printf("P=%.2f watt",P) \ No newline at end of file
diff --git a/1026/CH13/EX13.4/Example13_4.sce b/1026/CH13/EX13.4/Example13_4.sce
new file mode 100755
index 000000000..7890b1555
--- /dev/null
+++ b/1026/CH13/EX13.4/Example13_4.sce
@@ -0,0 +1,21 @@
+//chapter13,Example13_4,pg 392
+
+n=0.4//efficiency
+
+N=6.023*10^23
+
+Eperfi=200*10^6//energy per fission
+
+E=Eperfi*1.6*10^-19
+
+P=100*10^6
+
+A=235
+
+T=24*60*60
+
+m=(P*A*T)/(n*N*E)
+
+printf("mass of 235U consumed/day\n")
+
+printf("m=%.2f gm",m) \ No newline at end of file
diff --git a/1026/CH13/EX13.5/Example13_5.sce b/1026/CH13/EX13.5/Example13_5.sce
new file mode 100755
index 000000000..425b03dfd
--- /dev/null
+++ b/1026/CH13/EX13.5/Example13_5.sce
@@ -0,0 +1,25 @@
+//chapter13,Example13_5,pg 392
+
+M2H1=2.01474
+
+M3H1=3.01700
+
+M1n0=1.008986
+
+M4He2=4.003880
+
+//thermonuclear reaction in hydrogen bomb explosion
+
+//2H1 + 3H1 -> 4He2 + 1n0
+
+Mreac=M2H1+M3H1//mass of reactants
+
+Mprod=M4He2+M1n0//mass of products
+
+Q=Mreac-Mprod
+
+Q=Q*931//converting in Mev
+
+printf("energy/reaction\n")
+
+printf("Q=%.2f Mev",Q) \ No newline at end of file
diff --git a/1026/CH13/EX13.6/Example13_6.sce b/1026/CH13/EX13.6/Example13_6.sce
new file mode 100755
index 000000000..7344e27e3
--- /dev/null
+++ b/1026/CH13/EX13.6/Example13_6.sce
@@ -0,0 +1,15 @@
+//chapter13,Example13_6,pg 393
+
+M7Li3=7.01818
+
+M1H1=1.0081
+
+M1n0=1.009
+
+BEpernu=(1/7)*((3*M1H1)+(4*M1n0)-M7Li3)//binding energy per nucleon
+
+BEpernu=BEpernu*931//converting in Mev
+
+printf("binding energy per nucleon\n")
+
+printf("BE=%.2f Mev",BEpernu) \ No newline at end of file
diff --git a/1026/CH13/EX13.7/Example13_7.sce b/1026/CH13/EX13.7/Example13_7.sce
new file mode 100755
index 000000000..857db46b7
--- /dev/null
+++ b/1026/CH13/EX13.7/Example13_7.sce
@@ -0,0 +1,19 @@
+//chapter13,Example13_7,pg 394
+
+m=10*10^3
+
+N=6.023*10^23
+
+Eperfi=200*10^6//energy per fission
+
+E=Eperfi*1.6*10^-19//energy in joules
+
+A=235
+
+T=24*60*60
+
+P=((m*N)/A)*(E/T)
+
+printf("power output\n")
+
+printf("P=%.2f watt",P) \ No newline at end of file