summaryrefslogtreecommitdiff
path: root/3363/CH17/EX17.1/Ex17_1.sce
blob: 3c8bffd88013583d742d4f4459fe2c9cbc64d1a9 (plain)
1
2
3
4
5
6
7
8
9
10
//Example 17.1, Page 643
clc
h=1.05*10^-34//j-s
M=1.7*10^-27//in kg
r=2*10^-15//in m
K=(h**2)/(M*r*r)
s=K* 6.24150647996E+12//converting to Mev
K_total_cm=2*s
k_incident=2*K_total_cm
printf("\n The kinetic energy of incident nucleon is %d Mev",k_incident)