Asymptoteの練習 簡単なグラフ

Jordanの補題の証明に出てきそうなグラフ。
サイズのことがあまりよくわかっていないので、微調整しまくりで綺麗ではない。
あと、各軸のスケールの変更の仕方もよくわからない。

size(7cm);

import graph;
defaultpen(fontsize(10pt));

xaxis("$x$",Arrow(SimpleHead));
yaxis("$y$",-0.3pt,2.15pt,Arrow(SimpleHead));

real f(real x) {return abs(sin(x));};
real g(real x) {return 2*abs(x)/pi;};
pair F(real x) {return (x,f(x));};
pair G(real x) {return (x,g(x));};

pen dashed=linetype(new real[] {5,5});
draw(graph(f,-2,2,operator ..));
draw(graph(g,-2,2,operator ..),dashed);
draw(F(pi/2)--(pi/2,0),dotted);
draw(F(-pi/2)--(-pi/2,0),dotted);
dot(F(pi/2)); dot(F(-pi/2)); 
label("$\frac{\pi}{2}$",(pi/2,0),S);
label("$-\frac{\pi}{2}$",(-pi/2,0),S);
label("$y=|\sin x|$",F(1)+(0,0.27));
label("$y=\frac{2}{\pi}|x|$",G(1)+(0,-0.3));