用 MetaPost 作的第一个图，七个六边形

beginfig(1)
  u := 1cm;

  pair t;
  t = dir (60);

  pair a[];