doc/info/figures/draw_transform.mac

   1 load("docdraw.mac");
   2
   3
   4 th:%pi/4;
   5
   6 docdraw2d("figures/draw_transform",
   7         color = "#e245f0",
   8         proportional_axes = 'xy,
   9         line_width = 8,
  10         triangle([3,2],[7,2],[5,5]),
  11         border     = false,
  12         fill_color = yellow,
  13         transform  = [cos(th)*x - sin(th)*y,
  14                       sin(th)*x + cos(th)*y, x, y],
  15         triangle([3,2],[7,2],[5,5]) )$