summaryrefslogtreecommitdiff
path: root/3020/CH6/EX6.3/ex6_3.sce
blob: 4d1a91c6338b40954168e140f9c3e8969117c0f2 (plain)
1
2
3
4
5
6
7
clc;
clear all;
RI = (1/20); // Reduction in intensity
u = 1.62; // Linear absorption coefficent in per cm
x = log(20)*1e-2/u;//The thickness of aluminuim
disp('m',x,'The thickness of aluminuim is ')