nivst.m

Micro Electronic Device Fundermental

format short e

k=8.617e-5;
A=2.510e19;
Eex=0.0074;
T=200:25:700;

Eg0=1.17;
a=4.730e-4;
b=636;
Eg=Eg0-a.*(T.^2)./(T+b);

mnr=1.028+(6.11e-4).*T-(3.09e-7).*T.^2;
mpr=0.610+(7.83e-4).*T-(4.46e-7).*T.^2;

ni=A.*((mnr.*mpr).^(3/4)).*((T./300).^(3/2)).*exp(-(Eg-Eex)./(2.*k.*T));


%T=275:25:375
%k=8.617e-5
ni2=(9.15e19).*(T./300).^2.*exp(-0.5928./(k.*T))

j=length(T);
fprintf('\n\n T            ni              ni2\n');
fprintf('------------------------------------\n')
for ii=1:j,
    fprintf('%-10.f%-10.3e      %-10.3e\n',T(ii),ni(ii),ni2(ii));
end

semilogy(T,ni,T,ni2);grid
xlabel('T')
ylabel('ni')

%fprintf('\n\n T        ni\n')
%for ii=1:j,
%    fprintf('%-10.f%-10.3e\n',T(ii),ni2(ii))
%end