summaryrefslogtreecommitdiff
path: root/1026/CH13/EX13.6/Example13_6.sce
blob: 7344e27e3ed39f5ffe000dd0bfc5b2a57d839301 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
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)