src/figures/contour/contour.asy

   1 // Upper half plane contour integral
   2
   3 import graph;
   4 size(5cm, 5cm);
   5
   6 real r=2cm;
   7
   8 pen p_axes = linewidth(0.5*linewidth())+grey;
   9 draw((-1.2r,0)--(1.2r,0), p_axes, Arrow);
  10 label("Re", (1.2r, 0), S);
  11 draw((0,0)--(0,1.2r), p_axes, Arrow);
  12 label("Im", (0, 1.2r), W);
  13
  14 pen p_contour = linewidth()+blue;
  15 draw((-r,0)--(r,0), p_contour);
  16 draw((0,0)--(r/2,0), p_contour, Arrow);
  17 draw(arc((0,0), r, 0, 180, CCW), p_contour);