// S.Ayrinhac (2009)
// Théorème d'Al-Kashi (appelé aussi loi des cosinus)
// calcul des 3 angles d'un triangle, connaissant ses 3 côtés
// résultat en radians et degrés
// exemple : [A_rad,A_deg]=Func_Alkashi(4,5,6)

function [A_rad,A_deg]=Func_Alkashi(a,b,c)

message='Triangle impossible !!!';
// Cas particulier : un côté nul équivaut à un segment
if ((a==0)|(b==0)|(c==0)), disp(message); abort, end
// Cas particulier impossible : un côté est plus grand que la somme des deux autres
if (c>(a+b))|(b>(a+c))|(a>(b+c)), disp(message); abort, end



a2=a.^2;
b2=b.^2;
c2=c.^2;

A_rad(1)=acos((b2+c2-a2)./abs(2.*b.*c));
A_rad(2)=acos((a2+c2-b2)./abs(2.*a.*c));
A_rad(3)=acos((a2+b2-c2)./abs(2.*a.*b));

A_deg=180.*A_rad./%pi;

if sum(A_deg)>=180.0001
    disp('Problème!!!');
end

endfunction