This commit is contained in:
2023-11-14 17:10:27 +08:00
commit d5a822831c
423 changed files with 5909 additions and 0 deletions

16
FOTF Toolbox/gamma_c.m Normal file
View File

@ -0,0 +1,16 @@
function y=gamma_c(z)
% gamma_c - Gamma function with complex arguments
%
% y=gamma_c(z)
%
% z - the independent variable containing complex quantities
% y - the values of the Gamma function
% Copyright (c) Dingyu Xue, Northeastern University, China
% Last modified 28 March, 2017
% Last modified 18 May, 2022
if isreal(z), y=gamma(z);
else, f=@(t)exp(-t).*t.^(z-1);
y=integral(f,0,inf,'ArrayValued',true);
end
end