Searched refs:pit2 (Results 1 - 1 of 1) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Math/
H A DComplex.pm256 # pit2
260 sub pit2 () { 2 * pi } subroutine
394 if ($t > pi()) { $t -= pit2 }
395 elsif ($t <= -pi()) { $t += pit2 }
448 if ($t > pi()) { $t -= pit2 }
449 elsif ($t <= -pi()) { $t += pit2 }
454 if ($t > pi()) { $t -= pit2 }
455 elsif ($t <= -pi()) { $t += pit2 }
590 if ($$theta > pi()) { $$theta -= pit2 }
591 elsif ($$theta <= -pi()) { $$theta += pit2 }
[all...]

Completed in 21 milliseconds