ellipke.m

来自「可用于对信号的频谱进行分析,希望站长能整理好,以便大家互相学习」· M 代码 · 共 20 行

% ELLIPKE   姰慡懭墌愊暘
%
% [K,E] = ELLIPKE(M) 偼丄M 偺奺梫慺偵懳偟偰幚峴偝傟傞戞1庬偲戞2庬偺姰慡
% 懭墌愊暘偺抣傪弌椡偟傑偡丅尰嵼丄幚尰偝傟偰偄傞僶乕僕儑儞偱偼丄M 偼 
% 0 < =  M < =  1偵惂尷偝傟偰偄傑偡丅
% 
% [K,E] = ELLIPKE(M,TOL) 偼丄僨僼僅儖僩偺 TOL = EPS 偺戙傢傝偵丄惛搙 
% TOL 偱姰慡懭墌愊暘傪寁嶼偟傑偡丅
%
% 儎僐價傾儞懭墌娭悢偺掕媊偵傛偭偰偼丄僷儔儊乕僞 m 偺戙傢傝偵曣悢 k 傪
% 巊偆偙偲偑偁傝傑偡丅偙傟傜偼丄m = k^2 偲偄偆娭學偱偡丅
%
% 嶲峫  ELLIPJ.


%   L. Shure 1-9-88
%   Modified to include the second kind by Bjorn Bonnevier
%   from the Alfven Laboratory, KTH, Stockholm, Sweden
%   Copyright 1984-2004 The MathWorks, Inc.