2021-02-23 10:30:12 +00:00
|
|
|
function conductivity = sheet_conductivity(omega, fermi_level, temp, scatter_lifetime)
|
|
|
|
%SHEET_CONDUCTIVITY Calculate 2D sheet conductivity
|
|
|
|
|
|
|
|
%% CONSTANTS
|
|
|
|
e = 1.602e-19; % coulombs
|
2021-03-10 19:59:34 +00:00
|
|
|
kb = 1.380e-23; % J/K
|
2021-02-23 10:30:12 +00:00
|
|
|
hbar = 6.626e-34 / (2*pi); % Js
|
|
|
|
|
2021-03-22 17:51:55 +00:00
|
|
|
%% TERM 1 - INTRABRAND
|
2021-02-23 10:30:12 +00:00
|
|
|
term1_coeff = (2i*(e^2)*kb*temp) ...
|
|
|
|
/ ...
|
|
|
|
(pi*hbar^2*(omega + (1i/scatter_lifetime)));
|
|
|
|
term1 = log(2*cosh(fermi_level ...
|
|
|
|
/ ...
|
|
|
|
(2*kb*temp)));
|
|
|
|
|
2021-03-22 17:51:55 +00:00
|
|
|
intraband = term1_coeff*term1;
|
|
|
|
|
|
|
|
%% TERM 2 - INTERBAND
|
2021-02-23 10:30:12 +00:00
|
|
|
term2_coeff = (e^2) ...
|
|
|
|
/ ...
|
|
|
|
(4*hbar);
|
|
|
|
|
|
|
|
term_2_term_1 = 1/2;
|
|
|
|
term_2_term_2 = (1/pi) * ...
|
|
|
|
atan((hbar*omega - 2*fermi_level) ...
|
|
|
|
/ ...
|
|
|
|
(2*kb*temp));
|
|
|
|
|
|
|
|
term_2_term_3 = (1i/2*pi) * ...
|
|
|
|
log((hbar*omega + 2*fermi_level)^2 ...
|
|
|
|
/ ...
|
|
|
|
((hbar*omega - 2*fermi_level)^2 + 4*((kb*temp)^2)));
|
|
|
|
|
2021-03-22 17:51:55 +00:00
|
|
|
interband = term2_coeff*(term_2_term_1 + term_2_term_2 - term_2_term_3);
|
|
|
|
|
2021-02-23 10:30:12 +00:00
|
|
|
%% OUTPUT
|
2021-03-22 17:51:55 +00:00
|
|
|
conductivity = [intraband interband]; % return separately for display or summing
|
2021-02-23 10:30:12 +00:00
|
|
|
|
|
|
|
end
|
|
|
|
|