exemples/reperes/reperes2.mp

   1 input gdd;
   2 input gdd-rep;
   3 input gdd-lbl;
   4 input gdd-tra;
   5 input svgnames;
   6
   7 lblPreambule := "\usepackage[frenchb]{babel}"       &
   8                 "\usepackage[garamond]{mathdesign}" &
   9                 "\usepackage{amsmath}";
  10
  11 labeloffset := 4;
  12 gddU:=1.3cm;
  13
  14
  15
  16 beginfig(1);
  17
  18
  19   O = Point(0,0);
  20   I = Point(1,0);
  21   J = Point(0.3,0.8);
  22   M = PointDansRepere(5,3,O,I,J);
  23   H = PointDansRepere(5,0,O,I,J);
  24   K = PointDansRepere(0,3,O,I,J);
  25   O' = Point(3,2);
  26   I' = Point(3.7,1.8);
  27   J' = Point(2.8,3);
  28
  29   pair Mt;
  30   Mt = CoordonneesRepere(M,O',I',J');
  31   H' = PointDansRepere(xpart Mt,0,O',I',J');
  32   K' = PointDansRepere(0,ypart Mt,O',I',J');
  33
  34   Repere(8,6,1.5,1.5,1,1);
  35   Debut;
  36
  37     % GrilleRepere;
  38
  39     trace Droite(O,I);
  40     trace Droite(O,J);
  41     trace Droite(O',I');
  42     trace Droite(O',J');
  43
  44     trace Pt(K)--Pt(M)--Pt(H) dashed evenly;
  45     trace Pt(K')--Pt(M)--Pt(H') dashed evenly;
  46
  47     marque.urt  "M";
  48
  49     drawoptions(withpen pencircle scaled 1pt withcolor DodgerBlue);
  50     trace Vecteur(O,K);
  51     trace Vecteur(O,H);
  52     trace Vecteur(O,M);
  53
  54     drawoptions(withpen pencircle scaled 1pt withcolor LimeGreen);
  55     trace Vecteur(O',M);
  56     trace Vecteur(O',H');
  57     trace Vecteur(O',K');
  58
  59     drawoptions(withpen pencircle scaled 1.5pt withcolor Crimson);
  60     trace Vecteur(O,I);
  61     trace Vecteur(O,J);
  62     trace Vecteur(O',I');
  63     trace Vecteur(O',J');
  64
  65     drawoptions(withpen pencircle scaled 1pt withcolor LightCoral);
  66     trace Vecteur(O,O');
  67
  68     drawoptions();
  69     marque.llft "O";
  70     marque.llft "O'";
  71
  72     label.bot(TEX("\(x\)"), PtR(H));
  73     label.lft(TEX("\(y\)"), PtR(K));
  74     label.bot(TEX("\(\vec\imath\)"), PtR(I));
  75     label.lft(TEX("\(\vec\jmath\)"), PtR(J));
  76
  77     label.bot(TEX("\(x'\)"), PtR(H'));
  78     label.urt(TEX("\(y'\)"), PtR(K'));
  79     label.bot(TEX("\(\vec\imath'\)"), PtR(I'));
  80     label.lft(TEX("\(\vec\jmath'\)"), PtR(J'));
  81
  82   Fin;
  83
  84
  85 endfig;
  86
  87 end