> The basic 5.6 Perl build is missing tangent 'tan()' and arctangent 'atn()'
> functions :( and I don't want to use posix module etc as the script has to
> run on a clean build - don't ask - far too complicated to explain.
Here's a simple tan that doesn't do error checking:
sub tan {
sin($_[0])/cos($_[0]);
}
Arctangent is more complicated because there are two possible results (separated by
PI/2 radians or 180 degrees) for a given value. I believe the atan2 function exists
in 5.6; read up on it and see if you can use it somehow.
--
Eric Amick
Columbia, MD
_______________________________________________
ActivePerl mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
