summaryrefslogtreecommitdiff
path: root/1394/CH6/EX6.4.4/Ex6_4_4.sce
blob: 2b8a10e4f73a59ed202e549792ae4875814514e7 (plain)
1
2
3
4
5
6
7
8
9
10
11

clc
//initialization of variables
d=0.01 //cm
s=2*10^-2 //cm
//calculations
phi = 4/3 *%pi*(d/2)^3 /(s^3)
disp("On solving, D")
D=5*10^-7 //cm^2/s
//results
printf("Diffusion in homogeneous gel = %.1e cm^2/sec",D)