Lines Matching defs:polar
102 # polar [rho, theta] -- polar form
104 # p_dirty polar form not up-to-date
219 $self->{'polar'} = [$rho, $theta];
222 $self->display_format('polar');
293 $i->{'polar'} = [1, pip2];
312 sub polar {$_[0]->{p_dirty} ?
313 $_[0]->update_polar : $_[0]->{'polar'}}
316 sub set_polar { $_[0]->{c_dirty}++; $_[0]->{'polar'} = $_[1] }
321 # Recompute and return the cartesian form, given accurate polar form.
325 my ($r, $t) = @{$self->{'polar'}};
334 # Recompute and return the polar form, given accurate cartesian form.
340 return $self->{'polar'} = [0, 0] if $x == 0 && $y == 0;
341 return $self->{'polar'} = [CORE::sqrt($x*$x + $y*$y),
390 # if both polar better use polar to avoid rounding errors
391 my ($r1, $t1) = @{$z1->polar};
392 my ($r2, $t2) = @{$z2->polar};
441 # if both polar better use polar to avoid rounding errors
442 my ($r1, $t1) = @{$z1->polar};
443 my ($r2, $t2) = @{$z2->polar};
498 # If both arguments cartesian, return cartesian, else polar.
540 my ($r, $t) = @{$z->polar};
556 my ($r, $t) = @{$z->polar};
578 $z->{'polar'} = [ $rho, ${$z->polar}[1] ];
583 return ${$z->polar}[0];
604 $z->{'polar'} = [ ${$z->polar}[0], $theta ];
608 $theta = ${$z->polar}[1];
634 my ($r, $t) = @{$z->polar};
651 my ($r, $t) = @{$z->polar};
685 @{$z->polar} : (CORE::abs($z), $z >= 0 ? 0 : pi);
795 my ($r, $t) = @{$z->polar};
1301 # Valid object formats are 'c' and 'p' for cartesian and polar. The first
1340 # Show nicely formatted complex number under its cartesian or polar form,
1423 # Stringify as a polar representation '[r,t]'.
1427 my ($r, $t) = @{$z->polar};
1542 can also be uniquely identified with polar coordinates:
1567 The polar notation (also known as the trigonometric
1746 if you like. To create a number using the polar form, use either:
1753 notation for complex numbers in the polar form).
1785 style I<a+bi>, but there are legitimate cases where the polar style
1789 supplying either C<"polar"> or C<"cartesian"> as an argument, you
1802 Math::Complex::display_format('polar');
1808 The polar style attempts to emphasize arguments like I<k*pi/n>
1810 this is called I<polar pretty-printing>.
1819 C<"polar">, can be changed using the C<"style"> parameter.
1821 $j->display_format(style => "polar");
1825 $j->display_format("polar");