Я, владелец авторских прав на это произведение, добровольно публикую его на условиях следующей лицензии:

Этот файл доступен на условиях Creative Commons CC0 1.0 Универсальной передачи в общественное достояние (Universal Public Domain Dedication).

Лица, связанные с работой над этим произведением, решили передать данное произведение в общественное достояние, отказавшись от всех прав на произведение по всему миру в рамках закона об авторских правах (а также связанных и смежных прав), в той степени, которую допускает закон. Вы можете копировать, изменять, распространять и исполнять данное произведение в любых целях, в том числе в коммерческих, без получения на это разрешения автора. http://creativecommons.org/publicdomain/zero/1.0/deed.enCC0Creative Commons Zero, Public Domain Dedicationfalsefalse

filenametemplate "%j-%1c.svg";

outputformat := "svg";

beginfig(1);
save u;
u:=1cm;

z.X=(0,1)*u rotated 5;
z.Y=z.X rotated 75;
z.Z=z.X rotated 150;
z.W=z.X rotated -70;

z.A=z.W zscaled (1,whatever)=z.X zscaled (1,whatever);
z.B=z.X zscaled (1,whatever)=z.Y zscaled (1,whatever);
z.C=z.Y zscaled (1,whatever)=z.Z zscaled (1,whatever);
z.D=z.Z zscaled (1,whatever)=z.W zscaled (1,whatever);
z.Q=whatever[z.X,z.Z]=whatever[z.Y,z.W];

setbounds currentpicture to (x.B-.4*u,y.D+.4*u)--(x.B-.4*u,y.C-.4*u)--(x.C+.4*u,y.C-.4*u)--(x.C+.4*u,y.D+.4*u)--cycle;

draw z.A--z.B--z.C--z.D--cycle;
draw z.A--z.C;
draw z.B--z.D;
draw z.X--z.Z;
draw z.Y--z.W;

draw fullcircle scaled (2*u);

pickup pencircle scaled 4pt;

drawdot z.A;
drawdot z.B;
drawdot z.C;
drawdot z.D;
drawdot z.X;
drawdot z.Y;
drawdot z.Z;
drawdot z.W;
drawdot z.Q;
endfig;
end