cypressboat/FractionOrderSystem
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

init

Browse Source
This commit is contained in:
cypressboat
2023-11-14 17:10:27 +08:00
commit d5a822831c
423 changed files with 5909 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
FOTF Toolbox/contfrac.m Normal file
View File

@ -0,0 +1,21 @@
function [F,r]=contfrac(f,s,n,a)
% contfrac - the interface to the MuPAD function contfrac
%
% [cf,r]=contfrac(f,s,n,a)
%
% f - the symbolic expression of the original function
% s - the independent variable
% n - the approximation order of continued fractions
% a - the reference point
% cf - the symbolic expression of the continued fraction
% r - the symbolic expression of the rational form
% Copyright (c) Dingyu Xue, Northeastern University, China
% Last modified 28 March, 2017
% Last modified 28 March, 2017
% Not recommended for the less support of MuPAD contfrac function
arguments, f(1,1), s(1,1), n(1,1), a(1,1), end
F=feval(symengine,'contfrac',f,[inputname(2) '=' num2str(a)],n);
if nargout==2
r=feval(symengine,'contfrac::rational',F);
end, end