summaryrefslogtreecommitdiff
path: root/446/CH15/EX15.2/15_2.sce
diff options
context:
space:
mode:
Diffstat (limited to '446/CH15/EX15.2/15_2.sce')
-rwxr-xr-x446/CH15/EX15.2/15_2.sce14
1 files changed, 14 insertions, 0 deletions
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