summaryrefslogtreecommitdiff
path: root/3363/CH15/EX15.8/Ex15_8.sce
blob: fd3fe586729db4e1e029832142ee0e234f7452ef (plain)
1
2
3
4
5
6
7
8
9
10
11
12
//Example 15.8, page 550
clc
N=0.60
rho=(N)/((4/3))
printf("\n The density is  %f  /pi*a^3",rho)
h=6.63*10^-34//in j-s
a=1.1//F
M=1
ef=43//in Mev
En=7//in Mev
Vo=ef+En
printf("\n The depth of the net nuclear potential acting on neutron \n is %d Mev", Vo)