1 files changed, 15 insertions, 0 deletions
diff --git a/24/CH43/EX43.3/Example43_3.sce b/24/CH43/EX43.3/Example43_3.sce
new file mode 100755
index 000000000..fa8c6e33c
--- /dev/null
+++ b/24/CH43/EX43.3/Example43_3.sce
@@ -0,0 +1,15 @@
+//Given that
+Nn = 70
+Np = 50
+A = Nn+Np
+
+//Sample Problem 43-3
+txt = mopen('Example43_3_result.txt','wt')
+mfprintf(txt, '**Sample Problem 43-3**\n')
+Msn = 119.902199  //in Atomic mass unit
+uCsqure = 931.5  //in Mev
+Mp = 1.007825  //in Atomic mass unit
+Mn = 1.008625  //in Atomic mass unit
+deltaE = (Np*Mp + Nn*Mn - Msn)*uCsqure/A
+mfprintf(txt, 'The binding energy per nucleon of Sn is %fMev/nucleon', deltaE)
+mclose(txt)
+\ No newline at end of file