clc; clear all; x = 2.5e-2; // Thickness of material in meters u = 2; // Linear absorption coefficient per cm dh = log(2)/2;//Half value thickness of the specimen disp('cm',dh,'Half value thickness of the specimen is')