input geometriesyr16; figure(0,0,10u,8u); trace feuillet withcolor blanc; pair A,B,C,D; C=u*(1,4); D-C=u*(7,1); A=u*(3,5); B-A=u*(2,-3); trace droite(C,D); marque_p:="croix"; nomme.ulft(A); nomme.urt(B); marque_p:="non"; label.ulft(btex $(d)$ etex,C); fin; end