正如我所说,我是 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]) ;
}
}
现在如何只访问复数的实部或虚部?