% ELLIPJ   儎僐價傾儞懭墌娭悢
% 
% [Sn,Cn,Dn] = ELLIPJ(U,M) 偼丄堷悢 U 偲僷儔儊乕僞 M 偺懳墳偡傞梫慺偵
% 懳偟偰昡壙偝傟傞儎僐價傾儞懭墌娭悢 SN, CN, DN 偺抣傪弌椡偟傑偡丅攝楍  
% U 偲 M 偼丄摨偠僒僀僘偱側偗傟偽側傝傑偣傫(傑偨偼丄偄偢傟偐偑僗僇儔
% 偱傕峔偄傑偣傫)丅
% 尰嵼幚尰偝傟偰偄傞僶乕僕儑儞偱偼丄M 偼 0 < =  M < =  1 偵惂尷偝傟偰偄傑偡丅 
%
% [Sn,Cn,Dn] = ELLIPJ(U,M,TOL) 偼丄僨僼僅儖僩偺 TOL = EPS 偺戙傢傝偵丄
% 惛搙 TOL 偱懭墌娭悢傪寁嶼偟傑偡丅  
%
% 儎僐價傾儞懭墌娭悢偺掕媊偵傛偭偰偼丄僷儔儊乕僞 m 偺戙傢傝偵曣悢k傪巊偆
% 偙偲偑偁傝傑偡丅偙傟傜偼丄m = k^2 偲偄偆娭學偱偡丅
%
% 嶲峫  ELLIPKE.


%   L. Shure 1-9-88
%   Copyright 1984-2004 The MathWorks, Inc.