perl で特殊関数 40 対数積分 li(x) (Logarithmic Integral li: LOGARITHMICINTEGRALLI)
perl で特殊関数 40 対数積分 li(x) (Logarithmic Integral li: LOGARITHMICINTEGRALLI): 一寸先は闇 # 対数積分 li(x) Logarithmic Integral li# 引数 変数 ($X)# 戻り値 対数積分 En(x) ($LogarithmicIntegralli)sub LOGARITHMICINTEGRALLI{ my ($X) = @_; my $LogarithmicIntegralli = 0; # 変数の確認 if($X < 0){ return
2010/09/11 13:18