1 files changed, 15 insertions, 0 deletions
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