a2t.m

Conversion from absorbance to transmittance or vice versa 将光从吸光度转为透光度

function ut=a2t(X);
%function ut=a2t(X);
%Conversion from absorbance to transmittance or vice versa
%enodland

[n,m]=size(X);
choice=input(' A2T press 1, T2A press 0: ');
if (choice == 1)
	ut=10.^(-X)*100;
elseif (choice == 0)
	ut=-log10(X./100);
end