summaryrefslogtreecommitdiff
path: root/3856/CH16/EX16.1/Ex16_1.sce
blob: cca2dfe30e79976bd1a941fb58f47f9fee5f25ed (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
//Calculate the Dipole-Dipole interaction energy in kJ mol^-1

//Example 16.1

clc;  

clear;

mewA=1.08*3.3356*10^-30;  //Dipole moment in C m for one molecule

mewB=1.08*3.3356*10^-30;  //Dipole moment in C m for other molecule

epsilone=8.854*10^-12;  //Molar absorptivity or molar extinction coefficient in C^2 N^-1 m^-2

r=4*10^-10; //Distance between two molecule of HCl in m

V1=-(2*mewA*mewB)/(4*%pi*epsilone*(r)^3);  //Diploe-Diplole interaction in N m

V=(V1*6.022*10^23)/1000;  //Dipole-Dipole interaction in kJ mol^-1

printf("Dipole-Dipole interaction = %.1f kJ mol^-1 ",V);