Jcd Jcd_sub Jcn Jcn_sub Jcs Jcs_sub Jdc Jdc_sub Jdn Jdn_sub Jds Jds_sub Jelli Jnc Jnc_sub Jnd Jnd_sub Jns Jns_sub Jsc Jsc_sub Jsd Jsd_sub Jsn Jsn_sub Jtheta1 Jtheta1_sub Jtheta1t Jtheta1t_sub Jtheta2 Jtheta2_sub Jtheta2t Jtheta2t_sub Jtheta3 Jtheta3_sub Jtheta3m1 Jtheta3m1_sub Jtheta3m1t Jtheta3m1t_sub Jtheta3t Jtheta3t_sub Jtheta4 Jtheta4_sub Jtheta4m1 Jtheta4m1_sub Jtheta4m1t Jtheta4m1t_sub Jtheta4t Jtheta4t_sub

Jelli() Sub Jelli ( U As  Double, K As  Double, Sn As  Double, Cn As  Double, Dn As  Double, Optional Info As  Long  ) ヤコビの楕円関数 sn(u, k), cn(u,k), dn(u, k) 目的 本ルーチンはヤコビの楕円関数sn(u, k), cn(u,k)およびdn(u, k)を求める. u = ∫ 1/√(1 - k^2(sin(t))^2) dt [0, φ] としたとき, 角度φは振幅と呼ばれる. 各関数は次のように定義される. sn(u, k) = sinφ cn(u, k) = cosφ dn(u, k) = √(1 - k^2(sin(φ))^2) 引数 [in] U 引数 u. [in] K 引数 k. [out] Sn sn(u, k)の値. [out] Cn cn(u, k)の値. [out] Dn dn(u, k)の値. [out] Info (省略可) = 0: 正常終了. = 1: 浮動小数点値域エラー. 出典 boost/math/special_functions