La réponse de Maxime me rappelle opportunément que je devais tester la solution que Bogusław Jackowski, le gourou Metapost de la communauté polonaise des utilisateurs de TeX, m’avait communiquée. Elle fait intervenir plain_ex.mp, une extension qu’il utilise pour créer des polices.
du paquet [METATYPE1](https://ctan.org/pkg/metatype1).
Il m’avait dit que le paquet roex pouvait aussi être utile.
La solution suivante marche, à condition d’avoir la macro plain_ex.mp sous la main.
Le problème est qu’elle n’est pas sur CTAN et que je n’ai pas réussi à la copier dans cette réponse (2104 SLOC). Je vais demander à Bogusław Jackowski s’il peut télécharger ces macros sur le CTAN…
\starttext
\startMPpage
input plain_ex;
path p,q,r;
p:= fullcircle scaled 50 ;
q:= p xshifted 30;
draw p withcolor black;
draw q withcolor black;
find_outlines(p, q)(r) ;
%si je comprends bien, find_outlines sort une figure appelée r1 dans le cas présent
fill r1 withcolor blue ;
\stopMPpage
\stoptext
![résulat][1]
[1]: https://texnique.fr/osqa/upfiles/test_F7913oA.png