Chi Chi_sub Ci Ci_sub Shi Shi_sub Si Si_sub

Ci_sub() Sub Ci_sub ( Ret As  Double, X As  Double, Optional Info As  Long  ) 余弦積分 Ci(x) (サブルーチン版) 目的 余弦積分を求める. Ci(x) = -∫ cos(t)/t dt [x, ∞] 引数 [out] Ret 余弦積分 Ci(x). [in] X 引数 x. (X <> 0) (x < 0 の場合, 実数部を返す = Ci(|x|)) [out] Info (省略可) = 0: 正常終了. = -1: パラメータ X の誤り. (X = 0) = 1: 浮動小数点値域エラー.