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.rt(btex $A$ etex,z1); z2=0.9[z1,z0];dotlabel.lrt(btex $M$ etex,z2); z3=0.25[z1,z0];dotlabel.lrt(btex $C$ etex,z3); z4=u*(2,5); z5=0.9[z1,z4];dotlabel.rt(btex $N$ etex,z5); z6=0.25[z1,z4];dotlabel.rt(btex $B$ etex,z6); draw droite(z2,z5,1.1); draw droite(z3,z6,1.50); draw z0--z1--z4; endfig; end