blob: 121913e1fcbed2e809adeb9352f816c2c3ae7f3d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
//Variable declaration
m=1;
n=9; //repulsive exponent value
a=1.748*10**-28;
r0=0.281*10**-9; //seperation(m)
e=1.6*10**-19;
//Calculation
Ur0=-a*(1-(m/n))/(e*r0**m); //cohesive energy(eV)
//Result
printf('cohesive energy is %0.3f eV \n',(Ur0))
|