正如我告诉我新来的perl。我正在研究复数, 我用
use Math::Complex;
对于复数, 这是我的代码,
for($k=0;$k<$N;$k++)
{
$c[k]= Math::Complex->new(0,0);
for ($n=0;$n<($N-1);$n++)
{
$c[k]=$c[k] + ( $we[($k * $n)% $N] * $y[n]) ;
}
}
现在如何仅访问复数的实部或虚部?