Ok.
In next example, f>0 is hide
\starttext
\startTEXpage\startMPcode
%beginfig(2);
h=2in; w=2.7in;
path p[], q[], pp;
for i=1.5,2,4:
ii := i**2;
p[i] = (w/ii,h){1/ii,-1}...(w/i,h/i)...(w,h/ii){1,-1/ii};
endfor
for i=.5,1.5:
q[i] = origin..(w,i*h) cutafter p1.5;
endfor
pp = buildcycle(q0.
Taco Hoekwater wrote:
>
> luigi scarso wrote:
>> In
>>
>> \starttext
>> \startTEXpage
>> \startlua
>> metapost.process("metafun",{"beginfig(1);",
>> "a=.7in; b=0.5in;",
>> "z0=(0,0); z1=(a,0); z2=(0,b);",
>> "z0=.5[z1,z3]=.5[z2,z4];",
>> "draw z1..z2..z3..z4..cycle;",
>> "drawarrow z0..z1;",
>> "d
luigi scarso wrote:
> In
>
> \starttext
> \startTEXpage
> \startlua
> metapost.process("metafun",{"beginfig(1);",
> "a=.7in; b=0.5in;",
> "z0=(0,0); z1=(a,0); z2=(0,b);",
> "z0=.5[z1,z3]=.5[z2,z4];",
> "draw z1..z2..z3..z4..cycle;",
> "drawarrow z0..z1;",
> "drawarrow z0..z2;",
> "label.top(btex
In
\starttext
\startTEXpage
\startlua
metapost.process("metafun",{"beginfig(1);",
"a=.7in; b=0.5in;",
"z0=(0,0); z1=(a,0); z2=(0,b);",
"z0=.5[z1,z3]=.5[z2,z4];",
"draw z1..z2..z3..z4..cycle;",
"drawarrow z0..z1;",
"drawarrow z0..z2;",
"label.top(btex $a$ etex, .5[z0,z1]);",
"label.lft(btex $b$ ete