in reply to How can I get sine, cosine, and tangent to return values in degrees?
Sorry the atan() function is missing a ,1 ie
sub atan { atan2($_[0],1) }; [download]
Originally posted as a Categorized Answer.