angle de vecteurs

[alb]

En préparant une vérification de mesures d'angles de vecteurs avec xcas, je me demandais s'il existait une commande directe donnant la mesure de l'angle (AB,CD) sans être obligé de faire angle(A,B,A+D-C) ?
Par exemple si le quatrième argument de angle était un point, angle(A,B,C,D) donnerait la mesure de l'angle (AB,CD)
J'ai une erreur dans la dernière ligne de ce script:

Code : Tout sélectionner

A:=point([-5/4,3,'affichage'=0]);
B:=point([-15/7,-3,'affichage'=0]);
triangle_equilateral(A,B,C);
I:=milieu(B,C);
G:=(1/3)*(A+B+C);
simplifier(angle(B,A,C));
angle(G,A,C,"");
angle(C,G,C+B-A); //il faut faire angle(C,G,simplifier(C+B-A))

[parisse]

On peut faire angle avec 2 droites par exemple (ou avec 2 segments secants).
Pour l'erreur, c'est parce qu'il faut mettre des parentheses autour de (B-A).