Bon, c'est encore moi ! Je ne parviens pas à marquer le point A avec une croix. Tu m'as demandé dans un post précédent si je cherchais à reproduire la figure le plus fidèlement possible ; la réponse est oui.
Merci.
Fabrice
- Code: Tout sélectionner
[
view(-7,7,-6,6),Marges(0,0,0,0),size(8),
view3D(-5,5,-5,5,-5,5),
A:=M(0,0,2*vecK), B:=M(-2,2,0),C:=M(2,-2,0),
H:=M(0,0,0),
p:=[H,vecK],
D:=Copy(getplan(p),3,2),
Build3D(
bdPlan(p,[color:=white, opacity:=1,border:=1,
width=12, contrast:=0,scale:=1]),
bdLine([B,C] ,[color:=black, arrows:=0, width:=12,]),
bdDroite([A,vecK] ,[hidden:=1,scale:=1.1,color:=firebrick,
arrows:=0, width:=12]),
bdAngleD(H+vecK,H,C, 0.5, [color:=navy]),
bdLabel(A,"$A$",[labelpos:=[3.1,0.5*i]]),
bdDot(H,[dir:=[vecI+vecJ,-vecI],dotstyle:=cross,
dotscale:=2]),
bdDot(A,[dir:=[vecI+vecJ,-vecI],dotstyle:=cross,
dotscale:=2]),
),
Display3D(),
draw("label",
"$\mathscr{P}$", [anchor:=Proj3D(D), labeldir:=[0.7,1.5+i/2]],
"$H$",[anchor:=Proj3D(H+vecK), labeldir:="SE",labelsep:=0.1],
),
]