Fill an area defined by a subpath (Metafun)

Fill an area defined by a subpath (Metafun)

[Fabrice Couvreur]

[-- Attachment #1.1: Type: text/plain, Size: 790 bytes --]

Hello,
I have a little problem with coloring an area (path b).
Thanks for your help.
Fabrice

\starttext
\startMPcode

  path circle, p, q, b;

circle = fullcircle xscaled 6cm yscaled 3.5cm;
p = (point 2 of circle .. (-0.15cm,1.5cm) ..(0,0)..(0.15cm,-1.5cm).. point
6 of circle);
q = (subpath(0,2) of circle -- p -- subpath(6,8) of circle --cycle);
b = (p -- subpath(2,6) of circle -- cycle);

definecolor [ name = "mp:red", r = 1 ];
definecolor [ name = "mp:blue", r = 0.54, g = 0.17, b = 0.89 ];

fill q withcolor "mp:red" withtransparency(1,0.5) ;
fill b withcolor "mp:blue" withtransparency(1,0.5) ;
draw circle;
draw p;

label("$\overline{\text{A}}$",( 1.5cm,0)) withcolor "mp:red";
label("$\text{A}$",(-1.5cm,0)) withcolor "mp:blue";
label.top("E",(0,1.85cm));

\stopMPcode
\stoptext

[-- Attachment #1.2: Type: text/html, Size: 1643 bytes --]

[-- Attachment #2: Type: text/plain, Size: 493 bytes --]

___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the Wiki!

maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage  : http://www.pragma-ade.nl / http://context.aanhet.net
archive  : https://bitbucket.org/phg/context-mirror/commits/
wiki     : http://contextgarden.net
___________________________________________________________________________________

Re: Fill an area defined by a subpath (Metafun)

[Taco Hoekwater]

> On 23 Jul 2020, at 11:48, Fabrice Couvreur <fabrice1.couvreur@gmail.com> wrote:
> 
> Hello,
> I have a little problem with coloring an area (path b).
> Thanks for your help.
> Fabrice
> 
> \starttext
> \startMPcode
>   
>   path circle, p, q, b;
>   
> circle = fullcircle xscaled 6cm yscaled 3.5cm;
> p = (point 2 of circle .. (-0.15cm,1.5cm) ..(0,0)..(0.15cm,-1.5cm).. point 6 of circle);
> q = (subpath(0,2) of circle -- p -- subpath(6,8) of circle --cycle);
> b = (p -- subpath(2,6) of circle -- cycle);

That should be:

  b = (reverse p -- subpath(2,6) of circle -- cycle);

Best wishes,
Taco
___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the Wiki!

maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage  : http://www.pragma-ade.nl / http://context.aanhet.net
archive  : https://bitbucket.org/phg/context-mirror/commits/
wiki     : http://contextgarden.net
___________________________________________________________________________________

Re: Fill an area defined by a subpath (Metafun)

[Fabrice Couvreur]

[-- Attachment #1.1: Type: text/plain, Size: 1365 bytes --]

Hello Taco
Thank you so much ; I did not know the reverse operator.
Fabrice

Le jeu. 23 juil. 2020 à 11:56, Taco Hoekwater <taco@elvenkind.com> a écrit :

>
>
> > On 23 Jul 2020, at 11:48, Fabrice Couvreur <fabrice1.couvreur@gmail.com>
> wrote:
> >
> > Hello,
> > I have a little problem with coloring an area (path b).
> > Thanks for your help.
> > Fabrice
> >
> > \starttext
> > \startMPcode
> >
> >   path circle, p, q, b;
> >
> > circle = fullcircle xscaled 6cm yscaled 3.5cm;
> > p = (point 2 of circle .. (-0.15cm,1.5cm) ..(0,0)..(0.15cm,-1.5cm)..
> point 6 of circle);
> > q = (subpath(0,2) of circle -- p -- subpath(6,8) of circle --cycle);
> > b = (p -- subpath(2,6) of circle -- cycle);
>
> That should be:
>
>   b = (reverse p -- subpath(2,6) of circle -- cycle);
>
> Best wishes,
> Taco
>
> ___________________________________________________________________________________
> If your question is of interest to others as well, please add an entry to
> the Wiki!
>
> maillist : ntg-context@ntg.nl /
> http://www.ntg.nl/mailman/listinfo/ntg-context
> webpage  : http://www.pragma-ade.nl / http://context.aanhet.net
> archive  : https://bitbucket.org/phg/context-mirror/commits/
> wiki     : http://contextgarden.net
>
> ___________________________________________________________________________________
>

[-- Attachment #1.2: Type: text/html, Size: 2691 bytes --]

[-- Attachment #2: Type: text/plain, Size: 493 bytes --]

___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the Wiki!

maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage  : http://www.pragma-ade.nl / http://context.aanhet.net
archive  : https://bitbucket.org/phg/context-mirror/commits/
wiki     : http://contextgarden.net
___________________________________________________________________________________