atan2 - arctangent of Y/X
atan2 Y,X
Returns the arctangent of Y/X in the range -pi to pi.
For the tangent operation, you may use the POSIX::tan() function, or use the familiar relation:
sub tan { sin($_[0]) / cos($_[0]) }