summaryrefslogtreecommitdiff
path: root/839/CH27/EX27.4/Example_27_4.sce
blob: bd01d481bfab9e1ef74d931f69f7e57a0459532c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
//clear//
clear;
clc;

//Example 27.4
//Given
alpha = 1+0.029;
//From Example 27.3
sigma = 2.5; //[erg/cm^3]
T = 300; //[K]
N = 6.0222*10^23;
R = 8.3134*10^7; //[erg/g mol-K]
M = 74.56; //[Molecular weight]
rho = 1.988; //[g/cm^3]
nu = 2;
VM = M/rho; //[cm^3/g mol]

//Using Eq.(27.9)
L = 4*VM*sigma/(2*R*T*log(alpha))*10^7; //[nm]
disp('nm',L,'size of nuclues (L) = ');