summaryrefslogtreecommitdiff
path: root/446/CH15
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /446/CH15
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 '446/CH15')
-rwxr-xr-x446/CH15/EX15.1/15_1.sce14
-rwxr-xr-x446/CH15/EX15.1/15_1.txt4
-rwxr-xr-x446/CH15/EX15.2/15_2.sce14
-rwxr-xr-x446/CH15/EX15.2/15_2.txt3
4 files changed, 35 insertions, 0 deletions
diff --git a/446/CH15/EX15.1/15_1.sce b/446/CH15/EX15.1/15_1.sce
new file mode 100755
index 000000000..1a0baf8c2
--- /dev/null
+++ b/446/CH15/EX15.1/15_1.sce
@@ -0,0 +1,14 @@
+clear
+clc
+disp('Ex-15.1');
+w=121.5; //lambeda
+G=6.67*10^-11; //Various given values and constants
+M= 1.99*10^30;
+R= 6.96*10^8;
+c=3*10^8;
+k= G*M/(R*c^2); //(delLambeda)/(lambeda)
+delw=k*w; //del(lambeda)
+printf('The change in wavelength due to gravitational shift is %.3f pm\n',delw*10^3);
+k=5.5*10^-5;//due to thermal Doppler broadening effect
+delw=k*w;
+printf('The change in wavelength due to thermal Doppler broadening effect is %.1f pm',delw*10^3); \ No newline at end of file
diff --git a/446/CH15/EX15.1/15_1.txt b/446/CH15/EX15.1/15_1.txt
new file mode 100755
index 000000000..318b833ba
--- /dev/null
+++ b/446/CH15/EX15.1/15_1.txt
@@ -0,0 +1,4 @@
+
+ Ex-15.1
+The change in wavelength due to gravitational shift is 0.257 pm
+The change in wavelength due to thermal Doppler broadening effect is 6.7 pm \ No newline at end of file
diff --git a/446/CH15/EX15.2/15_2.sce b/446/CH15/EX15.2/15_2.sce
new file mode 100755
index 000000000..7f49f1aa6
--- /dev/null
+++ b/446/CH15/EX15.2/15_2.sce
@@ -0,0 +1,14 @@
+clear
+clc
+disp('Ex-15.2');
+mp=938.280; //mass of various particles
+me=0.511;
+m2h=1875.628;
+mic2=2*mp; //mass energy on L.H.S
+mfc2=m2h+me; //mass energy on R.H.S
+Q=mic2-mfc2; //Q value of reation
+pc=Q;
+mc2=1875.628;
+K=(pc^2)/(2*mc2); //kinetic threshold energy
+Emax=Q-K; //maximum energy
+printf('The maximum neutrino energy is %.3f MeV',Emax); \ No newline at end of file
diff --git a/446/CH15/EX15.2/15_2.txt b/446/CH15/EX15.2/15_2.txt
new file mode 100755
index 000000000..9cc162e35
--- /dev/null
+++ b/446/CH15/EX15.2/15_2.txt
@@ -0,0 +1,3 @@
+
+ Ex-15.2
+The maximum neutrino energy is 0.421 MeV \ No newline at end of file