diff options
Diffstat (limited to '2381/CH1/EX1.16')
| -rwxr-xr-x | 2381/CH1/EX1.16/ex_16.sce | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/2381/CH1/EX1.16/ex_16.sce b/2381/CH1/EX1.16/ex_16.sce new file mode 100755 index 000000000..8ccc4ee65 --- /dev/null +++ b/2381/CH1/EX1.16/ex_16.sce @@ -0,0 +1,17 @@ +//Example 16 // distance,binding energy and force constant +clc; +clear; +close; +disp("equilibrium inter-nuclear distance correspondes to lowest potential enegy is ro= 2*Å") +pet=0;//eV +peb=-4;//eV +be=pet-peb;//eV +x1=-2;//eV +x2=-4;//eV +V=x1-x2;//eV +e=1.6*10^-19;//electronic charge +x=0.5;//armstrong +K=((2*V)/x^2);//eV/Å^2 +k1=(K*e)/(10^-10)^2;//joule/m^2 +disp(be,"binding energy is ,(eV)=") +disp(k1,"force constant is ,(newton/metre)=") |