# semicircle(r,x0,y0) is semi circle with radiu r at (x0,y0);


semicircle(r_):=sqrt(r^2-x^2);
semicircle(r_,x0_,y0_):=sqrt(r^2-(x-x0)^2)+y0;