Searched refs:cplx (Results 1 – 4 of 4) sorted by relevance
| /mirbsd/src/gnu/usr.bin/perl/lib/Math/ |
| D | Complex.t | 76 my $z = cplx( 1, 1);
87 my $z = cplx( 1, 1);
100 my $z = cplx( 1, 1);
314 \$z = cplx('2+3i');
323 print "not " unless \$z == cplx(0,3);
339 print "not " unless \$z == cplx(2,3);
368 my \$z0 = cplx();
431 print (abs(atan2(0, cplx(0, 1))) < $eps ? "ok $test\n" : "not ok $test\n");
435 print (abs(atan2(cplx(0, 1), 0) - \$pip2) < $eps ? "ok $test\n" : "not ok $test\n");
439 print (abs(atan2(cplx(0, 1), cplx(0, 1)) - \$pip4) < $eps ? "ok $test\n" : "not ok $test\n");
[all …]
|
| D | Complex.pm | 234 sub cplx { subroutine
355 $z2 = cplx($z2) unless ref $z2;
372 $z2 = cplx($z2) unless ref $z2;
503 cplx(@{$w->cartesian}) : $w;
634 return $re < 0 ? cplx(0, CORE::sqrt(-$re)) : CORE::sqrt($re)
698 push @root, $cartesian ? cplx(@{$w->cartesian}) : $w;
703 return $cartesian ? cplx(@{$w->cartesian}) : $w;
800 return $z > 0 ? CORE::log($z) : cplx(CORE::log(-$z), pi);
833 $z = cplx($z, 0) unless ref $z;
944 $z = cplx($z, 0) unless ref $z;
[all …]
|
| /mirbsd/src/gnu/usr.bin/perl/lib/ |
| D | CPAN.pm | 2980 @return = cplx('CPAN::Author',uc($word));
2983 @return = cplx('CPAN::Bundle',$word);
2985 @return = cplx('CPAN::Distribution',$word);
2992 @return = (cplx('CPAN::Module',$word),cplx('CPAN::Bundle',$word));
3001 @return = (cplx('CPAN::Module',$word),cplx('CPAN::Bundle',$word));
3009 sub cplx { subroutine
3022 cplx('CPAN::Author',$word),
3023 cplx('CPAN::Bundle',$word),
3024 cplx('CPAN::Distribution',$word),
3025 cplx('CPAN::Module',$word),
|
| /mirbsd/src/gnu/usr.bin/perl/pod/ |
| D | perl5004delta.pod | 973 cplx cplxe
|