so digging a little deeper brings me this solution:

path p ; p := fullsquare xscaled 10mm yscaled 12mm superellipsed .7 ;
path q ; q := fullsquare xscaled  9mm yscaled 11mm superellipsed .7 ;
q := q shifted (3mm, -2mm);
path r ; r := fullsquare xscaled  8mm yscaled 10mm superellipsed .7 ;
r := r shifted (0mm, -4mm);

fill p withcolor red ;
clip currentpicture to q ;
clip currentpicture to r ;

draw p ;
draw q ;
draw r ;




> On 7 Oct 2018, at 13:19, Mikael P. Sundqvist <mic...@gmail.com> wrote:
> 
> On Sun, Oct 7, 2018 at 1:10 PM Floris van Manen <v...@klankschap.nl> wrote:
>> 
>> Could someone point me to te way as how to fill only the overlap of three 
>> paths using metafun ?
>> 
>> path p ; p := fullsquare xscaled 10mm yscaled 12mm superellipsed .7 ;
>> path q ; q := fullsquare xscaled  9mm yscaled 11mm superellipsed .7 ;
>> q := q shifted (3mm, -2mm);
>> path r ; r := fullsquare xscaled  8mm yscaled 10mm superellipsed .7 ;
>> r := r shifted (0mm, -4mm);
>> draw p ;
>> draw q ;
>> draw r ;
>> 
>> 
>> 
>> Thanks
>> .Floris
>> 
>> ___________________________________________________________________________________
>> 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
>> ___________________________________________________________________________________
> 
> Hi!
> 
> This is something similar as in page 304 of the manual
> http://www.pragma-ade.com/general/manuals/metafun-p.pdf
> 
> \startMPpage
> path p ; p := fullsquare xscaled 10mm yscaled 12mm superellipsed .7 ;
> path q ; q := fullsquare xscaled  9mm yscaled 11mm superellipsed .7 ;
> q := q shifted (3mm, -2mm);
> path r ; r := fullsquare xscaled  8mm yscaled 10mm superellipsed .7 ;
> r := r shifted (0mm, -4mm);
> path pr,pqr;
> pr = buildcycle(p, r);
> %fill pr withcolor 0.5white;
> pqr = buildcycle(q,pr) ;
> fill pqr withcolor darkyellow;
> draw p ;
> draw q withcolor darkred;
> draw r withcolor darkblue;
> \stopMPpage
> 
> /Mikael
> ___________________________________________________________________________________
> 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: signature.asc
Description: Message signed with OpenPGP using GPGMail

___________________________________________________________________________________
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
___________________________________________________________________________________

Reply via email to