Xcas c'est vraiment magique !
1/ essai avec paramètre a et commande triangle pour remplacer les 3 segments:
Code : Tout sélectionner
O:=point(0,0,0);
S:=sphere(O,6,affichage=nom_cache);
a := element(0..10,4.2,0.1);
P:=plan(x=a,affichage=70+rempli);
C:=inter(S,P,affichage=rouge+epaisseur_ligne_2+nom_cache);
A:=point(a,0,0);
M:=point(a,0,sqrt(36-a^2));
triangle(O,A,M,affichage=bleu+epaisseur_ligne_2);
angle(A,O,M);
symb coche fait disparaître le triangle !
2/ essai avec parametre u:
Code : Tout sélectionner
O:=point(0,0,0);;
S:=sphere(O,6,affichage=nom_cache);;
u:= element(0..10,3.3,0.1);
P:=plan(x=u,affichage=70+rempli);;
C:=inter(S,P,affichage=rouge+epaisseur_ligne_2+nom_cache);;
A:=point(u,0,0);;
M:=point(u,0,sqrt(36-u^2));;
triangle(O,A,M,affichage=bleu+epaisseur_ligne_2);;
angle(A,O,M);
symb coche: crash sans sommation !