[kw-pm] Angles

Tyler Slijboom tyler at piwebsolutions.ca
Thu Apr 14 08:15:56 PDT 2011



I think what you want is:

use Math::Trig qw( acos );
$angle_a = acos( ($C ** 2 + $B ** 2 - $A ** 2 ) / 2 * $C * $B ) ;

http://en.wikipedia.org/wiki/Law_of_cosines


Or is that what you already tried?



On Thu, 2011-04-14 at 07:50 -0700, Robert Pike wrote:
> Anyone have the formula (in Perl) to determine any 1 angle of a triangle when given all 3 sides? Appreciate it if you could pass my way as what I've been trying doesn't seem to be working. Thanks.
> _______________________________________________
> kw-pm mailing list
> kw-pm at pm.org
> http://mail.pm.org/mailman/listinfo/kw-pm



More information about the kw-pm mailing list