Neco do metapostu

[Luboš Kloc]

pustofkj at inf.upol.cz wrote:
> JJ, presne to myslim, ale misto fullcircle tam chci ulozit tu superellipse,
> nebo fill, nebo neco tak...
>
>

No, je tam par chybicek:
1) dekarace obrazku picture: kdyz napisete
picture pic1,pic2...;
tak to MP bere jako pole -> je treba deklarovat
picture pic[];
2) superellipse tam mate jako izolovany prikaz - zbytecne.


Takhle to funguje (pridal jsem modre obtazeni):
--------------------------------------
% Format: mpost
prologues:=1;
beginfig(1);
picture pic[];
pic3:=nullpicture;
pair a, b, c, d;
numeric s;
a := (25mm,0);
b := (0,50mm);
c := (-25mm,0);
d := (0,-50mm);
s := 0.6;
addto pic3 contour superellipse(a,b,c,d,s) withcolor red+green;
pickup pencircle scaled 1mm;
addto pic3 doublepath superellipse(a,b,c,d,s) withpen currentpen
withcolor blue;
draw pic3 shifted (100mm,100mm);
endfig;
end;
---------------------------------------

S pozdravem,

Lubos Kloc