prologues:=2; input geometrie2; u=1cm; beginfig(1); z0=u*(1,1);label.lft(btex $C$ etex,z0); z1=u*(5,1);dotlabel.llft(btex $R$ etex,z1); draw demidroite(z0,z1,2); z2=1.5[z0,z1];dotlabel.llft(btex $D$ etex,z2); z3=u*(3,4);dotlabel.top(btex $S$ etex,z3); draw demidroite(z0,z3,2); z4=1.5[z0,z3];dotlabel.top(btex $E$ etex,z4); draw droite(z2,z4,1.1); draw droite(z1,z3,1.1); endfig; beginfig(-2); z0=u*(1,1); z1=u*(7,2);label.top(btex $A$ etex,z1); z2=1.6[z0,z1];dotlabel.lrt(btex $M$ etex,z2); z3=0.4[z1,z0];dotlabel.lrt(btex $C$ etex,z3); z4=u*(2,5); z5=1.6[z4,z1];dotlabel.rt(btex $N$ etex,z5); z6=0.4[z1,z4];dotlabel.rt(btex $B$ etex,z6); draw droite(z6,z3,1.5); draw droite(z2,z5,1.5); draw droite(z6,z1,3); draw droite(z3,z1,3); endfig; end