15 setxunit
-10 10 setxrange
-4 4 setyrange

/nodesep 5 def      %% espace en picas separant les points A et B de
                    %% l'extremite de la connexion              
/A {-3 3} def
/B {3 1} def

[A B] points

A B (->) line

<tex>
\hsize 280pt
La commande {\tt line} trace une simple ligne entre les points $A$ et
$B$. Seul le paramètre $nodesep$ est utilisé.
</tex>
xmin xmax add 2 div ymin uctexlabel