15 setxunit -10 10 setxrange -8 4 setyrange /nodesep 5 def %% espace en picas separant les points A et B de %% l'extremite de la connexion /angleA 0 def %% angle de depart en A /angleB 180 def %% angle d'arrivee en B /A {-3 -3} def /B {3 3} def [A B] points /arrowangle 5 def A B (->) pccurve \hsize 280pt La commande {\tt pccurve} trace une courbe de Bézier entre les points $A$ et $B$. Les paramètres $angleA$ et $angleB$ sont utilisés. xmin xmax add 2 div ymin uctexlabel