input geometriesyr12;
u:=5mm;
figure(0,0,8u,9u);
pair S,O,K,A,B,C,D;
S=u*(3,0.5);
O-S=u*(0,4);
K-O=u*(0,3);
path cc,cd,ce;
cc=cercles((0,0),2u);
cd=cc yscaled 0.15 shifted O;
ce=cc yscaled 0.15 shifted K;
A=point(0) of cd;
D=symetrie(A,O);
B=point(0) of ce;
C=symetrie(B,K);
trace B--A--S--D--C;
trace ce;
trace subpath(0,length cd/2) of cd dashed evenly;
trace subpath(length cd/2,length cd) of cd;
trace D--A dashed evenly;
trace C--B dashed evenly;
trace K--S dashed evenly;
trace cotationmil(S,K,2.5u,15,btex $16\,dm$ etex);
trace cotationmil(O,K,-2.5u,15,btex $7\,dm$ etex);
trace cotationmil(C,B,0.75u,15,btex $14\,dm$ etex);
fin;
end