3401/CH5/EX5.6/Ex5_6.sce


1
2
3
4
5
6
7
8
9
10

clc

T=300 //K
u=1000 //cm^2/s
k=8.617*10^-5 //eV/K
e=1.6*10**-19 //C

//D=((k*T)/e)*u
D=k*T*u
disp(D,"diffusion coefficient in cm^2/s is =")