summaryrefslogtreecommitdiff
path: root/767/CH4/EX4.5.7/Ch04Exa4_5_7.sci
diff options
context:
space:
mode:
Diffstat (limited to '767/CH4/EX4.5.7/Ch04Exa4_5_7.sci')
-rwxr-xr-x767/CH4/EX4.5.7/Ch04Exa4_5_7.sci9
1 files changed, 9 insertions, 0 deletions
diff --git a/767/CH4/EX4.5.7/Ch04Exa4_5_7.sci b/767/CH4/EX4.5.7/Ch04Exa4_5_7.sci
new file mode 100755
index 000000000..246a62840
--- /dev/null
+++ b/767/CH4/EX4.5.7/Ch04Exa4_5_7.sci
@@ -0,0 +1,9 @@
+// Scilab code Exa4.5.7: To calculate Q-value for given reaction : Page 185 (2011)
+// O(8,16) > N(7,15)+ H(1,1) is the given reaction
+M_N_15 = 15.000108; // Mass of N-15, amu
+M_O_16 = 16; // Mass of O-16, amu
+M_H_1 = 1.007825; // Mass of H-1, amu
+Q = [M_O_16-M_N_15-M_H_1]*931.49; // Q-value, MeV
+printf("\nThe Q-value for the reaction : %3.1f MeV ", Q)
+// Result
+//The Q-value for the reaction : -7.4 MeV \ No newline at end of file